Changeset 4971

Timestamp:

Aug 20, 2006, 4:09:16 PM (18 years ago)

Author:

Gary Byers

Message:

Darwinx8664: overload %gs, setup syscall mask.

File:

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

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

@@ -179 +179 @@
                 :p2-template-hash-name '*x8664-vinsn-templates*
                 :p2-compile 'x862-compile
+                :platform-syscall-mask (logior platform-os-darwin platform-cpu-x86 platform-word-size-64) 
                 :target-specific-features
                 '(:x8664 :x86-target :darwin-target :darwinx86-target :x8664-target
@@ -195 +196 @@
                 :define-callback 'define-x8664-callback
                 :defcallback-body 'defcallback-body-x8664
-                :lisp-context-register x8664::fs
+                ;; Overload %gs until Apple straightens things out.
+                :lisp-context-register x8664::gs
                 ))