
Update of /project/climacs/cvsroot/climacs In directory common-lisp.net:/tmp/cvs-serv25598 Modified Files: syntax.lisp Log Message: Removed complete-item class which is no longer used. Date: Fri Apr 15 08:12:27 2005 Author: rstrandh Index: climacs/syntax.lisp diff -u climacs/syntax.lisp:1.45 climacs/syntax.lisp:1.46 --- climacs/syntax.lisp:1.45 Fri Apr 15 07:48:02 2005 +++ climacs/syntax.lisp Fri Apr 15 08:12:27 2005 @@ -299,12 +299,6 @@ do (format stream " ~a" (aref (symbols (rule item)) i))) (format stream "]")) -(defclass complete-item (rule-item) - ((parse-tree :initarg :parse-tree :reader parse-tree))) - -(defmethod print-object ((item complete-item) stream) - (format stream "[~a]" (parse-tree item))) - (defun derive-and-handle-item (prev-item parse-tree orig-state to-state) (let ((remaining (funcall (suffix prev-item) parse-tree))) (cond ((null remaining)