[plt-scheme] Profiling...

At Wed, 14 Jun 2006 14:17:03 +0100, Matt Jadud wrote:
> ==========
> (module foo mzscheme
>    (require (lib "errortrace.ss" "errortrace"))
>    (instrumenting-enabled #t)
>    (profiling-enabled #t)
>    (profiling-record-enabled #t)
>    (profile-paths-enabled #t)

The errortrace module is strange; don't import it into another module.

Instead, move the above lines outside the `module' form, before the
module is loaded. Then, errortrace gets a chance to change the way that
the module is compiled.

Here's a command line using the file content below:

 mzscheme -f pre.ss -t foo.ss -f post.ss


Matthew

----------------------------------------
; pre.ss
(require (lib "errortrace.ss" "errortrace"))
(instrumenting-enabled #t)
(profiling-enabled #t)
(profiling-record-enabled #t)
(profile-paths-enabled #t)

----------------------------------------
; foo.ss
(module foo mzscheme
   ;; Perhaps I might 'require' a module here?

   (define (fact n)
     (if (zero? n)
         1
         (* n (fact (sub1 n)))))

   (fact 5))
----------------------------------------
; post.ss
(output-profile-results #t #t)