summaryrefslogtreecommitdiff
path: root/module/system/vm/objcode.scm
diff options
context:
space:
mode:
authorAndy Wingo <wingo@pobox.com>2013-04-28 14:42:01 +0200
committerAndy Wingo <wingo@pobox.com>2013-05-23 14:21:06 +0200
commitfb9600debcb3c754a312818101d8186f2e987d06 (patch)
treedf171e7b118fa8f6fc8b6a2ba4b8e103c590450c /module/system/vm/objcode.scm
parente1aee492d7e419b590d627bd70459b90700187ae (diff)
downloadguile-fb9600debcb3c754a312818101d8186f2e987d06.tar.gz
add (find-mapped-elf-image) procedure to (system vm objcode) module
* libguile/objcodes.c (register_elf, scm_find_mapped_elf_image): New interfaces that keep a list of all ELF mappings. Exported from the (system vm objcode) module. * module/system/vm/objcode.scm: Export find-mapped-elf-image.
Diffstat (limited to 'module/system/vm/objcode.scm')
-rw-r--r--module/system/vm/objcode.scm5
1 files changed, 3 insertions, 2 deletions
diff --git a/module/system/vm/objcode.scm b/module/system/vm/objcode.scm
index f939a5551..e2a93d791 100644
--- a/module/system/vm/objcode.scm
+++ b/module/system/vm/objcode.scm
@@ -1,6 +1,6 @@
;;; Guile VM object code
-;; Copyright (C) 2001, 2010, 2012 Free Software Foundation, Inc.
+;; Copyright (C) 2001, 2010, 2012, 2013 Free Software Foundation, Inc.
;;; This library is free software; you can redistribute it and/or
;;; modify it under the terms of the GNU Lesser General Public
@@ -22,7 +22,8 @@
#:export (objcode? objcode-meta
bytecode->objcode objcode->bytecode
load-thunk-from-file load-thunk-from-memory
- word-size byte-order))
+ word-size byte-order
+ find-mapped-elf-image))
(load-extension (string-append "libguile-" (effective-version))
"scm_init_objcodes")