X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fruntime%2Fppc-assem.S;h=1135c8ae1e7c7f3db1f99406be985db885ee6f1d;hb=a0a413499415738d23cc40baa44e9c404af54a94;hp=dc400f278775af0362c6c31b8d1b1bed4b9cc044;hpb=c1b4849c95bad4f3535fba2b9307fd37e15bcf6d;p=sbcl.git

diff --git a/src/runtime/ppc-assem.S b/src/runtime/ppc-assem.S
index dc400f2..1135c8a 100644
--- a/src/runtime/ppc-assem.S
+++ b/src/runtime/ppc-assem.S
@@ -3,7 +3,10 @@
 #include "sbcl.h" 
 #include "lispregs.h"
 #include "globals.h"
-
+#include "genesis/simple-fun.h"
+#include "genesis/fdefn.h"
+#include "genesis/closure.h"
+#include "genesis/static-symbols.h"
 
 #define FUNCDEF(x)	.text ; \
 			.align 3 ; \
@@ -347,10 +350,9 @@ lra:
 
 	GFUNCDEF(xundefined_tramp)
 	.globl undefined_tramp
-	.byte 0,0,0,SIMPLE_FUN_HEADER_WIDETAG /* type_FunctionHeader */
-
+	.byte 0,0,0,SIMPLE_FUN_HEADER_WIDETAG
 	.byte 18<<2
-undefined_tramp:
+undefined_tramp:	
 	.byte 0,0,24
 	.long undefined_tramp
 	.long NIL
@@ -360,7 +362,7 @@ undefined_tramp:
 	twllei reg_ZERO,trap_Cerror
 	.byte 4
 	.byte UNDEFINED_FUN_ERROR
-	.byte 254, 140, 2	/* 140?  sparc says sc_descriptorReg */
+	.byte 254, sc_DescriptorReg+0x40, 1	/* 140?  sparc says sc_descriptorReg */
 	.align 2
 1:	lwz reg_CODE,FDEFN_RAW_ADDR_OFFSET(reg_FDEFN)
 	la reg_LIP,SIMPLE_FUN_CODE_OFFSET(reg_CODE)