Commit 818b28e3 authored by pfdietz's avatar pfdietz
Browse files

Fixed bug in parse-integer.error.5

parent 8a25cabe
...@@ -24,7 +24,7 @@ ...@@ -24,7 +24,7 @@
(deftest parse-integer.error.5 (deftest parse-integer.error.5
(loop for x across +standard-chars+ (loop for x across +standard-chars+
unless (or (digit-char-p x) unless (or (digit-char-p x)
(eq (eval `(classify-error (parse-integer ,(string c)))) (eq (eval `(classify-error (parse-integer ,(string x))))
'parse-error)) 'parse-error))
collect x) collect x)
nil) nil)
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment