chiark
/
gitweb
/
~mdw
/
clg
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (parent:
bcf0293
)
Bug fix
author
espen
<espen>
Wed, 8 Oct 2008 18:26:49 +0000
(18:26 +0000)
committer
espen
<espen>
Wed, 8 Oct 2008 18:26:49 +0000
(18:26 +0000)
tools/config.lisp
patch
|
blob
|
blame
|
history
diff --git
a/tools/config.lisp
b/tools/config.lisp
index 432c906ba3742d0e7df034d0f3dc20332f61d93b..c38b0347c07f1d717b85533c53f6e8c20f22788e 100644
(file)
--- a/
tools/config.lisp
+++ b/
tools/config.lisp
@@
-122,9
+122,9
@@
(defun pkg-libdir (package)
(defun |#?-reader| (stream subchar arg)
(declare (ignore subchar arg))
(defun |#?-reader| (stream subchar arg)
(declare (ignore subchar arg))
- (let ((not-p (when (char= (peek-char nil stream) #\-)
- (read-char stream)))
- (conditional (read stream t nil t)))
+ (let
*
((not-p (when (char= (peek-char nil stream) #\-)
+
(read-char stream)))
+
(conditional (read stream t nil t)))
(cond
(*read-suppress* (read stream t nil t))
((not *read-eval*)
(cond
(*read-suppress* (read stream t nil t))
((not *read-eval*)