aboutsummaryrefslogtreecommitdiff
path: root/src/protocol.lisp
diff options
context:
space:
mode:
Diffstat (limited to 'src/protocol.lisp')
-rw-r--r--src/protocol.lisp3
1 files changed, 3 insertions, 0 deletions
diff --git a/src/protocol.lisp b/src/protocol.lisp
index 87d1651..31934f4 100644
--- a/src/protocol.lisp
+++ b/src/protocol.lisp
@@ -5,6 +5,9 @@
(defvar *debugging* nil
"If T, the debugger will be evoked.")
+(defun toggle-debugging ()
+ (setf *debugging* (not *debugging*)))
+
(define-condition protocol-error (error)
((raw-request
:reader raw-request