projects
/
jscl.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
39e4bb6
)
ls-read: fix spacing
author
Alfredo Beaumont
<alfredo.beaumont@gmail.com>
Wed, 24 Apr 2013 16:56:20 +0000
(18:56 +0200)
committer
Alfredo Beaumont
<alfredo.beaumont@gmail.com>
Thu, 25 Apr 2013 15:42:12 +0000
(17:42 +0200)
src/read.lisp
patch
|
blob
|
history
diff --git
a/src/read.lisp
b/src/read.lisp
index
39aa7f5
..
8f7fd71
100644
(file)
--- a/
src/read.lisp
+++ b/
src/read.lisp
@@
-236,8
+236,8
@@
(read-sharp stream))
(t
(let ((string (read-until stream #'terminalp)))
- (or (values (!parse-integer string nil))
- (read-symbol string)))))))
+ (or (values (!parse-integer string nil))
+ (read-symbol string)))))))
(defun ls-read (stream &optional (eof-error-p t) eof-value)
(let ((x (ls-read-1 stream)))