This isn't too bad!<br><br>Hey thanks to everyone (Chongkai, Jens, Robby, and Dave) for replying...that's a wealth of information. I've got a lot more reading to do!!!<br><br>Mike<br><br><div><span class="gmail_quote">
On 10/26/07, <b class="gmail_sendername">Dave Gurnell</b> <<a href="mailto:d.j.gurnell@gmail.com">d.j.gurnell@gmail.com</a>> wrote:</span><blockquote class="gmail_quote" style="border-left: 1px solid rgb(204, 204, 204); margin: 0pt 0pt 0pt 0.8ex; padding-left: 1ex;">
I don't know if this helps: if you're prepared to permanently add<br>(set! x ...) to your code you could do this:<br><br> > (define debug-enabled?<br> (make-parameter #t))<br><br> > (define (debug-hook x)
<br> (if (debug-enabled?)<br> (begin (display "DEBUG> ")<br> (let ([fn (eval (read))])<br> (fn x)))<br> x))<br><br><br><br> > (define (run-test)
<br> (define x 10)<br> (set! x (debug-hook x))<br> (display x)<br> (newline))<br><br> > (run-test)<br><br> DEBUG> (lambda (x) (* x 10))<br> 100<br><br>You could get rid of the set! with a macro, although it would still
<br>be there in reality of course.<br><br>Cheers,<br><br>-- Dave<br><br>_________________________________________________<br> For list-related administrative tasks:<br> <a href="http://list.cs.brown.edu/mailman/listinfo/plt-scheme">
http://list.cs.brown.edu/mailman/listinfo/plt-scheme</a><br></blockquote></div><br><br clear="all"><br>-- <br>Mike J. Bell on gmail