Minimum example

gistfile1.txt

include("src/CUTEst.jl")

using CUTEst

io_err = Cint[0]
n = Cint[2]
#goth = Cint[0]
#libname = "libLOGHAIRY"

function bar!(Hv, x, v)
  #io_err = Cint[0]
  #n = Cint[2]
  goth = Cint[0]
  libname = "libLOGHAIRY"
  uhprod(io_err, n, goth, x, v, Hv, libname)
end

function test(nlp, N)
  x = zeros(2)
  v = ones(2)
  Hv = zeros(x)
  for i = 1:N
    bar!(Hv, x, v)
  end
end

nlp = CUTEstModel("LOGHAIRY")
test(nlp, 1)
test(nlp, 100000)