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

SCM Repository

[smlnj] Annotation of /sml/branches/SMLNJ/src/cm/main/general-params.sml
ViewVC logotype

Annotation of /sml/branches/SMLNJ/src/cm/main/general-params.sml

Parent Directory Parent Directory | Revision Log Revision Log


Revision 630 - (view) (download)

1 : blume 297 (*
2 :     * "General" parameters that may differ from invocation to invocation of
3 : monnier 630 * CM. The "info" type bundles them up so they can be passed around
4 : blume 297 * more conveniently.
5 :     *
6 :     * (C) 1999 Lucent Technologies, Bell Laboratories
7 :     *
8 :     * Author: Matthias Blume (blume@kurims.kyoto-u.ac.jp)
9 :     *)
10 :     structure GeneralParams = struct
11 :    
12 : monnier 630 type param = { primconf : Primitive.configuration,
13 :     pcmode : PathConfig.mode,
14 :     fnpolicy: FilenamePolicy.policy,
15 :     symval: string -> { get: unit -> int option,
16 :     set: int option -> unit },
17 :     keep_going: bool,
18 :     pervasive: GenericVC.Environment.environment,
19 :     corenv: GenericVC.BareEnvironment.staticEnv,
20 :     pervcorepids: PidSet.set }
21 :    
22 :     type info = { param: param,
23 :     groupreg: GroupReg.groupreg,
24 :     errcons: PrettyPrint.ppconsumer }
25 : blume 297 end

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