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/trunk/src/cm/main/general-params.sml
ViewVC logotype

Annotation of /sml/trunk/src/cm/main/general-params.sml

Parent Directory Parent Directory | Revision Log Revision Log


Revision 587 - (view) (download)

1 : blume 297 (*
2 :     * "General" parameters that may differ from invocation to invocation of
3 : blume 309 * 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 : blume 537 type param = { pcmode : PathConfig.mode,
13 : blume 299 fnpolicy: FilenamePolicy.policy,
14 : blume 433 symval: string -> { get: unit -> int option,
15 :     set: int option -> unit },
16 : blume 299 keep_going: bool,
17 : blume 587 corenv: GenericVC.Environment.environment }
18 : blume 299
19 : blume 309 type info = { param: param,
20 :     groupreg: GroupReg.groupreg,
21 :     errcons: PrettyPrint.ppconsumer }
22 : blume 297 end

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