[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[no subject]

I patched the interval-stream :untyi bug by changing the
:read-bp definition to

  ((:UNTYO-MARK :READ-BP) ()
   ;; First, if there is an unread character, discard it and back up one.
   (COND (*UNRCHF*
	  (SETQ *UNRCHF* NIL)
	  (IF (ZEROP *INDEX*)
	      (SETQ *LINE* (LINE-PREVIOUS *LINE*) *INDEX* (LINE-LENGTH *LINE*))
	      (SETQ *INDEX* (1- *INDEX*)))))
   (CREATE-BP *LINE* *INDEX*))

It might be cleaner to eliminate *UNRCHF* altogether.