Diff of /branches/vis12/src/compiler/simplify/lift.sml

Parent Directory | Revision Log | Patch

	revision 1925, Sat Jun 23 14:16:09 2012 UTC	revision 1926, Sat Jun 23 18:01:57 2012 UTC
#	Line 66	Line 66
66	in	in
67	case e	case e
68	of S.E_Apply(f, _, xs, _) =>	of S.E_Apply(f, _, xs, _) =>
69	if Var.same(f, BV.fn_load)	if Var.same(f, BV.fn_image) orelse Var.same(f, BV.fn_load)
70	then (env, mkStatic(env, statics, x))	then (env, mkStatic(env, statics, x))
71	else (env, statics)	else (env, statics)
72	| _ => (env, statics)	| _ => (env, statics)

---

Colored Diff Long Colored Diff Unidiff Context Diff Side by Side

Legend: Removed from v.1925   changed lines   Added in v.1926

---

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