mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-06-17 09:10:22 +02:00
Code Activity

add fold-all-debug-contexts, fold-source-locations

Browse source 
* module/system/vm/objcode.scm:
* libguile/objcodes.c (scm_all_mapped_elf_images): New proc.

* module/system/vm/debug.scm (fold-all-debug-contexts):
  (fold-source-locations): New public interfaces.
This commit is contained in:
Andy Wingo 2013-11-07 17:53:04 +01:00
parent 4b8d21c17c
commit 0128bb9c38
3 changed files with 68 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

2
module/system/vm/objcode.scm
View file

@ -23,7 +23,7 @@
bytecode->objcode objcode->bytecode
load-thunk-from-file load-thunk-from-memory
word-size byte-order
find-mapped-elf-image))
find-mapped-elf-image all-mapped-elf-images))
(load-extension (string-append "libguile-" (effective-version))
"scm_init_objcodes")