emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Emacs-diffs] /srv/bzr/emacs/trunk r102208: * cedet/semantic/bovine/c.el


From: Glenn Morris
Subject: [Emacs-diffs] /srv/bzr/emacs/trunk r102208: * cedet/semantic/bovine/c.el (semantic-analyze-split-name): Move before use.
Date: Mon, 01 Nov 2010 00:34:04 -0700
User-agent: Bazaar (2.0.3)

------------------------------------------------------------
revno: 102208
committer: Glenn Morris <address@hidden>
branch nick: trunk
timestamp: Mon 2010-11-01 00:34:04 -0700
message:
  * cedet/semantic/bovine/c.el (semantic-analyze-split-name): Move before use.
modified:
  lisp/cedet/ChangeLog
  lisp/cedet/semantic/bovine/c.el
=== modified file 'lisp/cedet/ChangeLog'
--- a/lisp/cedet/ChangeLog      2010-11-01 06:19:31 +0000
+++ b/lisp/cedet/ChangeLog      2010-11-01 07:34:04 +0000
@@ -1,5 +1,7 @@
 2010-11-01  Glenn Morris  <address@hidden>
 
+       * 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):

=== modified file 'lisp/cedet/semantic/bovine/c.el'
--- a/lisp/cedet/semantic/bovine/c.el   2010-09-23 19:00:31 +0000
+++ b/lisp/cedet/semantic/bovine/c.el   2010-11-01 07:34:04 +0000
@@ -1002,6 +1002,13 @@
 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 @@
           (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 @@
 ;; generated-autoload-load-name: "semantic/bovine/c"
 ;; End:
 
-;; arch-tag: 263951a8-0f18-445d-8e73-eb8f9ac8e2a3
 ;;; semantic/bovine/c.el ends here


reply via email to

[Prev in Thread] Current Thread [Next in Thread]