mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-05-18 02:00:20 +02:00
Code Activity

Indirect threaded. Performance is the same as before. Wow\!

Browse source
This commit is contained in:
Keisuke Nishida 2000-09-27 23:29:45 +00:00
parent 015959cb4a
commit 4b482259c3
7 changed files with 65 additions and 109 deletions
Download patch file Download diff file Expand all files Collapse all files

7
src/vm.h
View file

@ -51,9 +51,9 @@
/* Opcode */
enum scm_opcode {
#include "vm_system.op"
#include "vm_scheme.op"
#include "vm_number.op"
#include "vm_system.opcode"
#include "vm_scheme.opcode"
#include "vm_number.opcode"
op_last
};
@ -73,7 +73,6 @@ struct scm_instruction {
enum scm_opcode opcode; /* opcode */
enum scm_inst_type type; /* argument type */
char *name; /* instruction name */
void *addr; /* instruction address */
SCM obj; /* instruction object */
/* fields for VM functions */
char *sname; /* Scheme procedure name */