From feefa31401e4eccc7fbe2e60fd018e830f019254 Mon Sep 17 00:00:00 2001 From: Vincent St-Amour Date: Thu, 1 Sep 2011 18:31:17 -0400 Subject: [PATCH] Change the logging level for the optimizer logs. --- collects/typed-scheme/optimizer/logging.rkt | 4 ++-- collects/typed-scheme/scribblings/guide/optimization.scrbl | 4 ++-- 2 files changed, 4 insertions(+), 4 deletions(-) diff --git a/collects/typed-scheme/optimizer/logging.rkt b/collects/typed-scheme/optimizer/logging.rkt index 06f26eb18b..e8e7b29a02 100644 --- a/collects/typed-scheme/optimizer/logging.rkt +++ b/collects/typed-scheme/optimizer/logging.rkt @@ -214,7 +214,7 @@ (define logger (current-logger)) (add-missed-opts-to-log) (for ([x (sort-log)]) - (log-message logger 'warning + (log-message logger 'debug (format-log-entry x) (cons optimization-log-key x)))) @@ -232,7 +232,7 @@ ;; only intercepts TR log messages (define (with-intercepted-tr-logging interceptor thunk) (with-intercepted-logging - #:level 'warning + #:level 'debug (lambda (l) ;; look only for optimizer messages (when (log-message-from-tr-opt? l) (interceptor l))) diff --git a/collects/typed-scheme/scribblings/guide/optimization.scrbl b/collects/typed-scheme/scribblings/guide/optimization.scrbl index bcf017696b..5a49236347 100644 --- a/collects/typed-scheme/scribblings/guide/optimization.scrbl +++ b/collects/typed-scheme/scribblings/guide/optimization.scrbl @@ -181,8 +181,8 @@ can as a starting point for performance debugging. Similar information (albeit without in-depth explanations or advice) is available from the command line. When compiling a Typed Racket program, setting the racket @seclink[#:doc '(lib "scribblings/reference/reference.scrbl") -"logging"]{logging} facilities to the @racket['warning] level causes Typed +"logging"]{logging} facilities to the @racket['debug] level causes Typed Racket to display performance debugging information. Setting the Racket logging level can be done on the command line with the @racket[-W] flag: -@commandline{racket -W warning my-typed-program.rkt} +@commandline{racket -W debug my-typed-program.rkt}