diff options
author | Ludovic Courtès <ludo@gnu.org> | 2009-06-19 02:14:22 +0200 |
---|---|---|
committer | Ludovic Courtès <ludo@gnu.org> | 2009-06-19 02:14:22 +0200 |
commit | 81e002fcb90c99ac2840dcde81f286772b1fb1a2 (patch) | |
tree | 1ab88fb717d3c6e02429b5e0b47fe963ae9af6d6 | |
parent | 0ba0b3848913ca871235ad4b2f8ef184bf8f552b (diff) | |
download | guile-81e002fcb90c99ac2840dcde81f286772b1fb1a2.tar.gz |
Fix the REPL's `,compile' command.
* module/system/repl/command.scm (compile): Use `guile:disassemble'
instead of the former `disassemble-objcode'.
-rw-r--r-- | module/system/repl/command.scm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/module/system/repl/command.scm b/module/system/repl/command.scm index 47f1a9aa2..e6b492996 100644 --- a/module/system/repl/command.scm +++ b/module/system/repl/command.scm @@ -266,7 +266,7 @@ Generate compiled code. -O Enable optimization -D Add debug information" (let ((x (apply repl-compile repl (repl-parse repl form) opts))) - (cond ((objcode? x) (disassemble-objcode x)) + (cond ((objcode? x) (guile:disassemble x)) (else (repl-print repl x))))) (define guile:compile-file compile-file) |