summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--doc/ref/scheme-using.texi4
-rw-r--r--module/system/repl/command.scm5
2 files changed, 0 insertions, 9 deletions
diff --git a/doc/ref/scheme-using.texi b/doc/ref/scheme-using.texi
index 4422c1863..9334218b6 100644
--- a/doc/ref/scheme-using.texi
+++ b/doc/ref/scheme-using.texi
@@ -341,10 +341,6 @@ Show the selected frame. With an argument, select a frame by index,
then show it.
@end deffn
-@deffn {REPL Command} procedure
-Print the procedure for the selected frame.
-@end deffn
-
@deffn {REPL Command} locals
Show local variables.
diff --git a/module/system/repl/command.scm b/module/system/repl/command.scm
index 62bc2977a..e84586318 100644
--- a/module/system/repl/command.scm
+++ b/module/system/repl/command.scm
@@ -645,11 +645,6 @@ With an argument, select a frame by index, then show it."
(format #t "No such frame.~%"))))
(else (print-frame cur #:index index))))
-(define-stack-command (procedure repl)
- "procedure
-Print the procedure for the selected frame."
- (repl-print repl (frame-procedure cur)))
-
(define-stack-command (locals repl #:key (width (terminal-width)))
"locals
Show local variables.