Home My Page Projects Code Snippets Project Openings SML/NJ
Summary Activity Forums Tracker Lists Tasks Docs Surveys News SCM Files

SCM Repository

[smlnj] View of /sml/trunk/compiler/Elaborator/elaborate/specialsyms.sml
ViewVC logotype

View of /sml/trunk/compiler/Elaborator/elaborate/specialsyms.sml

Parent Directory Parent Directory | Revision Log Revision Log


Revision 2162 - (download) (annotate)
Thu Nov 2 21:20:47 2006 UTC (13 years, 8 months ago) by blume
File size: 598 byte(s)
eliminated src dir
(* specialsyms.sml
 *
 * (C) 2001 Lucent Technologies, Bell Labs
 *)
structure SpecialSymbols = struct
  local
    structure S = Symbol
  in
    val paramId = S.strSymbol "<param>"
    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>"
    val internalVarId = S.varSymbol "<InternalVar>"
  end
end

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