Changeset 7376 for trunk/ccl/lib/ffi-darwinppc64.lisp

Timestamp:

Oct 11, 2007, 3:31:40 AM (13 years ago)

Author:

gb

Message:

Don't automatically generate DYNAMIC-EXTENT declarations for simple
pointer-typed callback arguments.

File:

• trunk/ccl/lib/ffi-darwinppc64.lisp (modified) (1 diff)

trunk/ccl/lib/ffi-darwinppc64.lisp

@@ -504 +504 @@
                                           ,(* 8 (1- fp-arg-num)))))))))))))
                 (lets (list name (next-scalar-arg argtype))))
+              #+nil
               (when (or (typep argtype 'foreign-pointer-type)
                         (typep argtype 'foreign-array-type))