Browse files

Use #\null instead of #\nul

The latter is recognized by a bunch of implementations, but not by

Issue #12
  • Loading branch information...
1 parent 0a351b0 commit b08f102b6154b479e48de98de3a8bbaacf59f442 @marijnh marijnh committed Feb 13, 2012
Showing with 2 additions and 2 deletions.
  1. +2 −2 json.lisp
4 json.lisp
@@ -68,9 +68,9 @@
(let ((finished nil))
(skip-whitespace stream)
- (let ((next (peek-char nil stream nil #\nul)))
+ (let ((next (peek-char nil stream nil #\null)))
(declare (type character next))
- (when (eql next #\nul)
+ (when (eql next #\null)
(json-error "Encountered end of input inside ~A." obj-name))
(when (eql next end-char)
(read-char stream)

0 comments on commit b08f102

Please sign in to comment.