Remove profiling code, which doesn't appear to work anyway.

This commit is contained in:
Jesse D. McDonald 2011-04-27 13:50:46 -05:00
parent 9fbd3d0212
commit c3a4a0fc57
1 changed files with 0 additions and 4 deletions

View File

@ -10,8 +10,6 @@
(require (file "libcompiler/simplifier.scm")) (require (file "libcompiler/simplifier.scm"))
(require (file "libcompiler/writer.scm")) (require (file "libcompiler/writer.scm"))
;(require profile)
;(profile (begin
(define simplify-code? (make-parameter #t)) (define simplify-code? (make-parameter #t))
(define reduce-code? (make-parameter #t)) (define reduce-code? (make-parameter #t))
(define map-bytecode? (make-parameter #t)) (define map-bytecode? (make-parameter #t))
@ -64,6 +62,4 @@
(pretty-print (simplify-lambda source-module))] (pretty-print (simplify-lambda source-module))]
[else [else
(pretty-print source-module)]) (pretty-print source-module)])
;) #:delay 0.002)
; vim:set sw=2 expandtab: ; vim:set sw=2 expandtab: