Changeset 6373 for branches/x8664-call


Ignore:
Timestamp:
Apr 30, 2007, 2:44:22 AM (13 years ago)
Author:
gb
Message:

x8664-setup-ftd: deal with cross-compilation issues.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • branches/x8664-call/ccl/compiler/X86/X8664/x8664-backend.lisp

    r6356 r6373  
    152152              (case name
    153153                (:linuxx8664
    154                  (make-ftd :interface-db-directory "ccl:x86-headers64;"
     154                 (make-ftd :interface-db-directory
     155                           (if (eq backend *host-backend*)
     156                             "ccl:x86-headers64;"
     157                             "ccl:cross-x86-headers64;")
    155158                           :interface-package-name "X86-LINUX64"
    156159                           :attributes '(:bits-per-word  64
     
    166169                           (intern "GENERATE-CALLBACK-RETURN-VALUE" "X86-LINUX64")))
    167170                (:darwinx8664
    168                  (make-ftd :interface-db-directory "ccl:darwin-x86-headers64;"
     171                 (make-ftd :interface-db-directory
     172                           (if (eq backend *host-backend*)
     173                             "ccl:darwin-x86-headers64;"
     174                             "ccl:cross-darwin-x86-headers64;")
    169175                           :interface-package-name "X86-DARWIN64"
    170176                           :attributes '(:bits-per-word  64
     
    182188                           (intern "GENERATE-CALLBACK-RETURN-VALUE" "X86-DARWIN64")))
    183189                (:freebsdx8664
    184                  (make-ftd :interface-db-directory "ccl:freebsd-headers64;"
     190                 (make-ftd :interface-db-directory
     191                           (if (eq backend *host-backend*)
     192                             "ccl:freebsd-headers64;"
     193                             "ccl:cross-freebsd-headers64;")
    185194                           :interface-package-name "X86-FREEBSD64"
    186195                           :attributes '(:bits-per-word  64
Note: See TracChangeset for help on using the changeset viewer.