[Openmcl-cvs-notifications] r15133 - in /trunk/source/lisp-kernel: x86-asmutils32.s x86-asmutils64.s

gb at clozure.com gb at clozure.com
Mon Dec 12 05:18:09 CST 2011


Author: gb
Date: Mon Dec 12 05:18:09 2011
New Revision: 15133

Log:
Darwin doesn't have a libm anyway, and doesn't like absolute references
in PIC.

Modified:
    trunk/source/lisp-kernel/x86-asmutils32.s
    trunk/source/lisp-kernel/x86-asmutils64.s

Modified: trunk/source/lisp-kernel/x86-asmutils32.s
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D
--- trunk/source/lisp-kernel/x86-asmutils32.s (original)
+++ trunk/source/lisp-kernel/x86-asmutils32.s Mon Dec 12 05:18:09 2011
@@ -132,8 +132,10 @@
 	__(pop %esi)
 	__(pop %ebx)
 	__(ret)
+        __ifndef(`DARWIN')
         .globl C(exp)
         .long C(exp)
+        __endif
 _endfn
 =

 /* switch_to_foreign_stack(new_sp, func, arg_0, arg_1, arg_2)  */

Modified: trunk/source/lisp-kernel/x86-asmutils64.s
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D
--- trunk/source/lisp-kernel/x86-asmutils64.s (original)
+++ trunk/source/lisp-kernel/x86-asmutils64.s Mon Dec 12 05:18:09 2011
@@ -147,8 +147,10 @@
 	__(popq %ctemp0)		/* recover pecx */
 	__(movq %rcx,(%ctemp0))
 	__(ret)
+        __ifndef(`DARWIN')
         .globl C(exp)
         .quad C(exp)
+	__endif
 _endfn
 =

 /* switch_to_foreign_stack(new_sp, func, arg_0, arg_1, arg_2, arg_3)  */



More information about the Openmcl-cvs-notifications mailing list