Diff of /sml/trunk/src/compiler/Semant/elaborate/elabmod.sml

Parent Directory | Revision Log | Patch

	revision 674, Thu Jun 22 06:45:00 2000 UTC	revision 675, Fri Jun 23 09:18:18 2000 UTC
#	Line 98	Line 98
98	fun localEntDec(d1, d2) = seqEntDec [d1, d2]	fun localEntDec(d1, d2) = seqEntDec [d1, d2]
99
100	(* special symbols *)	(* special symbols *)
101	val paramId = S.strSymbol "<param>"	open SpecialSymbols
	val functorId = S.fctSymbol "<functor>"
	val hiddenId = S.strSymbol "<hidden>"
	val tempStrId = S.strSymbol "<tempStr>"
	val tempFctId = S.fctSymbol "<tempFct>"
	val fctbodyId = S.strSymbol "<fctbody>"
	val anonfsigId = S.fsigSymbol "<anonfsig>"
	val resultId = S.strSymbol "<resultStr>"
	val returnId = S.strSymbol "<returnStr>"
102
103	fun stripMarkSigb(MarkSigb(sigb',region'),region) =	fun stripMarkSigb(MarkSigb(sigb',region'),region) =
104	stripMarkSigb(sigb',region')	stripMarkSigb(sigb',region')

---

Colored Diff Long Colored Diff Unidiff Context Diff Side by Side

Legend: Removed from v.674   changed lines   Added in v.675

---

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