aboutsummaryrefslogtreecommitdiffstats
path: root/lisp/cedet/semantic/java.el
diff options
context:
space:
mode:
authorChong Yidong2009-09-13 15:58:30 +0000
committerChong Yidong2009-09-13 15:58:30 +0000
commita964f5e552c64a53fb4b5c417f1825807cdcca6f (patch)
tree8709f2b8c145118620e7c3f0efb840de37a4ccbe /lisp/cedet/semantic/java.el
parent0a3b3f9e131bc5f0cf8034326d14d7737a6162b3 (diff)
downloademacs-a964f5e552c64a53fb4b5c417f1825807cdcca6f.tar.gz
emacs-a964f5e552c64a53fb4b5c417f1825807cdcca6f.zip
Synch to Eric M. Ludlam's upstream CEDET repository.
* cedet/semantic/wisent/java-tags.el: * cedet/semantic/wisent/javat-wy.el: New files. * cedet/semantic/wisent/java.el: * cedet/semantic/wisent/java-wy.el: Files removed. * cedet/semantic/java.el (semantic-java-prototype-function) (semantic-java-prototype-variable, semantic-java-prototype-type): Doc fix (java-mode::semantic-format-tag-prototype): Renamed from semantic-format-prototype-tag, which didn't match the overloadable function. * cedet/semantic/bovine/c.el (semantic-c-dereference-namespace-alias): Deal correctly with nested namespaces. Make sure type actually exists in original namespace. * cedet/semantic/lex-spp.el (semantic-lex-spp-hack-depth): New. (semantic-lex-spp-lex-text-string): Use above to enable recursion. * cedet/semantic/format.el: Whitespace cleanup. (semantic-test-all-format-tag-functions): Move to end. (semantic-format-tag-prototype, semantic-format-tag-name) (semantic-format-tag-name-default): Revert to original upstream positions. * cedet/semantic/elp.el: File removed. * cedet/semantic/analyze.el (semantic-adebug-analyze): New function, moved here from semantic/adebug. * cedet/semantic/adebug.el: Declare external semanticdb functions. (semantic-adebug-analyze, semantic-adebug-edebug-expr): Deleted. * emacs-lisp/eieio.el (eieio-unbound): Default value is now robust to recompile. * emacs-lisp/eieio-datadebug.el: Add eieio objects to the list of data debug things to recognize. * emacs-lisp/eieio-comp.el: Synch to upstream. * cedet/data-debug.el: Don't require eieio and semantic/tag. If eieio is loaded, require eieio-datadebug. (data-debug-insert-ring-button): Do not be specific about the ring contents. (data-debug-thing-alist): Remove eieio and semantic specific entries. (data-debug-add-specialized-thing): New function. * cedet/cedet.el: Update commentary. * cedet/cedet-edebug.el: Require edebug and debug.
Diffstat (limited to 'lisp/cedet/semantic/java.el')
-rw-r--r--lisp/cedet/semantic/java.el13
1 files changed, 5 insertions, 8 deletions
diff --git a/lisp/cedet/semantic/java.el b/lisp/cedet/semantic/java.el
index 3a57c65792d..b7f2e9a16b0 100644
--- a/lisp/cedet/semantic/java.el
+++ b/lisp/cedet/semantic/java.el
@@ -24,9 +24,6 @@
24;; 24;;
25;; Common function for Java parsers. 25;; Common function for Java parsers.
26 26
27;;; History:
28;;
29
30;;; Code: 27;;; Code:
31(require 'semantic) 28(require 'semantic)
32(require 'semantic/ctxt) 29(require 'semantic/ctxt)
@@ -169,7 +166,7 @@ corresponding compound declaration."
169 "Return a function (method) prototype for TAG. 166 "Return a function (method) prototype for TAG.
170Optional argument PARENT is a parent (containing) item. 167Optional argument PARENT is a parent (containing) item.
171Optional argument COLOR indicates that color should be mixed in. 168Optional argument COLOR indicates that color should be mixed in.
172See also `semantic-format-prototype-tag'." 169See also `semantic-format-tag-prototype'."
173 (let ((name (semantic-tag-name tag)) 170 (let ((name (semantic-tag-name tag))
174 (type (semantic-java-type tag)) 171 (type (semantic-java-type tag))
175 (tmpl (semantic-tag-get-attribute tag :template-specifier)) 172 (tmpl (semantic-tag-get-attribute tag :template-specifier))
@@ -197,7 +194,7 @@ See also `semantic-format-prototype-tag'."
197 "Return a variable (field) prototype for TAG. 194 "Return a variable (field) prototype for TAG.
198Optional argument PARENT is a parent (containing) item. 195Optional argument PARENT is a parent (containing) item.
199Optional argument COLOR indicates that color should be mixed in. 196Optional argument COLOR indicates that color should be mixed in.
200See also `semantic-format-prototype-tag'." 197See also `semantic-format-tag-prototype'."
201 (let ((name (semantic-tag-name tag)) 198 (let ((name (semantic-tag-name tag))
202 (type (semantic-java-type tag))) 199 (type (semantic-java-type tag)))
203 (concat (if color 200 (concat (if color
@@ -212,7 +209,7 @@ See also `semantic-format-prototype-tag'."
212 "Return a type (class/interface) prototype for TAG. 209 "Return a type (class/interface) prototype for TAG.
213Optional argument PARENT is a parent (containing) item. 210Optional argument PARENT is a parent (containing) item.
214Optional argument COLOR indicates that color should be mixed in. 211Optional argument COLOR indicates that color should be mixed in.
215See also `semantic-format-prototype-tag'." 212See also `semantic-format-tag-prototype'."
216 (let ((name (semantic-tag-name tag)) 213 (let ((name (semantic-tag-name tag))
217 (type (semantic-tag-type tag)) 214 (type (semantic-tag-type tag))
218 (tmpl (semantic-tag-get-attribute tag :template-specifier))) 215 (tmpl (semantic-tag-get-attribute tag :template-specifier)))
@@ -222,7 +219,7 @@ See also `semantic-format-prototype-tag'."
222 name) 219 name)
223 (or tmpl "")))) 220 (or tmpl ""))))
224 221
225(define-mode-local-override semantic-format-prototype-tag 222(define-mode-local-override semantic-format-tag-prototype
226 java-mode (tag &optional parent color) 223 java-mode (tag &optional parent color)
227 "Return a prototype for TOKEN. 224 "Return a prototype for TOKEN.
228Optional argument PARENT is a parent (containing) item. 225Optional argument PARENT is a parent (containing) item.
@@ -235,7 +232,7 @@ Optional argument COLOR indicates that color should be mixed in."
235 tag parent color))) 232 tag parent color)))
236 233
237(semantic-alias-obsolete 'semantic-java-prototype-nonterminal 234(semantic-alias-obsolete 'semantic-java-prototype-nonterminal
238 'semantic-format-prototype-tag-java-mode) 235 'semantic-format-tag-prototype-java-mode)
239 236
240;; Include Tag Name 237;; Include Tag Name
241;; 238;;