SCM Repository
Diff of /sml/trunk/src/compiler/FLINT/opt/recover.sml
Parent Directory
| 
Revision Log
| 
Patch
| revision 212, Fri Jan 15 16:19:21 1999 UTC | revision 213, Fri Jan 15 21:18:35 1999 UTC | |
|---|---|---|
| # | Line 143 | Line 143 |
| 143 | in {getLty=getlty, cleanUp=fn () => Intmap.clear zz} | in {getLty=getlty, cleanUp=fn () => Intmap.clear zz} |
| 144 | end (* function recover *) | end (* function recover *) |
| 145 | ||
| val recover = Stats.doPhase (Stats.makePhase "Compiler 050 recover") recover | ||
| 146 | end (* local *) | end (* local *) |
| 147 | end (* structure Recover *) | end (* structure Recover *) |
| 148 | ||
| 149 | (* | |
| 150 | * $Log$ | |
| 151 | *) |
|
||||||||
| root@smlnj-gforge.cs.uchicago.edu | ViewVC Help |
| Powered by ViewVC 1.0.0 |
