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/cm/compile/dummy-servers.sml
ViewVC logotype

Diff of /sml/trunk/src/cm/compile/dummy-servers.sml

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

revision 448, Thu Oct 21 09:20:16 1999 UTC revision 449, Fri Oct 22 07:35:29 1999 UTC
# Line 1  Line 1 
1    (*
2     * Handling compile-servers under non-Unix systems.
3     *
4     *  This is just a placeholder that disables parallel make on non-supported
5     *  systems.
6     *
7     * (C) 1999 Lucent Technologies, Bell Laboratories
8     *
9     * Author: Matthias Blume (blume@kurims.kyoto-u.ac.jp)
10     *)
11  structure Servers :> SERVERS = struct  structure Servers :> SERVERS = struct
12      fun add _ = raise Fail "compute servers not available"      fun start _ = raise Fail "compile server facility not available"
13      fun start _ = ()      fun stop _ = false
14        fun kill _ = ()
15        fun waitforall () = ()
16        fun cm _ = ()
17        fun cmb _ = ()
18      fun compile _ = false      fun compile _ = false
19        fun disable () = ()
20        fun enable () = ()
21  end  end

Legend:
Removed from v.448  
changed lines
  Added in v.449

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