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 |