modern-compiler-ml/tiger/testcases/test12.tig

8 lines
80 B
Text
Raw Normal View History

/* valid for and let */
let
var a:= 0
in
for i:=0 to 100 do (a:=a+1;())
end