diff options
| author | Graydon Hoare <[email protected]> | 2010-07-27 19:21:51 -0700 |
|---|---|---|
| committer | Graydon Hoare <[email protected]> | 2010-07-27 19:21:51 -0700 |
| commit | 80307576245aabf00285db020bbfbc4c3a891766 (patch) | |
| tree | 7e408956ca3e895844dd30a1afddf64d83157da0 /src/boot/driver | |
| parent | Calm some LLVM indigestion of last change. (diff) | |
| download | rust-80307576245aabf00285db020bbfbc4c3a891766.tar.xz rust-80307576245aabf00285db020bbfbc4c3a891766.zip | |
Switch machine-type lexemes to use suffixes. Remove support for foo(bar) as a cast notation. Closes #129.
Diffstat (limited to 'src/boot/driver')
| -rw-r--r-- | src/boot/driver/main.ml | 1 | ||||
| -rw-r--r-- | src/boot/driver/session.ml | 3 |
2 files changed, 3 insertions, 1 deletions
diff --git a/src/boot/driver/main.ml b/src/boot/driver/main.ml index b9045485..9af7ee0b 100644 --- a/src/boot/driver/main.ml +++ b/src/boot/driver/main.ml @@ -50,6 +50,7 @@ let (sess:Session.sess) = Session.sess_log_obj = false; Session.sess_log_lib = false; Session.sess_log_out = stdout; + Session.sess_log_err = stderr; Session.sess_trace_block = false; Session.sess_trace_drop = false; Session.sess_trace_tag = false; diff --git a/src/boot/driver/session.ml b/src/boot/driver/session.ml index 210dd7be..d9e57b02 100644 --- a/src/boot/driver/session.ml +++ b/src/boot/driver/session.ml @@ -32,6 +32,7 @@ type sess = mutable sess_log_obj: bool; mutable sess_log_lib: bool; mutable sess_log_out: out_channel; + mutable sess_log_err: out_channel; mutable sess_trace_block: bool; mutable sess_trace_drop: bool; mutable sess_trace_tag: bool; @@ -79,7 +80,7 @@ let log name flag chan = let fail sess = sess.sess_failed <- true; - Printf.fprintf sess.sess_log_out + Printf.fprintf sess.sess_log_err ;; |