Revert "Add a mechanism to specify expected shift/reduce .wy conflicts"

This reverts commit f21ec24524c705e18674a2e9e4db37b11fa3ebab.

*sigh*  Revert again because this created a bootstrap problem in a different part of the process.

diff --git a/admin/grammars/python.wy b/admin/grammars/python.wy
index 0e926ad363691ed25b528775dd618809e9f15d9a..082850df59cd0ff83692b06aa3af786f16c86bd3 100644 (file)
--- a/admin/grammars/python.wy
+++ b/admin/grammars/python.wy
@@ -88,7 +88,6 @@
 
 %package wisent-python-wy
 %provide semantic/wisent/python-wy
-%expectedconflicts 4
 
 %{
 (declare-function wisent-python-reconstitute-function-tag

diff --git a/lisp/cedet/semantic/grammar.el b/lisp/cedet/semantic/grammar.el
index 39161420f98106d43aeb782414a5997dd77fc393..8ffa4c6d83edfa21c3f46b4e784b4e7313ade0bb 100644 (file)
--- a/lisp/cedet/semantic/grammar.el
+++ b/lisp/cedet/semantic/grammar.el
@@ -277,13 +277,6 @@ foo.by it is foo-by."
              (i    (string-match (format "\\([.]\\)%s\\'" ext) file)))
         (concat (substring file 0 i) "-" ext))))
 
-(defun semantic-grammar-expected-conflicts ()
-  "Return the number of expected shift/reduce conflicts in the package."
-  (let ((conflicts (semantic-grammar-tag-symbols 'expectedconflicts)))
-    (if conflicts
-        (string-to-number conflicts)
-      0)))
-
 (defsubst semantic-grammar-languagemode ()
   "Return the %languagemode value as a list of symbols or nil."
   (semantic-grammar-tag-symbols 'languagemode))
@@ -994,7 +987,7 @@ Return non-nil if there were no errors, nil if errors."
                       (vc-handled-backends nil))
                   (setq semanticdb-new-database-class 'semanticdb-project-database)
                   (semantic-mode 1)
-                  (semantic-grammar-create-package t)))
+                  (semantic-grammar-create-package)))
              (error
               (message "%s" (error-message-string err))
               nil))))

diff --git a/lisp/cedet/semantic/wisent/comp.el b/lisp/cedet/semantic/wisent/comp.el
index ff434f555dad0442948b23fe5bacc33918c0b30d..051b898ed785935dbc58ddcf0095c8975313438b 100644 (file)
--- a/lisp/cedet/semantic/wisent/comp.el
+++ b/lisp/cedet/semantic/wisent/comp.el
@@ -2264,28 +2264,24 @@ there are any reduce/reduce conflicts."
   :group 'wisent
   :type '(choice (const nil) integer))
 
-(declare-function semantic-grammar-expected-conflicts "semantic/grammar")
-
 (defun wisent-total-conflicts ()
   "Report the total number of conflicts."
-  (require 'semantic/grammar)
   (unless (and (zerop rrc-total)
                (or (zerop src-total)
                    (= src-total (or wisent-expected-conflicts 0))))
     (let* ((src (wisent-source))
            (src (if src (concat " in " src) ""))
            (msg (format "Grammar%s contains" src)))
-      (when (and (> src-total 0)
-                 (not (= rrc-total (semantic-grammar-expected-conflicts))))
-        (setq msg (format "%s %d shift/reduce conflict%s"
-                          msg src-total (if (> src-total 1)
-                                            "s" ""))))
+      (if (> src-total 0)
+          (setq msg (format "%s %d shift/reduce conflict%s"
+                            msg src-total (if (> src-total 1)
+                                              "s" ""))))
       (if (and (> src-total 0) (> rrc-total 0))
           (setq msg (format "%s and" msg)))
       (if (> rrc-total 0)
-          (setq msg (format "%s %d reduce/reduce conflict%s"
-                            msg rrc-total (if (> rrc-total 1)
-                                              "s" ""))))
+        (setq msg (format "%s %d reduce/reduce conflict%s"
+                          msg rrc-total (if (> rrc-total 1)
+                                            "s" ""))))
       (message msg))))
 
 (defun wisent-print-conflicts ()