Changeset 5752

Timestamp:

Jan 20, 2007, 6:34:24 PM (18 years ago)

Author:

Gary Byers

Message:

Package prefixes. D'oh!

File:

• trunk/ccl/compiler/X86/X8664/x8664-backend.lisp (modified) (3 diffs)

trunk/ccl/compiler/X86/X8664/x8664-backend.lisp

@@ -270 +270 @@
                                         :struct-by-value t)
                           :ff-call-expand-function
-                          'x86-linux64::expand-ff-call
-                          :))
+                          (intern "EXPAND-FF-CALL" "X86-LINUX64")))
                 (:darwinx8664
                   (make-ftd :interface-db-directory "ccl:darwin-x86-headers64;"
@@ -280 +279 @@
                                         :prepend-underscore t)
                           :ff-call-expand-function
-                          'x86-darwin64::expand-ff-call))
+                          (intern "EXPAND-FF-CALL" "X86-DARWIN64")))
                  (:freebsdx8664
                   (make-ftd :interface-db-directory "ccl:freebsd-headers64;"
@@ -287 +286 @@
                                           :struct-by-value t)
                           :ff-call-expand-function
-                          'x86-freebsd64::expand-ff-call)))))
+                          (intern "EXPAND-FF-CALL" "X86-FREEBSD64"))))))
         (install-standard-foreign-types ftd)
     (use-interface-dir :libc ftd)