use_file: added ``tune'' argument;
authorwenzelm
Sun Sep 16 20:25:43 2007 +0200 (2007-09-16)
changeset 2460598689b0e5956
parent 24604 d5c5d2e13fbf
child 24606 7acbb982fc77
use_file: added ``tune'' argument;
src/Pure/ML-Systems/polyml-5.0.ML
     1.1 --- a/src/Pure/ML-Systems/polyml-5.0.ML	Sun Sep 16 15:36:57 2007 +0200
     1.2 +++ b/src/Pure/ML-Systems/polyml-5.0.ML	Sun Sep 16 20:25:43 2007 +0200
     1.3 @@ -34,8 +34,8 @@
     1.4      if verbose then print (output ()) else ()
     1.5    end;
     1.6  
     1.7 -fun use_file output verbose name =
     1.8 +fun use_file tune output verbose name =
     1.9    let
    1.10      val instream = TextIO.openIn name;
    1.11      val txt = TextIO.inputAll instream before TextIO.closeIn instream;
    1.12 -  in use_text name output verbose txt end;
    1.13 +  in use_text tune name output verbose txt end;