X-Git-Url: http://deadsoftware.ru/gitweb?p=dsw-obn.git;a=blobdiff_plain;f=src%2Ftest.c;h=059af717a19c98da40c7ebade7168065ce8a2f9c;hp=549e5eaa69e890f6c70b2c053474152028f2f571;hb=a4fb30372d14e8415e2f9b8e647c20daeab59d7d;hpb=cbfeec1f4192adbd7adb494ef79447366f051c20 diff --git a/src/test.c b/src/test.c index 549e5ea..059af71 100644 --- a/src/test.c +++ b/src/test.c @@ -15,10 +15,10 @@ static char source_test[] = "BEGIN" " i := 0;" " Out.Open();" - " WHILE i < 4 DO" + " REPEAT" " Out.String('Count '); Out.Int(i, 0); Out.Ln;" " i := i + 1;" - " END;" + " UNTIL i < 4;" " Out.String('end'); Out.Ln;" "END Test." ;