* lisp/progmodes/cc-engine.el (c-syntactic-re-search-forward): Fix coding bug

diff --git a/lisp/progmodes/cc-engine.el b/lisp/progmodes/cc-engine.el
index d4cb192dbda4043b1a3424f83a05913d8c77f568..259f8a03b37e94565f7f83c69f94be6658fa5886 100644 (file)
--- a/lisp/progmodes/cc-engine.el
+++ b/lisp/progmodes/cc-engine.el
@@ -4516,11 +4516,12 @@ comment at the start of cc-engine.el for more info."
        ((not (memq noerror '(before-literal after-literal)))
        (goto-char bound))
        (t (setq state (parse-partial-sexp state-pos bound nil nil state))
-         (when (or (elt state 3) (elt state 4))
-           (if (eq noerror 'before-literal)
-               (goto-char (elt state 8))
-             (parse-partial-sexp bound (point-max) nil nil
-                                 state 'syntax-table)))))
+         (if (or (elt state 3) (elt state 4))
+             (if (eq noerror 'before-literal)
+                 (goto-char (elt state 8))
+               (parse-partial-sexp bound (point-max) nil nil
+                                   state 'syntax-table))
+           (goto-char bound))))
 
       nil)))