In revision 188, I improved my profiler's recording of source-code.
Now, for the example I previously showed, instead of:
On Thu, 2009-09-17 at 04:10 -0700, Derick Eddington wrote:
> =================================================================
> Profile for:
> (case-lambda
> (() (values (fib 15) 'another))
> ((n) (if (<= n 1) 1 (+ (fib (- n 1)) (fib (- n 2))))))
> Statistics:
> [...]
> =================================================================
You get:
=================================================================
Profile for:
(define fib
(case-lambda
(() (values (fib 15) 'another))
((n) (if (<= n 1) 1 (+ (fib (- n 1)) (fib (- n 2)))))))
Statistics:
[...]
=================================================================
--
: Derick
----------------------------------------------------------------
