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

Diff of /sml/trunk/src/cm/link.sml

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

revision 319, Mon Jun 7 22:47:00 1999 UTC revision 320, Tue Jun 8 07:42:11 1999 UTC
# Line 83  Line 83 
83             else Say.say ("$Execute: required privileges are:\n" ::             else Say.say ("$Execute: required privileges are:\n" ::
84                       map (fn s => ("  " ^ s ^ "\n")) (StringSet.listItems rq));                       map (fn s => ("  " ^ s ^ "\n")) (StringSet.listItems rq));
85             ExecTraversal.group gp g             ExecTraversal.group gp g
86             before FullPersstate.rememberShared ())             before FullPersstate.rememberShared gp)
87    
88        fun recomp_runner gp g = isSome (RecompTraversal.group gp g)        fun recomp_runner gp g = isSome (RecompTraversal.group gp g)
89    

Legend:
Removed from v.319  
changed lines
  Added in v.320

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