~ chicken-core (chicken-5) d77006123add139c68b14f577be235091dc1221e

commit d77006123add139c68b14f577be235091dc1221e
Author:     felix <felix@call-with-current-continuation.org>
AuthorDate: Thu May 20 15:15:00 2010 +0200
Commit:     felix <felix@call-with-current-continuation.org>
CommitDate: Thu May 20 15:15:00 2010 +0200

    -d2 enables scrutiny

diff --git a/chicken.scm b/chicken.scm
index 2daa54f2..961516a0 100644
--- a/chicken.scm
+++ b/chicken.scm
@@ -106,7 +106,7 @@
 		 (case level
 		   ((0) (set! options (cons* 'no-lambda-info 'no-trace options)))
 		   ((1) (set! options (cons 'no-trace options)))
-		   ((2) #f)
+		   ((2) (set! options (cons 'scrutinize options)))
 		   (else (compiler-warning 'usage "invalid debug level ~S - ignored" (car rest))) )
 		 (loop (cdr rest)) ) )
 	      ((memq o valid-compiler-options) (loop rest))
diff --git a/manual/Using the compiler b/manual/Using the compiler
index 5f9d2ebd..ab32feab 100644
--- a/manual/Using the compiler	
+++ b/manual/Using the compiler	
@@ -72,7 +72,7 @@ Possible options are:
 
      -debug-level 0             is equivalent to -no-trace -no-lambda-info
      -debug-level 1             is equivalent to -no-trace
-     -debug-level 2             does nothing (the default)
+     -debug-level 2             is equivalent to -scrutinize
 
 ; -disable-interrupts : Equivalent to the {{(disable-interrupts)}} declaration. No interrupt-checks are generated for compiled programs.