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/util/stdcfg.sml
ViewVC logotype

Annotation of /sml/trunk/src/cm/util/stdcfg.sml

Parent Directory Parent Directory | Revision Log Revision Log


Revision 361 - (view) (download)

1 : blume 354 (*
2 :     * CM parameters that are configurable via shell-environment variables.
3 :     *
4 :     * Copyright (c) 1999 by Lucent Technologies, Bell Laboratories.
5 :     *
6 :     * author: Matthias Blume (blume@cs.princeton.edu)
7 :     *)
8 :     structure StdConfig = struct
9 :     local
10 :     val bool = EnvConfig.new Bool.fromString
11 :     val int = EnvConfig.new Int.fromString
12 : blume 361 val string = EnvConfig.new SOME
13 : blume 354 in
14 :     val verbose = bool ("VERBOSE", true)
15 :     val debug = bool ("DEBUG", false)
16 :     val keep_going = bool ("KEEP_GOING", false)
17 : blume 361 val pathcfgspec = string ("PATHCONFIG", "/usr/lib/smlnj-pathconfig")
18 : blume 354 end
19 :     end
20 : blume 361

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