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

Diff of /sml/trunk/src/cm/paths/abspath.sml

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

revision 309, Wed Jun 2 03:21:57 1999 UTC revision 310, Wed Jun 2 07:28:27 1999 UTC
# Line 319  Line 319 
319                  end                  end
320              fun makedirs dir = generic (F.mkDir, makedirs, dir)              fun makedirs dir = generic (F.mkDir, makedirs, dir)
321              fun advertisemakedirs dir =              fun advertisemakedirs dir =
322                  (Say.vsay (concat ["[creating directory ", dir, " ...]\n"]);                  (Say.vsay ["[creating directory ", dir, " ...]\n"];
323                   makedirs dir)                   makedirs dir)
324          in          in
325              generic (fileopener, advertisemakedirs, p)              generic (fileopener, advertisemakedirs, p)

Legend:
Removed from v.309  
changed lines
  Added in v.310

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