add repl ,tracepoint command
authorAndy Wingo <wingo@pobox.com>
Thu, 23 Sep 2010 11:47:03 +0000 (13:47 +0200)
committerAndy Wingo <wingo@pobox.com>
Thu, 23 Sep 2010 11:47:03 +0000 (13:47 +0200)
commit25361a80fe3c78456e22a5fb0139d7207d472050
tree5e0a41ac21f674f5b26f6b1434cfb2734e4ab042
parentb0e556d4d0d9fc6b33952f965697e370d3d4fbef
add repl ,tracepoint command

* module/system/vm/trace.scm (print-return, print-application)
  (frame-return-values): Factored out of other things.
  (trace-calls-to-procedure): New proc, installs a trap tracing only
  calls to the given proc.
  (trace-calls-in-procedure): Refactor a bit.

* module/system/vm/trap-state.scm (add-trace-at-procedure-call!): New
  proc.

* module/system/repl/command.scm (tracepoint): New command, installs a
  tracepoint on a procedure.
module/system/repl/command.scm
module/system/vm/trace.scm
module/system/vm/trap-state.scm