X-Git-Url: http://deadsoftware.ru/gitweb?p=dsw-obn.git;a=blobdiff_plain;f=src%2Foberon.c;h=83f39cd2cebea39ac30fd54f1125ba11151bb045;hp=f6bd09e68cc85998290d4ed9fd8c94f3b5c2d6d1;hb=0b724e12457f2507d398c51dc35200d833ce9362;hpb=b8aa586c95fd8ca29c6142ce3345b7582e6b7072

diff --git a/src/oberon.c b/src/oberon.c
index f6bd09e..83f39cd 100644
--- a/src/oberon.c
+++ b/src/oberon.c
@@ -3495,7 +3495,7 @@ oberon_statement(oberon_context_t * ctx)
 			oberon_error(ctx, "condition must be boolean");
 		}
 
-		oberon_generate_branch(ctx, cond, true, begin);
+		oberon_generate_branch(ctx, cond, false, begin);
 	}
 	else if(ctx -> token == FOR)
 	{