aboutsummaryrefslogtreecommitdiff
path: root/src/boot/me/layout.ml
diff options
context:
space:
mode:
authorGraydon Hoare <[email protected]>2010-10-08 14:54:51 -0700
committerGraydon Hoare <[email protected]>2010-10-08 14:54:51 -0700
commit5f2459145cb90d7d52cfde1d4ed7719dde1dfdc0 (patch)
tree7f2305524744f4b7fb02469f3c9ab0e64b4c9577 /src/boot/me/layout.ml
parentrustc: Make functions output a type, not a slot (diff)
downloadrust-5f2459145cb90d7d52cfde1d4ed7719dde1dfdc0.tar.xz
rust-5f2459145cb90d7d52cfde1d4ed7719dde1dfdc0.zip
Add -lpath mechanism for logging only a subset of a pass (by module-path prefix)
Diffstat (limited to 'src/boot/me/layout.ml')
-rw-r--r--src/boot/me/layout.ml7
1 files changed, 3 insertions, 4 deletions
diff --git a/src/boot/me/layout.ml b/src/boot/me/layout.ml
index 0b994145..870e7a51 100644
--- a/src/boot/me/layout.ml
+++ b/src/boot/me/layout.ml
@@ -2,7 +2,7 @@ open Semant;;
open Common;;
let log cx = Session.log "layout"
- cx.ctxt_sess.Session.sess_log_layout
+ (should_log cx cx.ctxt_sess.Session.sess_log_layout)
cx.ctxt_sess.Session.sess_log_out
;;
@@ -128,7 +128,7 @@ let layout_visitor
in
let iflog thunk =
- if cx.ctxt_sess.Session.sess_log_layout
+ if (should_log cx cx.ctxt_sess.Session.sess_log_layout)
then thunk ()
else ()
in
@@ -453,14 +453,13 @@ let process_crate
(cx:ctxt)
(crate:Ast.crate)
: unit =
- let path = Stack.create () in
let passes =
[|
(layout_visitor cx
Walk.empty_visitor)
|];
in
- run_passes cx "layout" path passes
+ run_passes cx "layout" passes
cx.ctxt_sess.Session.sess_log_layout log crate
;;