diff options
Diffstat (limited to 'libguile/vm-expand.h')
-rw-r--r-- | libguile/vm-expand.h | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/libguile/vm-expand.h b/libguile/vm-expand.h index ef69352c3..7ad2b9da8 100644 --- a/libguile/vm-expand.h +++ b/libguile/vm-expand.h @@ -65,7 +65,7 @@ */ #ifdef VM_INSTRUCTION_TO_TABLE #define VM_DEFINE_INSTRUCTION(code_,tag_,name_,len_,npop_,npush_) \ - table[VM_OPCODE (tag_)].opcode = VM_OPCODE (tag_); \ + table[VM_OPCODE (tag_)].opcode = code_; \ table[VM_OPCODE (tag_)].name = name_; \ table[VM_OPCODE (tag_)].len = len_; \ table[VM_OPCODE (tag_)].npop = npop_; \ @@ -76,7 +76,7 @@ /* * These will go to jump_table in vm_engine.c */ -#define VM_DEFINE_INSTRUCTION(code,tag,name,len,npop,npush) jump_table[VM_OPCODE (tag)] = VM_ADDR (tag); +#define VM_DEFINE_INSTRUCTION(code,tag,name,len,npop,npush) jump_table[code] = VM_ADDR (tag); #else #ifdef VM_INSTRUCTION_TO_OPCODE |