Diff of /trunk/src/compiler/IL/translate-fn.sml

Parent Directory | Revision Log | Patch

	revision 367, Thu Sep 30 21:20:13 2010 UTC	revision 368, Fri Oct 1 18:17:34 2010 UTC
#	Line 125	Line 125
125
126	fun translate (vMap, stm) = let	fun translate (vMap, stm) = let
127	val env = E{	val env = E{
128	ndMap = Stamp.Tbl.mkTable (256, raise Fail "ndMap"),	ndMap = Stamp.Tbl.mkTable (256, Fail "ndMap"),
129	vMap = vMap	vMap = vMap
130	}	}
131	val _ = translateNodes (env, stm)	val _ = translateNodes (env, stm)

---

Colored Diff Long Colored Diff Unidiff Context Diff Side by Side

Legend: Removed from v.367   changed lines   Added in v.368

---

root@smlnj-gforge.cs.uchicago.edu	ViewVC Help
Powered by ViewVC 1.0.0