From e51821dc33815272034a3adf76b91861d0729304 Mon Sep 17 00:00:00 2001 From: Stas Boukarev Date: Sun, 3 Nov 2013 19:09:04 +0400 Subject: [PATCH] Fix undefined function error on SPARC. Adjust the register encoding in sparc-assem.S. Thanks to John Long for providing access to a SPARC machine. --- src/code/sc-offset.lisp | 2 +- src/runtime/sparc-assem.S | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) diff --git a/src/code/sc-offset.lisp b/src/code/sc-offset.lisp index 0f20089..29c8636 100644 --- a/src/code/sc-offset.lisp +++ b/src/code/sc-offset.lisp @@ -17,7 +17,7 @@ ;;;; which is the SC number and offset encoded as an integer. ;;;; FIXME: this layout is hardcoded in some .S files, -;;;; undefined_tramp in at least ppc-assem.S and mips-assem.S uses it. +;;;; undefined_tramp in at least mips/ppc/sparc-assem.S uses it. ;;;; Ideally, it shouldn't be hardcoded. (defconstant-eqx sc-offset-scn-byte (byte 6 0) #'equalp) (defconstant-eqx sc-offset-offset-byte (byte 21 6) #'equalp) diff --git a/src/runtime/sparc-assem.S b/src/runtime/sparc-assem.S index 895128a..c3fc99c 100644 --- a/src/runtime/sparc-assem.S +++ b/src/runtime/sparc-assem.S @@ -219,7 +219,7 @@ undefined_tramp = . + 1 unimp trap_Cerror .byte 4 .byte UNDEFINED_FUN_ERROR - .byte 254, sc_DescriptorReg, 3 + .byte 254, sc_DescriptorReg, 6 .align 4 1: ld [reg_FDEFN+FDEFN_RAW_ADDR_OFFSET], reg_CODE -- 1.7.10.4