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

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

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

revision 631, Fri Apr 28 08:30:52 2000 UTC revision 632, Sat Apr 29 15:50:42 2000 UTC
# Line 21  Line 21 
21      fun cd _ = ()      fun cd _ = ()
22      fun cm _ = ()      fun cm _ = ()
23      fun cmb _ = ()      fun cmb _ = ()
24        fun cmb_new _ = ()
25      fun compile _ = false      fun compile _ = false
26      fun withServers f =      fun withServers f =
27          SafeIO.perform { openIt = fn () => (),          SafeIO.perform { openIt = fn () => (),
28                           closeIt = fn () => (),                           closeIt = fn () => (),
29                           work = f,                           work = f,
30                           cleanup = reset }                           cleanup = reset }
31        fun allIdle () = true
32  end  end

Legend:
Removed from v.631  
changed lines
  Added in v.632

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