display: return #t/#f

Sigrid Haflínudóttir committed 6 years ago

Commit 52bc4061 parent 47459121 file · +3 −2Browse files

Unified · Split

aa.c+3−2

@@ -904,8 +904,9 @@ eval(aaContext ctx, aaObject obj, aaObject env, aaObject *newenv) · 903 unmodified lines
904	904	break;
905	905
906	906	case P_DISPLAY:
907		− while(!ISNULL(arg))
908		− Bprint(&ctx->fd[1], "%ß%c", evalarg(), ISNULL(arg) ? 0 : ' ');
	907	+ for(i = 0; i >= 0 && !ISNULL(arg);)
	908	+ i = Bprint(&ctx->fd[1], "%ß%c", evalarg(), ISNULL(arg) ? 0 : ' ');
	909	+ res = aa_bool(ctx, i >= 0);
909	910	break;
910	911
911	912	case P_EQN: numcmpop(==); break;