Skip to content

Commit 4c9b1f7

Browse files
committed
Start debugging/instrospection commands.
1 parent 81b9a6c commit 4c9b1f7

File tree

1 file changed

+11
-0
lines changed

1 file changed

+11
-0
lines changed

repl.clw

Lines changed: 11 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -878,6 +878,17 @@ are now pleasantly simple.
878878
:prompt "Load file: "
879879
:function load))
880880

881+
@1*Debugging commands. We'll start with some introspection commands.
882+
883+
@l
884+
(defcmd describe ((object (read)))
885+
"Print a description of an object."
886+
(describe object *command-output*))
887+
888+
(defcmd inspect ((object (read)))
889+
"Interactively inspect an object."
890+
(inspect object))
891+
881892
@1*\CLWEB\ commands. The are just trivial wrappers around the top-level
882893
\CLWEB\ functions.
883894

0 commit comments

Comments
 (0)