Diff of /sml/trunk/src/compiler/FLINT/opt/fixfix.sml

Parent Directory | Revision Log | Patch

	revision 163, Thu Oct 29 21:00:27 1998 UTC	revision 164, Sat Oct 31 01:03:30 1998 UTC
#	Line 99	Line 99
99	end	end
100	else	else
101	(* this "never" occurs, but dead-code removal is not bullet-proof *)	(* this "never" occurs, but dead-code removal is not bullet-proof *)
102	([(fk,f,args)], body)	([], le)
103	| curry first le = ([], le)	| curry first le = ([], le)
104
105	(* do the actual uncurrying *)	(* do the actual uncurrying *)

---

Colored Diff Long Colored Diff Unidiff Context Diff Side by Side

Legend: Removed from v.163   changed lines   Added in v.164

---

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