Which leaves us with the need to determine whether there are outstanding
captures. We simply maintain a counter, and rely on the client releasing
- captured places properly when he's finished. In practice, this is usually
- done using the `peek' parser macro so there isn't a problem."))
+ captured places properly when they've finished. In practice, this is
+ usually done using the `peek' parser macro so there isn't a problem."))
-(export 'charbuf-scanner-place-p)
+(export '(charbuf-scanner-place charbuf-scanner-place-p))
(defstruct charbuf-scanner-place
"A captured place we can return to later.
(defstruct (charbuf-slice
(:constructor make-charbuf-slice
- (buf &optional (start 0) %end
- &aux (end (or %end (length buf))))))
+ (buf
+ &optional (start 0) %end
+ &aux (end (or %end (length buf))))))
(buf nil :type (or charbuf (eql :eof)) :read-only t)
(start 0 :type (and fixnum unsigned-byte) :read-only t)
(end 0 :type (and fixnum unsigned-byte) :read-only t))