mirror of
https://github.com/ProgramSnail/Lama.git
synced 2025-12-06 06:48:48 +00:00
Added test for .string
This commit is contained in:
parent
3cd95f8b5f
commit
06d05b1506
5 changed files with 65 additions and 7 deletions
|
|
@ -121,12 +121,14 @@ static void printValue (void *p) {
|
|||
|
||||
case SEXP_TAG:
|
||||
printStringBuf ("`%s", de_hash (TO_SEXP(p)->tag));
|
||||
printStringBuf (" (");
|
||||
for (int i = 0; i < LEN(a->tag); i++) {
|
||||
printValue ((void*)((int*) a->contents)[i]);
|
||||
if (i != LEN(a->tag) - 1) printStringBuf (", ");
|
||||
if (LEN(a->tag)) {
|
||||
printStringBuf (" (");
|
||||
for (int i = 0; i < LEN(a->tag); i++) {
|
||||
printValue ((void*)((int*) a->contents)[i]);
|
||||
if (i != LEN(a->tag) - 1) printStringBuf (", ");
|
||||
}
|
||||
printStringBuf (")");
|
||||
}
|
||||
printStringBuf (")");
|
||||
break;
|
||||
|
||||
default:
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue