Swank might use t for the true object; define it to the symbol T when

evaluating swank exprs.

diff --git a/src/runtime/swank.scm b/src/runtime/swank.scm
index 52ae969910af26f88157da479e9b3256beb724d0..d8317210ccb2f20d93c23efd974d8e6cb07931a4 100644 (file)
--- a/src/runtime/swank.scm
+++ b/src/runtime/swank.scm
@@ -952,6 +952,7 @@ swank:xref
 (define (elisp-true? o) (not (elisp-false? o)))
 
 (define nil '())
+(define t 'T)
 
 (define (->line o)
   (let ((r (write-to-string o 100)))