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

SCM Repository

[smlnj] Diff of /sml/trunk/src/compiler/FLINT/cpsopt/cpsopt.sml
ViewVC logotype

Diff of /sml/trunk/src/compiler/FLINT/cpsopt/cpsopt.sml

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 732, Mon Nov 13 21:59:12 2000 UTC revision 733, Fri Nov 17 05:13:45 2000 UTC
# Line 19  Line 19 
19    
20  (** obsolete table: used by cpsopt as a dummy template *)  (** obsolete table: used by cpsopt as a dummy template *)
21  exception ZZZ  exception ZZZ
22  val dummyTable : FLINT.lty Intmap.intmap = Intmap.new(32, ZZZ)  val dummyTable : FLINT.lty IntHashTable.hash_table =
23        IntHashTable.mkTable(32, ZZZ)
24    
25  (** the main function reduce *)  (** the main function reduce *)
26  fun reduce (function, _, afterClosure) =  fun reduce (function, _, afterClosure) =

Legend:
Removed from v.732  
changed lines
  Added in v.733

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