remove old VM test code
This commit is contained in:
parent
ee3442210c
commit
5f90f49604
7
Makefile
7
Makefile
|
@ -6,13 +6,6 @@ build:
|
|||
lex scan.l
|
||||
gcc -o bin/picrin -I./include src/main.c src/state.c src/gc.c src/pair.c src/write.c src/symbol.c src/value.c src/y.tab.c src/lex.yy.c src/eval.c src/bool.c src/vm.c
|
||||
|
||||
test-vm:
|
||||
cd src; \
|
||||
yacc -d parse.y; \
|
||||
lex scan.l
|
||||
gcc -o bin/picrin -I./include src/vm.c src/state.c src/gc.c src/pair.c src/write.c src/symbol.c src/value.c src/y.tab.c src/lex.yy.c src/eval.c src/bool.c
|
||||
bin/picrin
|
||||
|
||||
clean:
|
||||
rm -f src/y.tab.c src/y.tab.h src/lex.yy.c
|
||||
rm -f bin/picrin
|
||||
|
|
29
src/vm.c
29
src/vm.c
|
@ -137,32 +137,3 @@ pic_codegen(pic_state *pic, pic_value obj, struct pic_env *env)
|
|||
|
||||
return proc;
|
||||
}
|
||||
|
||||
#if 0
|
||||
int
|
||||
main()
|
||||
{
|
||||
pic_state *pic;
|
||||
struct pic_proc proc;
|
||||
struct pic_code *code;
|
||||
pic_value v;
|
||||
|
||||
pic = pic_open();
|
||||
|
||||
proc.u.code = code = (struct pic_code *)malloc(sizeof(struct pic_code) * 256);
|
||||
code[0].insn = OP_PUSHI;
|
||||
code[0].u.i = 1;
|
||||
code[1].insn = OP_PUSHI;
|
||||
code[1].u.i = 2;
|
||||
code[2].insn = OP_ADD;
|
||||
code[3].insn = OP_STOP;
|
||||
|
||||
v = pic_run(pic, &proc, pic_nil_value());
|
||||
|
||||
pic_debug(pic, v);
|
||||
|
||||
pic_close(pic);
|
||||
|
||||
return 0;
|
||||
}
|
||||
#endif
|
||||
|
|
Loading…
Reference in New Issue