Begin translation module

[tiger.ml.git] / compiler / testcases / test12.tig

/* valid for and let */

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