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/session.ml | |
| 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/session.ml')
| -rw-r--r-- | src/boot/driver/session.ml | 3 |
1 files changed, 2 insertions, 1 deletions
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 ;; |