REPEAT . . . UNTIL loop problem

[cahlucas]

(02-14-2021 01:24 AM)toml_12953 Wrote:  This works for me. Are you sure you have exit:=1 in a proper conditional?

Code:


EXPORT TESTEX()
BEGIN

LOCAL y:=0,exit:=0;

REPEAT
  print(y);
  y:=y+1;
  IF y==7 THEN
    exit:=1;
  END;  // If you leave this out, you'll get an error on the UNTIL statement.
UNTIL exit==1;

END;

Dear Tom L.,
Yes, I have the command 'exit:=1;' placed in a correct conditional. The error this thread is about has only recently occurred, before that, the program worked fine. Sincerely, Karel.