*
This commit is contained in:
parent
ce345f2440
commit
1185690ce6
24 changed files with 597 additions and 86 deletions
|
|
@ -10,7 +10,13 @@ V print(O o) {
|
|||
} else if (IMM(o)) {
|
||||
printf("%" PRIdPTR, ORD(o));
|
||||
} else {
|
||||
printf("<obj type=%ld ptr=%p>", type(o), (void *)o);
|
||||
switch (type(o)) {
|
||||
case TYPE_QUOT:
|
||||
printf("<quotation>");
|
||||
break;
|
||||
default:
|
||||
printf("<obj type=%ld ptr=%p>", type(o), (void *)o);
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue