[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] emacs/lisp/cedet semantic/decorate/mode.el sema...
|
From: |
Stefan Monnier |
|
Subject: |
[Emacs-diffs] emacs/lisp/cedet semantic/decorate/mode.el sema... |
|
Date: |
Sun, 25 Oct 2009 02:55:29 +0000 |
CVSROOT: /sources/emacs
Module name: emacs
Changes by: Stefan Monnier <monnier> 09/10/25 02:55:28
Modified files:
lisp/cedet/semantic/decorate: mode.el
lisp/cedet/semantic: wisent.el util.el tag.el tag-file.el lex.el
java.el idle.el fw.el edit.el db-mode.el
lisp/cedet : semantic.el
Log message:
* cedet/semantic/fw.el (semantic-alias-obsolete)
(semantic-varalias-obsolete): Make the `when' arg mandatory.
(define-mode-overload-implementation):
* cedet/semantic/decorate/mode.el
(semantic-decorate-pending-decoration-hooks):
* cedet/semantic/wisent.el (wisent-lex-make-token-table):
* cedet/semantic/util.el (semantic-file-token-stream)
(semantic-something-to-stream):
* cedet/semantic/tag.el (semantic-tag-make-assoc-list)
(semantic-expand-nonterminal):
* cedet/semantic/tag-file.el (semantic-find-nonterminal)
(semantic-find-dependency, semantic-find-nonterminal)
(semantic-find-dependency):
* cedet/semantic/lex.el (semantic-flex-start, semantic-flex-end)
(semantic-flex-text, semantic-flex-make-keyword-table)
(semantic-flex-keyword-p, semantic-flex-keyword-put)
(semantic-flex-keyword-get, semantic-flex-map-keywords)
(semantic-flex-keywords, semantic-flex-buffer, semantic-flex-list):
* cedet/semantic/java.el (semantic-java-prototype-nonterminal):
* cedet/semantic/idle.el (semantic-before-idle-scheduler-reparse-hooks)
(semantic-after-idle-scheduler-reparse-hooks):
* cedet/semantic/edit.el
(semantic-edits-incremental-reparse-failed-hooks):
* cedet/semantic/db-mode.el (semanticdb-mode-hooks):
* cedet/semantic.el (semantic-toplevel-bovine-table)
(semantic-toplevel-bovine-cache)
(semantic-before-toplevel-bovination-hook, semantic-init-hooks)
(semantic-init-mode-hooks, semantic-init-db-hooks)
(semantic-bovination-working-type): Provide the `when' arg.
CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/cedet/semantic/decorate/mode.el?cvsroot=emacs&r1=1.4&r2=1.5
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/cedet/semantic/wisent.el?cvsroot=emacs&r1=1.5&r2=1.6
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/cedet/semantic/util.el?cvsroot=emacs&r1=1.4&r2=1.5
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/cedet/semantic/tag.el?cvsroot=emacs&r1=1.5&r2=1.6
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/cedet/semantic/tag-file.el?cvsroot=emacs&r1=1.4&r2=1.5
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/cedet/semantic/lex.el?cvsroot=emacs&r1=1.5&r2=1.6
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/cedet/semantic/java.el?cvsroot=emacs&r1=1.3&r2=1.4
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/cedet/semantic/idle.el?cvsroot=emacs&r1=1.5&r2=1.6
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/cedet/semantic/fw.el?cvsroot=emacs&r1=1.4&r2=1.5
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/cedet/semantic/edit.el?cvsroot=emacs&r1=1.4&r2=1.5
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/cedet/semantic/db-mode.el?cvsroot=emacs&r1=1.3&r2=1.4
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/cedet/semantic.el?cvsroot=emacs&r1=1.8&r2=1.9
Patches:
Index: semantic/decorate/mode.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/cedet/semantic/decorate/mode.el,v
retrieving revision 1.4
retrieving revision 1.5
diff -u -b -r1.4 -r1.5
--- semantic/decorate/mode.el 2 Oct 2009 10:53:36 -0000 1.4
+++ semantic/decorate/mode.el 25 Oct 2009 02:55:27 -0000 1.5
@@ -197,7 +197,7 @@
"Normal hook run to perform pending decoration changes.")
(semantic-varalias-obsolete 'semantic-decorate-pending-decoration-hooks
- 'semantic-decorate-pending-decoration-hook)
+ 'semantic-decorate-pending-decoration-hook "23.2")
(defun semantic-decorate-add-pending-decoration (fcn &optional buffer)
"Add a pending decoration change represented by FCN.
Index: semantic/wisent.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/cedet/semantic/wisent.el,v
retrieving revision 1.5
retrieving revision 1.6
diff -u -b -r1.5 -r1.6
--- semantic/wisent.el 2 Oct 2009 10:53:36 -0000 1.5
+++ semantic/wisent.el 25 Oct 2009 02:55:28 -0000 1.6
@@ -48,7 +48,7 @@
;; Maintain this alias for compatibility until all WY grammars have
;; been translated again to Elisp code.
(semantic-alias-obsolete 'wisent-lex-make-token-table
- 'semantic-lex-make-type-table)
+ 'semantic-lex-make-type-table "23.2")
(defmacro wisent-lex-eoi ()
"Return an End-Of-Input lexical token.
Index: semantic/util.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/cedet/semantic/util.el,v
retrieving revision 1.4
retrieving revision 1.5
diff -u -b -r1.4 -r1.5
--- semantic/util.el 24 Oct 2009 18:02:51 -0000 1.4
+++ semantic/util.el 25 Oct 2009 02:55:28 -0000 1.5
@@ -81,7 +81,7 @@
(semantic-fetch-tags))))))
(semantic-alias-obsolete 'semantic-file-token-stream
- 'semantic-file-tag-table)
+ 'semantic-file-tag-table "23.2")
(defun semantic-something-to-tag-table (something)
"Convert SOMETHING into a semantic tag table.
@@ -134,7 +134,7 @@
(t nil)))
(semantic-alias-obsolete 'semantic-something-to-stream
- 'semantic-something-to-tag-table)
+ 'semantic-something-to-tag-table "23.2")
;;; Recursive searching through dependency trees
;;
Index: semantic/tag.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/cedet/semantic/tag.el,v
retrieving revision 1.5
retrieving revision 1.6
diff -u -b -r1.5 -r1.6
--- semantic/tag.el 24 Oct 2009 18:02:51 -0000 1.5
+++ semantic/tag.el 25 Oct 2009 02:55:28 -0000 1.6
@@ -1350,10 +1350,10 @@
and `semantic-tag-type-interfaces' instead" "23.2")
(semantic-alias-obsolete 'semantic-tag-make-assoc-list
- 'semantic-tag-make-plist)
+ 'semantic-tag-make-plist "23.2")
(semantic-varalias-obsolete 'semantic-expand-nonterminal
- 'semantic-tag-expand-function)
+ 'semantic-tag-expand-function "23.2")
(provide 'semantic/tag)
Index: semantic/tag-file.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/cedet/semantic/tag-file.el,v
retrieving revision 1.4
retrieving revision 1.5
diff -u -b -r1.4 -r1.5
--- semantic/tag-file.el 2 Oct 2009 10:53:35 -0000 1.4
+++ semantic/tag-file.el 25 Oct 2009 02:55:28 -0000 1.5
@@ -103,7 +103,7 @@
)
(make-obsolete-overload 'semantic-find-nonterminal
- 'semantic-go-to-tag)
+ 'semantic-go-to-tag "23.2")
;;; Dependencies
;;
@@ -177,7 +177,7 @@
)))
(make-obsolete-overload 'semantic-find-dependency
- 'semantic-dependency-tag-file)
+ 'semantic-dependency-tag-file "23.2")
;;; PROTOTYPE FILE
;;
@@ -203,10 +203,10 @@
(match-string 1))))))
(semantic-alias-obsolete 'semantic-find-nonterminal
- 'semantic-go-to-tag)
+ 'semantic-go-to-tag "23.2")
(semantic-alias-obsolete 'semantic-find-dependency
- 'semantic-dependency-tag-file)
+ 'semantic-dependency-tag-file "23.2")
(provide 'semantic/tag-file)
Index: semantic/lex.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/cedet/semantic/lex.el,v
retrieving revision 1.5
retrieving revision 1.6
diff -u -b -r1.5 -r1.6
--- semantic/lex.el 4 Oct 2009 01:44:42 -0000 1.5
+++ semantic/lex.el 25 Oct 2009 02:55:28 -0000 1.6
@@ -1752,17 +1752,17 @@
;;
;; NOTE: DELETE THIS SOMEDAY SOON
-(semantic-alias-obsolete 'semantic-flex-start 'semantic-lex-token-start)
-(semantic-alias-obsolete 'semantic-flex-end 'semantic-lex-token-end)
-(semantic-alias-obsolete 'semantic-flex-text 'semantic-lex-token-text)
-(semantic-alias-obsolete 'semantic-flex-make-keyword-table
'semantic-lex-make-keyword-table)
-(semantic-alias-obsolete 'semantic-flex-keyword-p 'semantic-lex-keyword-p)
-(semantic-alias-obsolete 'semantic-flex-keyword-put 'semantic-lex-keyword-put)
-(semantic-alias-obsolete 'semantic-flex-keyword-get 'semantic-lex-keyword-get)
-(semantic-alias-obsolete 'semantic-flex-map-keywords
'semantic-lex-map-keywords)
-(semantic-alias-obsolete 'semantic-flex-keywords 'semantic-lex-keywords)
-(semantic-alias-obsolete 'semantic-flex-buffer 'semantic-lex-buffer)
-(semantic-alias-obsolete 'semantic-flex-list 'semantic-lex-list)
+(semantic-alias-obsolete 'semantic-flex-start 'semantic-lex-token-start "23.2")
+(semantic-alias-obsolete 'semantic-flex-end 'semantic-lex-token-end "23.2")
+(semantic-alias-obsolete 'semantic-flex-text 'semantic-lex-token-text "23.2")
+(semantic-alias-obsolete 'semantic-flex-make-keyword-table
'semantic-lex-make-keyword-table "23.2")
+(semantic-alias-obsolete 'semantic-flex-keyword-p 'semantic-lex-keyword-p
"23.2")
+(semantic-alias-obsolete 'semantic-flex-keyword-put 'semantic-lex-keyword-put
"23.2")
+(semantic-alias-obsolete 'semantic-flex-keyword-get 'semantic-lex-keyword-get
"23.2")
+(semantic-alias-obsolete 'semantic-flex-map-keywords
'semantic-lex-map-keywords "23.2")
+(semantic-alias-obsolete 'semantic-flex-keywords 'semantic-lex-keywords "23.2")
+(semantic-alias-obsolete 'semantic-flex-buffer 'semantic-lex-buffer "23.2")
+(semantic-alias-obsolete 'semantic-flex-list 'semantic-lex-list "23.2")
;; This simple scanner uses the syntax table to generate a stream of
;; simple tokens of the form:
Index: semantic/java.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/cedet/semantic/java.el,v
retrieving revision 1.3
retrieving revision 1.4
diff -u -b -r1.3 -r1.4
--- semantic/java.el 2 Oct 2009 10:53:35 -0000 1.3
+++ semantic/java.el 25 Oct 2009 02:55:28 -0000 1.4
@@ -232,7 +232,7 @@
tag parent color)))
(semantic-alias-obsolete 'semantic-java-prototype-nonterminal
- 'semantic-format-tag-prototype-java-mode)
+ 'semantic-format-tag-prototype-java-mode "23.2")
;; Include Tag Name
;;
Index: semantic/idle.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/cedet/semantic/idle.el,v
retrieving revision 1.5
retrieving revision 1.6
diff -u -b -r1.5 -r1.6
--- semantic/idle.el 17 Oct 2009 04:18:35 -0000 1.5
+++ semantic/idle.el 25 Oct 2009 02:55:28 -0000 1.6
@@ -493,9 +493,9 @@
This hook is not protected from lexical errors.")
(semantic-varalias-obsolete 'semantic-before-idle-scheduler-reparse-hooks
- 'semantic-before-idle-scheduler-reparse-hook)
+ 'semantic-before-idle-scheduler-reparse-hook "23.2")
(semantic-varalias-obsolete 'semantic-after-idle-scheduler-reparse-hooks
- 'semantic-after-idle-scheduler-reparse-hook)
+ 'semantic-after-idle-scheduler-reparse-hook "23.2")
(defun semantic-idle-scheduler-refresh-tags ()
"Refreshes the current buffer's tags.
Index: semantic/fw.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/cedet/semantic/fw.el,v
retrieving revision 1.4
retrieving revision 1.5
diff -u -b -r1.4 -r1.5
--- semantic/fw.el 24 Oct 2009 18:02:51 -0000 1.4
+++ semantic/fw.el 25 Oct 2009 02:55:28 -0000 1.5
@@ -148,7 +148,7 @@
(intern (substring sym-name (match-end 0)))
name)))
-(defun semantic-alias-obsolete (oldfnalias newfn &optional when)
+(defun semantic-alias-obsolete (oldfnalias newfn when)
"Make OLDFNALIAS an alias for NEWFN.
Mark OLDFNALIAS as obsolete, such that the byte compiler
will throw a warning when it encounters this symbol."
@@ -169,7 +169,7 @@
(semantic-overload-symbol-from-function oldfnalias))
))
-(defun semantic-varalias-obsolete (oldvaralias newvar &optional when)
+(defun semantic-varalias-obsolete (oldvaralias newvar when)
"Make OLDVARALIAS an alias for variable NEWVAR.
Mark OLDVARALIAS as obsolete, such that the byte compiler
will throw a warning when it encounters this symbol."
@@ -219,7 +219,7 @@
(defalias 'semantic-map-mode-buffers 'mode-local-map-mode-buffers)
(semantic-alias-obsolete 'define-mode-overload-implementation
- 'define-mode-local-override)
+ 'define-mode-local-override "23.2")
(defun semantic-install-function-overrides (overrides &optional transient mode)
"Install the function OVERRIDES in the specified environment.
Index: semantic/edit.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/cedet/semantic/edit.el,v
retrieving revision 1.4
retrieving revision 1.5
diff -u -b -r1.4 -r1.5
--- semantic/edit.el 2 Oct 2009 10:53:35 -0000 1.4
+++ semantic/edit.el 25 Oct 2009 02:55:28 -0000 1.5
@@ -117,7 +117,7 @@
When this happens, the buffer is marked as needing a full reparse.")
(semantic-varalias-obsolete 'semantic-edits-incremental-reparse-failed-hooks
- 'semantic-edits-incremental-reparse-failed-hook)
+ 'semantic-edits-incremental-reparse-failed-hook
"23.2")
(defcustom semantic-edits-verbose-flag nil
"Non-nil means the incremental parser is verbose.
Index: semantic/db-mode.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/cedet/semantic/db-mode.el,v
retrieving revision 1.3
retrieving revision 1.4
diff -u -b -r1.3 -r1.4
--- semantic/db-mode.el 2 Oct 2009 10:53:35 -0000 1.3
+++ semantic/db-mode.el 25 Oct 2009 02:55:28 -0000 1.4
@@ -71,7 +71,7 @@
(defvaralias 'semanticdb-mode-hook 'global-semanticdb-minor-mode-hook)
(defvaralias 'semanticdb-global-mode 'global-semanticdb-minor-mode)
(semantic-varalias-obsolete 'semanticdb-mode-hooks
- 'global-semanticdb-minor-mode-hook)
+ 'global-semanticdb-minor-mode-hook "23.2")
(defun semanticdb-toggle-global-mode ()
Index: semantic.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/cedet/semantic.el,v
retrieving revision 1.8
retrieving revision 1.9
diff -u -b -r1.8 -r1.9
--- semantic.el 4 Oct 2009 19:25:29 -0000 1.8
+++ semantic.el 25 Oct 2009 02:55:28 -0000 1.9
@@ -77,7 +77,7 @@
external parser used.")
(make-variable-buffer-local 'semantic--parse-table)
(semantic-varalias-obsolete 'semantic-toplevel-bovine-table
- 'semantic--parse-table)
+ 'semantic--parse-table "23.2")
(defvar semantic-symbol->name-assoc-list
'((type . "Types")
@@ -129,7 +129,7 @@
`semantic-after-toplevel-cache-change-hook'.")
(make-variable-buffer-local 'semantic--buffer-cache)
(semantic-varalias-obsolete 'semantic-toplevel-bovine-cache
- 'semantic--buffer-cache)
+ 'semantic--buffer-cache "23.2")
(defvar semantic-unmatched-syntax-cache nil
"A cached copy of unmatched syntax tokens.")
@@ -166,7 +166,7 @@
If any hook returns a nil value, the cached value is returned
immediately, even if it is empty.")
(semantic-varalias-obsolete 'semantic-before-toplevel-bovination-hook
- 'semantic--before-fetch-tags-hook)
+ 'semantic--before-fetch-tags-hook "23.2")
(defvar semantic-after-toplevel-bovinate-hook nil
"Hooks run after a toplevel parse.
@@ -298,11 +298,11 @@
a parse of the buffer.")
(semantic-varalias-obsolete 'semantic-init-hooks
- 'semantic-init-hook)
+ 'semantic-init-hook "23.2")
(semantic-varalias-obsolete 'semantic-init-mode-hooks
- 'semantic-init-mode-hook)
+ 'semantic-init-mode-hook "23.2")
(semantic-varalias-obsolete 'semantic-init-db-hooks
- 'semantic-init-db-hook)
+ 'semantic-init-db-hook "23.2")
(defvar semantic-new-buffer-fcn-was-run nil
"Non nil after `semantic-new-buffer-fcn' has been executed.")
@@ -550,7 +550,7 @@
'percent means we are doing a linear parse through the buffer.
'dynamic means we are reparsing specific tags.")
(semantic-varalias-obsolete 'semantic-bovination-working-type
- 'semantic-working-type)
+ 'semantic-working-type "23.2")
(defvar semantic-minimum-working-buffer-size (* 1024 5)
"*The minimum size of a buffer before working messages are displayed.
| [Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] emacs/lisp/cedet semantic/decorate/mode.el sema...,
Stefan Monnier <=