diff options
Diffstat (limited to 'module/system/repl/command.scm')
-rw-r--r-- | module/system/repl/command.scm | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/module/system/repl/command.scm b/module/system/repl/command.scm index fecea4458..f3bccec76 100644 --- a/module/system/repl/command.scm +++ b/module/system/repl/command.scm @@ -24,7 +24,9 @@ :use-module (system base pmatch) :use-module (system base compile) :use-module (system repl common) - :use-module (system vm core) + :use-module (system vm objcode) + :use-module (system vm program) + :use-module (system vm vm) :autoload (system base language) (lookup-language) :autoload (system il glil) (pprint-glil) :autoload (system vm disasm) (disassemble-program disassemble-objcode) @@ -61,7 +63,7 @@ (lambda (p) (if (program? p) (program-documentation p) - (procedure-documentation p))))) + (old-definition p))))) (define *command-module* (current-module)) (define (command-name c) (car c)) |