Commit 94eaec2b85447b8f88f05889cfa9182ff04dd241

Thomas de Grivel 2018-06-14T01:37:01

fix eof

diff --git a/css-lexer.lisp b/css-lexer.lisp
index 40b667a..417dffa 100644
--- a/css-lexer.lisp
+++ b/css-lexer.lisp
@@ -1,9 +1,7 @@
 
 (in-package :css-lexer)
 
-(defclass css-lexer (lexer)
-  ((eof-p :initform nil
-          :accessor eof-p)))
+(defclass css-lexer (lexer) ())
 
 (defgeneric match-comment (lexer))
 (defgeneric match-newline (lexer))
@@ -444,7 +442,7 @@
   (cond ((and (lexer-in-eof lx)
               (= (lexer-match-start lx)
                  (fill-pointer (lexer-buffer lx))))
-         (setf (eof-p lx) t)
+         (setf (lexer-eof-p lx) t)
          (make-token lx 'eof-token))
         (t
          (discard-token lx))))