new compiler/parser
This commit is contained in:
parent
35bad08a0d
commit
7efa99d064
16 changed files with 419 additions and 302 deletions
|
|
@ -2,9 +2,9 @@
|
|||
|
||||
I type(O o) {
|
||||
if (o == NIL)
|
||||
return TYPE_NIL;
|
||||
return OBJ_NIL;
|
||||
if (IMM(o))
|
||||
return TYPE_NUM;
|
||||
return OBJ_NUM;
|
||||
Hd *h = UNBOX(o);
|
||||
return h->type;
|
||||
}
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue