1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-05-15 10:10:21 +02:00
guile/module/system/repl
Andy Wingo 581a4eb82b frame-instruction-pointer is absolute; rewrite (system vm coverage)
* libguile/frames.c (scm_frame_source): Instead of assuming that
  scm_frame_procedure is correct, use the IP to get the source.
  (scm_frame_instruction_pointer): Return an absolute value instead of
  assuming that slot 0 is correct.  (It isn't, when preparing for a tail
  call.)

* libguile/programs.h:
* libguile/programs.c (scm_find_source_for_addr): New internal helper.

* module/system/repl/debug.scm (print-registers): Readably print
  absolute instruction pointers.

* module/system/vm/coverage.scm: Complete rewrite to use absolute IP's.
  We can't assume that frame-procedure is cheap if it is correct, or
  correct if it is cheap.  Anyway using the address is better anyway.
  (coverage-data->lcov): Disable per-function info temporarily.
  (loaded-modules, module-procedures, closest-source-line)
  (closed-over-procedures): Remove these.  Instead of going from
  procedures to source info, now we go from ELF image to source info.

* module/system/vm/debug.scm (debug-context-length): New interface.

* module/system/vm/program.scm (source-for-addr): New internal helper.
2013-11-07 23:03:45 +01:00
..
command.scm Program sources are always pre-retire now 2013-11-07 18:00:40 +01:00
common.scm Default to compiling to RTL 2013-10-31 14:17:30 +01:00
debug.scm frame-instruction-pointer is absolute; rewrite (system vm coverage) 2013-11-07 23:03:45 +01:00
describe.scm Use 'substring' instead of obsoleted 'make-shared-substring' 2011-02-02 05:45:37 -08:00
error-handling.scm Program sources are always pre-retire now 2013-11-07 18:00:40 +01:00
repl.scm Consume a peeked EOF at the REPL. 2013-04-08 08:44:02 -04:00
server.scm ignore SIGPIPE in (system repl server) 2011-04-11 10:13:48 +02:00