summaryrefslogtreecommitdiff
path: root/module/system/repl/command.scm
diff options
context:
space:
mode:
authorAndy Wingo <wingo@pobox.com>2013-11-19 19:11:40 +0100
committerAndy Wingo <wingo@pobox.com>2013-11-19 19:11:40 +0100
commit0bd1e9c6a0420816111e4dc109d6dd30f9f8cd73 (patch)
treed60e9e19e8825cd85b0b2c765289fed45902e5d9 /module/system/repl/command.scm
parentedba822553cfa95c907bf3ecb4c4879723ef92ee (diff)
downloadguile-0bd1e9c6a0420816111e4dc109d6dd30f9f8cd73.tar.gz
rtl-program? -> program?
* libguile/programs.c (scm_program_p): Rename from scm_rtl_program_p. Changes name also from rtl-program? to program?. * libguile/programs.h: * module/ice-9/session.scm: * module/language/tree-il/analyze.scm: * module/statprof.scm: * module/system/repl/command.scm: * module/system/repl/debug.scm: * module/system/vm/coverage.scm: * module/system/vm/disassembler.scm: * module/system/vm/frame.scm: * module/system/vm/program.scm: * module/system/vm/traps.scm: * module/system/xref.scm: Adapt.
Diffstat (limited to 'module/system/repl/command.scm')
-rw-r--r--module/system/repl/command.scm2
1 files changed, 1 insertions, 1 deletions
diff --git a/module/system/repl/command.scm b/module/system/repl/command.scm
index 631957a83..0cd9f121c 100644
--- a/module/system/repl/command.scm
+++ b/module/system/repl/command.scm
@@ -492,7 +492,7 @@ Run the optimizer on a piece of code and print the result."
Disassemble a compiled procedure."
(let ((obj (repl-eval repl (repl-parse repl form))))
(cond
- ((rtl-program? obj)
+ ((program? obj)
(disassemble-program obj))
((bytevector? obj)
(disassemble-image (load-image obj)))