2
0
Эх сурвалжийг харах

removed redundant branches

git-svn-id: https://svn.inf.ethz.ch/svn/lecturers/a2/trunk@8392 8c9fc860-2736-0410-a75d-ab315db34111
felixf 6 жил өмнө
parent
commit
5cb9489c65

+ 1 - 0
source/FoxIntermediateBackend.Mod

@@ -2098,6 +2098,7 @@ TYPE
 				END;
 				END;
 			|SyntaxTree.BooleanValue DO
 			|SyntaxTree.BooleanValue DO
 				IF reason = x.value THEN BrL(label) END;
 				IF reason = x.value THEN BrL(label) END;
+				RETURN;
 			ELSE (* with *)
 			ELSE (* with *)
 			END;
 			END;
 			(* default case: evaluate and compare result *)
 			(* default case: evaluate and compare result *)