@@ -51,7 +51,6 @@ function maketype(name,param_dict,origex,funcs,syms,fex;
5151 vector_ex:: Expr
5252 vector_ex_return:: Expr
5353 params:: Vector{Symbol}
54- nf:: Ref{Int} # number of function evals
5554 end )
5655
5756 # Make the default constructor
@@ -78,10 +77,10 @@ function maketype(name,param_dict,origex,funcs,syms,fex;
7877 $ tgradex_ex,$ Jex_ex,$ expJex_ex,$ param_Jex_ex,
7978 $ invJex_ex,$ invWex_ex,$ invWex_t_ex,
8079 $ Hex_ex,$ invHex_ex,$ fex_ex,$ pex_ex,$ vector_ex_ex,
81- $ vector_ex_return_ex,$ params, Ref ( 0 ) )) |> esc
80+ $ vector_ex_return_ex,$ params)) |> esc
8281
83- callex = :(((f:: $name ))(args... ) = (f . nf[] += 1 ; f . f (args... ) )) |> esc
84- callex2 = :(((f:: $name ))(u,p,t:: Number ) = (f . nf[] += 1 ; du= similar (u);f. f (du,u,p,t);du)) |> esc
82+ callex = :(((f:: $name ))(args... ) = f . f (args... )) |> esc
83+ callex2 = :(((f:: $name ))(u,p,t:: Number ) = (du= similar (u);f. f (du,u,p,t);du)) |> esc
8584
8685 # Make the type instance using the default constructor
8786 typeex,constructorex,callex,callex2
0 commit comments