anchor.diff:    (:use #:common-lisp)
     (:export #:make-production #:make-grammar #:make-parser #:parse-with-lexer
              #:define-grammar #:define-parser
  -           #:yacc-parse-error #:yacc-parse-error-terminal
  +           #:yacc-compile-warning #:conflict-warning #:conflict-summary-warning
  +           #:yacc-runtime-error #:yacc-parse-error #:yacc-parse-error-terminal
              #:yacc-parse-error-value #:yacc-parse-error-expected-terminals)
     #+CMU
     (:import-from #:extensions #:required-argument #:memq)
  
positive.code:                                 :muffle-conflicts muffle-conflicts)
        (when discard-memos (grammar-discard-memos grammar)))))
  
  (define-condition yacc-parse-error (error)
    ((terminal :initarg :terminal :reader yacc-parse-error-terminal)
     (value :initarg :value :reader yacc-parse-error-value)
     (expected-terminals :initarg :expected-terminals
  
negative.code:       (shift-action
         (format s "~D" (shift-action-state a))))))
  
  (define-condition yacc-compile-warning (warning)
    ())
  
  (define-condition conflict-warning (yacc-compile-warning simple-warning)
    ((kind :initarg :kind :reader conflict-warning-kind)
     (state :initarg :state :reader conflict-warning-state)
     (terminal :initarg :terminal :reader conflict-warning-terminal))
  