Define callbacks by returning the struct pointer, without setting specials
Macro defcbstruct and all the macros built on it now simply return the C struct needed by GSL functions instead of binding a special whose name is then passed to the GSL functions. Specials can still be used of course in the standard way like defparameter, but the results can also be bound locally with a let or passed in directly. The name of a callback passed to defmcallback and to defcbstruct in all the macros that expand both is now gensymmed (since it is used only long enough to put in a slot of the cbstruct) instead of taken to be the name of the CL function, in order to make clear the different objects. Unfortunately, there is appears to be a bug in CFFI using defcallback with an uninterned symbol in CCL, so I have put a workaround in. However, there is still another error even with this workaround. Thus test results are: SBCL 64: TOTAL: 1248 assertions passed, 5 failed, 0 execution errors. CCL 64: TOTAL: 1229 assertions passed, 2 failed, 6 execution errors.
Showing
- calculus/monte-carlo.lisp 9 additions, 8 deletionscalculus/monte-carlo.lisp
- calculus/numerical-differentiation.lisp 25 additions, 46 deletionscalculus/numerical-differentiation.lisp
- calculus/numerical-integration.lisp 6 additions, 12 deletionscalculus/numerical-integration.lisp
- chebyshev.lisp 9 additions, 6 deletionschebyshev.lisp
- documentation/index.html 5 additions, 3 deletionsdocumentation/index.html
- gsll.asd 2 additions, 2 deletionsgsll.asd
- init/callback.lisp 40 additions, 51 deletionsinit/callback.lisp
- init/init.lisp 14 additions, 1 deletioninit/init.lisp
- ordinary-differential-equations/ode-example.lisp 3 additions, 4 deletionsordinary-differential-equations/ode-example.lisp
- ordinary-differential-equations/ode-system.lisp 15 additions, 14 deletionsordinary-differential-equations/ode-system.lisp
- solve-minimize-fit/generic.lisp 53 additions, 4 deletionssolve-minimize-fit/generic.lisp
- solve-minimize-fit/minimization-multi.lisp 31 additions, 27 deletionssolve-minimize-fit/minimization-multi.lisp
- solve-minimize-fit/minimization-one.lisp 5 additions, 3 deletionssolve-minimize-fit/minimization-one.lisp
- solve-minimize-fit/nonlinear-least-squares.lisp 31 additions, 29 deletionssolve-minimize-fit/nonlinear-least-squares.lisp
- solve-minimize-fit/roots-multi.lisp 5 additions, 15 deletionssolve-minimize-fit/roots-multi.lisp
- solve-minimize-fit/roots-one.lisp 7 additions, 59 deletionssolve-minimize-fit/roots-one.lisp
- tests/numerical-differentiation.lisp 36 additions, 18 deletionstests/numerical-differentiation.lisp
- tests/numerical-integration.lisp 3 additions, 3 deletionstests/numerical-integration.lisp
Loading
Please register or sign in to comment