Commit 5aebc19385649234d5386003048c765ab894f42e

Thomas de Grivel 2018-06-08T00:59:46

debug-p

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
diff --git a/thot.lisp b/thot.lisp
index 2eee9f0..7b8fab6 100644
--- a/thot.lisp
+++ b/thot.lisp
@@ -5,7 +5,9 @@
 
 (in-package :thot)
 
-(setf (debug-p :thot) t)
+;;(setf (debug-p :thot) t)
+;;(setf (debug-p :directory) t)
+;;(setf (debug-p :file) t)
 
 (eval-when (:compile-toplevel :load-toplevel :execute)
   (unless (boundp '+crlf+)