X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=src%2Flanguage%2Fcontrol%2Floop.c;h=bfd364ccd1085a8d5874c6b018cfd2ded31fc4f8;hb=b1fc57ddc57637e5c8bb87b478cbe585b6b4cf84;hp=e4877b9e82cd126a90d9936953760df456d6f66d;hpb=681bd9eab15d80bf2e424033a249f54548b342f4;p=pspp diff --git a/src/language/control/loop.c b/src/language/control/loop.c index e4877b9e82..bfd364ccd1 100644 --- a/src/language/control/loop.c +++ b/src/language/control/loop.c @@ -61,7 +61,7 @@ struct loop_trns /* Iteration limit. */ int max_pass_count; /* Maximum number of passes (-1=unlimited). */ - int pass; /* Number of passes thru the loop so far. */ + int pass; /* Number of passes through the loop so far. */ /* a=a TO b [BY c]. */ struct variable *index_var; /* Index variable. */ @@ -177,10 +177,7 @@ close_loop (void *loop_) /* If there's nothing else limiting the number of loops, use MXLOOPS as a limit. */ - if (loop->max_pass_count == -1 - && loop->index_var == NULL - && loop->loop_condition == NULL - && loop->end_loop_condition == NULL) + if (loop->max_pass_count == -1 && loop->index_var == NULL) loop->max_pass_count = settings_get_mxloops (); } @@ -261,7 +258,7 @@ parse_index_clause (struct dataset *ds, struct lexer *lexer, } if (loop->last_expr == NULL) { - lex_sbc_missing (lexer, "TO"); + lex_sbc_missing ("TO"); return false; } if (loop->by_expr == NULL)