[Openmcl-cvs-notifications] r11911 - /trunk/source/lisp-kernel/x86-spentry64.s

[gb at clozure.com]

Author: gb
Date: Wed Apr  8 13:51:07 2009
New Revision: 11911

Log:
In the ObjC 2 exception gunk, use pc-relative addressing to reference
a global variable, since hypothetical advanced linkers may not be
able to deal with absolute addresses that aren't in a mapped section.

Modified:
    trunk/source/lisp-kernel/x86-spentry64.s

Modified: trunk/source/lisp-kernel/x86-spentry64.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-spentry64.s (original)
+++ trunk/source/lisp-kernel/x86-spentry64.s Wed Apr  8 13:51:07 2009
@@ -5098,9 +5098,9 @@
 	.byte	0x1	/* uleb128 0x1; CIE Code Alignment Factor */
 	.byte	0x78	/* sleb128 -8; CIE Data Alignment Factor */
 	.byte	0x10	/* CIE RA Column */
-	.byte	0xb	/* uleb128 0xb; Augmentation size */
-	.byte	0x8c	/* Personality (indirect  sdata8) */
-	.quad	lisp_global(objc_2_personality)
+	.byte	0x7
+	.byte	0x9b
+	.long	___objc_personality_v0+4 at GOTPCREL
 	.byte	0x10	/* LSDA Encoding (pcrel) */
 	.byte	0x10	/* FDE Encoding (pcrel) */
 	.byte	0xc	/* DW_CFA_def_cfa */