Diff of /sml/trunk/src/compiler/FLINT/lsplit/ls-inline.sml

Parent Directory | Revision Log | Patch

	revision 149, Sun Oct 11 17:44:55 1998 UTC	revision 150, Sun Oct 11 17:45:33 1998 UTC
#	Line 100	Line 100
100	fun inline args = let	fun inline args = let
101	val (e, i) = inline0 args	val (e, i) = inline0 args
102	in	in
103	(LContract.lcontract e, i)	((* LContract.lcontract *) e, i)
104	end	end
105	end	end

---

Colored Diff Long Colored Diff Unidiff Context Diff Side by Side

Legend: Removed from v.149   changed lines   Added in v.150

---

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