[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