X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fruntime%2Fmips-lispregs.h;h=a5341c54001615d6cc0d34486e172c879af14016;hb=c8617f57d0413beb2890e94dabe227cef9c5ddad;hp=ff9b78adb6d44f98f4df79f6facf8cbe7c87fa8a;hpb=4ae1b794a5d6a90794468cf8017f5307f2c30dfe;p=sbcl.git diff --git a/src/runtime/mips-lispregs.h b/src/runtime/mips-lispregs.h index ff9b78a..a5341c5 100644 --- a/src/runtime/mips-lispregs.h +++ b/src/runtime/mips-lispregs.h @@ -1,12 +1,10 @@ -/* $Header$ */ - #ifdef LANGUAGE_ASSEMBLY #define REG(num) $ ## num #else #define REG(num) num #endif -#define NREGS (32) +#define NREGS (32) #define reg_ZERO REG(0) #define reg_NL3 REG(1) @@ -39,20 +37,17 @@ #define reg_LIP REG(31) #define REGNAMES \ - "ZERO", "NL3", "CFUNC", "NL4", \ - "NL0", "NL1", "NL2", "NARGS", \ - "A0", "A1", "A2", "A3", \ - "A4", "A5", "FDEFN", "LEXENV", \ - "NFP", "OCFP", "LRA", "L0", \ - "NIL", "BSP", "CFP", "CSP", \ - "L1", "ALLOC", "K0", "K1", \ - "GP", "NSP", "CODE", "LIP" + "ZERO", "NL3", "CFUNC", "NL4", \ + "NL0", "NL1", "NL2", "NARGS", \ + "A0", "A1", "A2", "A3", \ + "A4", "A5", "FDEFN", "LEXENV", \ + "NFP", "OCFP", "LRA", "L0", \ + "NIL", "BSP", "CFP", "CSP", \ + "L1", "ALLOC", "K0", "K1", \ + "GP", "NSP", "CODE", "LIP" #define BOXED_REGISTERS { \ reg_A0, reg_A1, reg_A2, reg_A3, reg_A4, reg_A5, reg_FDEFN, reg_LEXENV, \ reg_NFP, reg_OCFP, reg_LRA, reg_L0, reg_L1, reg_CODE \ } - -#define SC_REG(sc, n) ((sc)->sc_regs[n]) -#define SC_PC(sc) ((sc)->sc_pc)