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