Permalink
Browse files

Rename 'main' to 't_main' for compatability with the runtime.

  • Loading branch information...
1 parent 26b01cf commit 6b6cbf8185466a318106ab1ede7ffacf42644c60 @datkin datkin committed Apr 27, 2010
Showing with 1 addition and 1 deletion.
  1. +1 −1 semant.sml
View
@@ -477,7 +477,7 @@ and transExp (venv, tenv, level, bp, exp) =
fun transProg exp =
let
- val mainLevel = Translate.newLevel {name=Temp.namedLabel "main", parent=Translate.outermost, formals=[]}
+ val mainLevel = Translate.newLevel {name=Temp.namedLabel "t_main", parent=Translate.outermost, formals=[]}
val {exp, ty} = transExp (Env.base_venv,
Env.base_tenv,
mainLevel,

0 comments on commit 6b6cbf8

Please sign in to comment.