|
From: Nicolas N. <ne...@ma...> - 2008-12-10 16:59:59
|
Comparing with Matlisp, I have found my bug.
Nicolas Neuss <ne...@ma...> writes:
> (foreign-functions:def-foreign-call (dnrm2- "dnrm2_")
"dnrm2" is correct
> ((n :int) (x (:array :double)) (incx :int))
> :convention :fortran
> :returning :double)
To make sure I understand this correctly: dnrm2_ is probably a routine
suitable for calling from C (passing arrays as a pointer to values) while
Allegro with convention :fortran passes arrays pointing to values-1 as is
suitable for the Fortran "dnrm2".
Is this correct?
Thanks, Nicolas
|