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/TopLevel/backend/backend-fn.sml
ViewVC logotype

Diff of /sml/trunk/src/compiler/TopLevel/backend/backend-fn.sml

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

revision 1077, Tue Feb 19 15:48:50 2002 UTC revision 1078, Tue Feb 19 21:26:48 2002 UTC
# Line 2  Line 2 
2   *   *
3   * (C) 2001 Lucent Technologies, Bell Labs   * (C) 2001 Lucent Technologies, Bell Labs
4   *)   *)
5  functor BackendFn (M : CODEGENERATOR) : BACKEND = struct  functor BackendFn (structure M : CODEGENERATOR
6                       val cproto_conv : string) : BACKEND = struct
7      structure Interact =      structure Interact =
8      Interact      Interact
9          (EvalLoopF          (EvalLoopF
10               (CompileF               (CompileF
11                    (structure M = M                    (val cproto_conv = cproto_conv
12                       structure M = M
13                     structure CC : CCONFIG = struct                     structure CC : CCONFIG = struct
14                         (* configuration for interactive toplevel:                         (* configuration for interactive toplevel:
15                          * no real pickling/unpickling, pids are                          * no real pickling/unpickling, pids are
# Line 45  Line 47 
47                     end)))                     end)))
48    
49      structure Compile =      structure Compile =
50      CompileF (structure M = M      CompileF (val cproto_conv = cproto_conv
51                  structure M = M
52                structure CC : CCONFIG = struct                structure CC : CCONFIG = struct
53                    (* compiler configuration for batch compilation                    (* compiler configuration for batch compilation
54                     * (under control of CM); real pickling, unpickling, and                     * (under control of CM); real pickling, unpickling, and

Legend:
Removed from v.1077  
changed lines
  Added in v.1078

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