From bf4563390d2e31c436ce6660ccc51671c907e4b2 Mon Sep 17 00:00:00 2001 From: Matthew Flatt Date: Sat, 18 Feb 2006 15:46:50 +0000 Subject: [PATCH] i386-{macosx,darwin} is like ppc svn: r2282 --- collects/dynext/compile-unit.ss | 4 ++-- collects/dynext/link-unit.ss | 5 +++-- 2 files changed, 5 insertions(+), 4 deletions(-) diff --git a/collects/dynext/compile-unit.ss b/collects/dynext/compile-unit.ss index 10840a8df7..5400704e6e 100644 --- a/collects/dynext/compile-unit.ss +++ b/collects/dynext/compile-unit.ss @@ -59,13 +59,13 @@ (define gcc-cpp-flags (add-variant-flags (case (string->symbol (path->string (system-library-subpath #f))) [(parisc-hpux) '("-D_HPUX_SOURCE")] - [(ppc-macosx) '("-DOS_X")] + [(ppc-macosx i386-macosx) '("-DOS_X")] [(ppc-darwin) '("-DOS_X" "-DXONX")] [else null]))) (define gcc-compile-flags (append '("-c" "-O2" "-fPIC") (case (string->symbol (path->string (system-library-subpath #f))) - [(ppc-macosx) '("-fno-common")] + [(ppc-macosx i386-macosx) '("-fno-common")] [(ppc-darwin) '("-fno-common")] [else null]) gcc-cpp-flags)) diff --git a/collects/dynext/link-unit.ss b/collects/dynext/link-unit.ss index deaeaffbc2..ea0fcb27e5 100644 --- a/collects/dynext/link-unit.ss +++ b/collects/dynext/link-unit.ss @@ -28,7 +28,7 @@ (define (get-unix-linker) (or (getenv "MZSCHEME_DYNEXT_LINKER") (let ([s (case (string->symbol (path->string (system-library-subpath #f))) - [(rs6k-aix ppc-macosx ppc-darwin) "cc"] + [(rs6k-aix ppc-macosx i386-macosx ppc-darwin i386-darwin) "cc"] [else "ld"])]) (find-executable-path s s)))) @@ -117,7 +117,8 @@ (format "-bE:~a/ext.exp" include-dir) "-bnoentry")] [(parisc-hpux) (list "-b")] - [(ppc-macosx ppc-darwin) (list "-bundle" "-flat_namespace" "-undefined" "suppress")] + [(ppc-macosx ppc-darwin i386-macosx i386-darwin) + (list "-bundle" "-flat_namespace" "-undefined" "suppress")] [(i386-cygwin) win-gcc-linker-flags] [else (list "-shared")]))