CC Mode 5.28 (); Cleanups work strangely after "else if" clause

[Rory Molinari]

Hi,

        I'm seeing some strange behaviour involving cleanups when the
text to be cleaned up appears after an "else if" clause in Java code.
In particular, the brace-catch-brace cleanup stops working after an
"else if" clause.

Consider the following java file.  Note the difference in indentation
between the two try-catch blocks.  The code appears just as it does
after I typed it.  I have auto-newlines on.

----------------------------------------------------------------------
class test
{
    
    public void x() {
        try {
        } catch () {
        }

        if (true) {
        } else if (false) {
        }

        try {
        }
        catch () {
        }
    }
}
----------------------------------------------------------------------

The second "} catch (" has not been cleaned up.

If I delete the "else if" part of the conditional and retype the
parenthesis after the second catch, it is cleaned up correctly.
Things also return to normal when I replace the "else if" with the
nonsensical "else i", or comment out the "else if" clause.

Other cleanups (brace-else-brace, brace-elseif-brace) work fine.  It's
just brace-clean-brace that I see the problem with.

Cheers,
Rory Molinari
molinari@math.lsa.umich.edu


Emacs  : GNU Emacs 20.7.1 (i386-*-nt4.0.1381)
 of Tue Jun 13 2000 on buffy
Package: CC Mode 5.28 ()
Buffer Style: personal

c-emacs-features: (1-bit)

current state:
==============
(setq
 c-basic-offset 4
 c-comment-only-line-offset 0
 c-block-comment-prefix "* "
 c-comment-prefix-regexp '((pike-mode . "//+!?\\|\\**") (other . "//+\\|\\**"))
 c-cleanup-list '(brace-else-brace brace-elseif-brace brace-catch-brace 
list-close-comma defun-close-semi)
 c-hanging-braces-alist '((inline-open after) (inline-close before after) 
(class-open before after) (class-close before after)
                          (brace-entry-open) (brace-list-open) 
(brace-list-close) (brace-list-intro) (substatement-open after)
                          (block-close . c-snug-do-while) (inexpr-class-open 
after) (inexpr-class-close before))
 c-hanging-colons-alist nil
 c-hanging-semi&comma-criteria '(c-semi&comma-no-newlines-before-nonblanks 
c-semi&comma-inside-parenlist)
 c-backslash-column 48
 c-label-minimum-indentation 1
 c-offsets-alist '((string . c-lineup-dont-change)
                   (c . c-lineup-C-comments)
                   (defun-open . 0)
                   (defun-close . 0)
                   (defun-block-intro . +)
                   (class-open . 0)
                   (class-close . 0)
                   (inline-close . 0)
                   (knr-argdecl . 0)
                   (topmost-intro . 0)
                   (member-init-intro . +)
                   (member-init-cont . c-lineup-multi-inher)
                   (inher-intro . +)
                   (block-open . 0)
                   (block-close . 0)
                   (brace-list-open . 0)
                   (brace-list-close . 0)
                   (brace-list-intro . +)
                   (brace-list-entry . 0)
                   (brace-entry-open . 0)
                   (statement . 0)
                   (statement-case-intro . +)
                   (substatement . +)
                   (case-label . +)
                   (do-while-closure . 0)
                   (else-clause . 0)
                   (catch-clause . 0)
                   (comment-intro . c-lineup-comment)
                   (arglist-cont . 0)
                   (arglist-cont-nonempty . c-lineup-arglist)
                   (stream-op . c-lineup-streamop)
                   (inclass . +)
                   (cpp-macro . [0])
                   (cpp-macro-cont . c-lineup-dont-change)
                   (friend . 0)
                   (objc-method-intro . [0])
                   (objc-method-args-cont . c-lineup-ObjC-method-args)
                   (objc-method-call-cont . c-lineup-ObjC-method-call)
                   (extern-lang-open . 0)
                   (extern-lang-close . 0)
                   (inextern-lang . +)
                   (namespace-open . 0)
                   (namespace-close . 0)
                   (innamespace . +)
                   (template-args-cont c-lineup-template-args +)
                   (inlambda . c-lineup-inexpr-block)
                   (lambda-intro-cont . +)
                   (inexpr-statement . 0)
                   (inexpr-class . +)
                   (inline-open . +)
                   (topmost-intro-cont . +)
                   (statement-block-intro . +)
                   (knr-argdecl-intro . +)
                   (substatement-open . +)
                   (label . 2)
                   (statement-case-open . 0)
                   (statement-cont . +)
                   (arglist-intro . +)
                   (arglist-close . +)
                   (access-label . -)
                   (inher-cont . c-lineup-multi-inher)
                   (func-decl-cont . *)
                   )
 c-delete-function 'delete-char
 c-electric-pound-behavior nil
 c-indent-comments-syntactically-p nil
 c-tab-always-indent t
 defun-prompt-regexp nil
 tab-width 8
 comment-column 32
 parse-sexp-ignore-comments t
 auto-fill-function 'c-do-auto-fill
 filladapt-mode t
 comment-multi-line t
 comment-start-skip "/\\*+ *\\|//+ *"
 fill-prefix nil
 paragraph-start "[     ]*\\(//+\\|\\**\\)[     ]*\\(@[a-zA-Z]+\\>\\|$\\)\\|^\f"
 adaptive-fill-mode t
 adaptive-fill-regexp "[        ]*\\(//+\\|\\**\\)[     ]*\\([  ]*\\([-|#;>*]+ 
*\\|(?[0-9]+[.)] *\\)*\\)"
 )