mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-05-11 08:10:21 +02:00
Code Activity

Change JIT_REXTMP, JIT_R, JIT_V to use 64-bit registers

Browse source
This commit is contained in:
Paulo Cesar Pereira de Andrade 2010-08-23 19:42:55 -03:00 • committed by Paolo Bonzini
parent 58043d717d
commit 3eb42b42b6
2 changed files with 11 additions and 11 deletions
Download patch file Download diff file Expand all files Collapse all files

16
lightning/i386/asm-64.h
View file

@ -115,14 +115,14 @@
#define _RBP 0x55 #define _RBP 0x55
#define _RSI 0x56 #define _RSI 0x56
#define _RDI 0x57 #define _RDI 0x57
#define _R8 0x48 #define _R8 0x58
#define _R9 0x49 #define _R9 0x59
#define _R10 0x4A #define _R10 0x5A
#define _R11 0x4B #define _R11 0x5B
#define _R12 0x4C #define _R12 0x5C
#define _R13 0x4D #define _R13 0x5D
#define _R14 0x4E #define _R14 0x5E
#define _R15 0x4F #define _R15 0x5F
#define _RIP -2 #define _RIP -2
#if defined(_ASM_SAFETY) #if defined(_ASM_SAFETY)

6
lightning/i386/core-64.h
View file

@ -36,7 +36,7 @@
/* Used to implement ldc, stc, ... */ /* Used to implement ldc, stc, ... */
#define JIT_CAN_16 0 #define JIT_CAN_16 0
#define JIT_REXTMP _R9D #define JIT_REXTMP _R9
/* Number or integer argument registers */ /* Number or integer argument registers */
#define JIT_ARG_MAX 6 #define JIT_ARG_MAX 6
@ -45,9 +45,9 @@
#define JIT_FP_ARG_MAX 8 #define JIT_FP_ARG_MAX 8
#define JIT_R_NUM 3 #define JIT_R_NUM 3
#define JIT_R(i) ((i) == 0 ? _EAX : _R9D + (i)) #define JIT_R(i) ((i) == 0 ? _EAX : _R9 + (i))
#define JIT_V_NUM 3 #define JIT_V_NUM 3
#define JIT_V(i) ((i) == 0 ? _EBX : _R11D + (i)) #define JIT_V(i) ((i) == 0 ? _EBX : _R11 + (i))
struct jit_local_state { struct jit_local_state {
int long_jumps; int long_jumps;