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/OldCGen/cpsgen/generic.sml
ViewVC logotype

Diff of /sml/trunk/src/compiler/OldCGen/cpsgen/generic.sml

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

revision 17, Wed Mar 11 21:00:18 1998 UTC revision 45, Sun Mar 22 20:11:09 1998 UTC
# Line 1  Line 1 
1  (* Copyright 1996 by Bell Laboratories *)  (* Copyright 1996 by Bell Laboratories *)
2  (* generic.sml *)  (* generic.sml *)
3    
 signature CPSGEN = sig  
   structure MachSpec : MACH_SPEC  
   val codegen : CPS.function list * (CPS.lvar -> (int * int))  
                 * ErrorMsg.complainer -> unit  
 end (* signature CPSGEN *)  
   
4  functor CPSgen(structure M: CMACHINE  functor CPSgen(structure M: CMACHINE
5                 structure MachSpec : MACH_SPEC) : CPSGEN =                 structure MachSpec : MACH_SPEC) : CPSGEN =
6  struct  struct

Legend:
Removed from v.17  
changed lines
  Added in v.45

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