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/src/compiler/CodeGen/cpscompile/cpsRegions.sml
ViewVC logotype

View of /sml/trunk/src/compiler/CodeGen/cpscompile/cpsRegions.sml

Parent Directory Parent Directory | Revision Log Revision Log


Revision 412 - (download) (annotate)
Fri Sep 3 00:25:03 1999 UTC (20 years, 9 months ago) by monnier
File size: 477 byte(s)
This commit was generated by cvs2svn to compensate for changes in r411,
which included commits to RCS files with non-trunk default branches.
structure CPSRegions : CPS_REGION = 
struct
  structure PT = PointsTo

  type region = PT.loc

  val memory     = ref(PT.NAMED("rw",ref(PT.TOP 128)))
  val readonly   = ref(PT.NAMED("ro",ref(PT.TOP 129)))
  val stack      = ref(PT.NAMED("stack",ref(PT.TOP 130)))
  val spill      = ref(PT.NAMED("spill",ref(PT.TOP 131)))
  val real       = ref(PT.NAMED("real",ref(PT.TOP 132)))
  val storelist  = ref(PT.NAMED("storelist",ref(PT.TOP 133)))

  val toString   = PT.toString

end

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