diff options
| author | Glenn Morris <rgm@gnu.org> | 2010-11-01 00:34:04 -0700 |
|---|---|---|
| committer | Glenn Morris <rgm@gnu.org> | 2010-11-01 00:34:04 -0700 |
| commit | ca7c89d8f52b34f694031f496600f949640ff9c4 (patch) | |
| tree | 3be18e8cc0eb59ffe0cec571293ebb7b994461a2 /lisp/cedet | |
| parent | c79fc059c990990854a42bacaf89dd3bd26e3006 (diff) | |
| download | emacs-ca7c89d8f52b34f694031f496600f949640ff9c4.tar.gz | |
* cedet/semantic/bovine/c.el (semantic-analyze-split-name): Move before use.
Diffstat (limited to 'lisp/cedet')
| -rw-r--r-- | lisp/cedet/ChangeLog | 2 | ||||
| -rw-r--r-- | lisp/cedet/semantic/bovine/c.el | 15 |
2 files changed, 9 insertions, 8 deletions
diff --git a/lisp/cedet/ChangeLog b/lisp/cedet/ChangeLog index d4a236847ff..69213bb5778 100644 --- a/lisp/cedet/ChangeLog +++ b/lisp/cedet/ChangeLog @@ -1,5 +1,7 @@ 2010-11-01 Glenn Morris <rgm@gnu.org> + * semantic/bovine/c.el (semantic-analyze-split-name): Move before use. + * semantic/symref/cscope.el (ede-toplevel): * semantic/symref.el (ede-toplevel): * semantic/tag-file.el (ede-toplevel): diff --git a/lisp/cedet/semantic/bovine/c.el b/lisp/cedet/semantic/bovine/c.el index 03d370401af..2bac420a1c5 100644 --- a/lisp/cedet/semantic/bovine/c.el +++ b/lisp/cedet/semantic/bovine/c.el @@ -1002,6 +1002,13 @@ if something is a constructor. Value should be: where typename is the name of the type, and typeoftype is \"class\" or \"struct\".") +(define-mode-local-override semantic-analyze-split-name c-mode (name) + "Split up tag names on colon (:) boundaries." + (let ((ans (split-string name ":"))) + (if (= (length ans) 1) + name + (delete "" ans)))) + (defun semantic-c-reconstitute-token (tokenpart declmods typedecl) "Reconstitute a token TOKENPART with DECLMODS and TYPEDECL. This is so we don't have to match the same starting text several times. @@ -1559,13 +1566,6 @@ These are constants which are of type TYPE." (string= (semantic-tag-type type) "enum")) (semantic-tag-type-members type))) -(define-mode-local-override semantic-analyze-split-name c-mode (name) - "Split up tag names on colon (:) boundaries." - (let ((ans (split-string name ":"))) - (if (= (length ans) 1) - name - (delete "" ans)))) - (define-mode-local-override semantic-analyze-unsplit-name c-mode (namelist) "Assemble the list of names NAMELIST into a namespace name." (mapconcat 'identity namelist "::")) @@ -1871,5 +1871,4 @@ For types with a :parent, create faux namespaces to put TAG into." ;; generated-autoload-load-name: "semantic/bovine/c" ;; End: -;; arch-tag: 263951a8-0f18-445d-8e73-eb8f9ac8e2a3 ;;; semantic/bovine/c.el ends here |