Mercurial > emacs
changeset 105760:d0906291f75b
* 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.
| author | Stefan Monnier <monnier@iro.umontreal.ca> |
|---|---|
| date | Sun, 25 Oct 2009 02:55:27 +0000 |
| parents | 110c55336723 |
| children | 2a4b89270020 |
| files | lisp/cedet/semantic.el lisp/cedet/semantic/db-mode.el lisp/cedet/semantic/decorate/mode.el lisp/cedet/semantic/edit.el lisp/cedet/semantic/fw.el lisp/cedet/semantic/idle.el lisp/cedet/semantic/java.el lisp/cedet/semantic/lex.el lisp/cedet/semantic/tag-file.el lisp/cedet/semantic/tag.el lisp/cedet/semantic/util.el lisp/cedet/semantic/wisent.el |
| diffstat | 12 files changed, 36 insertions(+), 36 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/cedet/semantic.el Sun Oct 25 02:07:45 2009 +0000 +++ b/lisp/cedet/semantic.el Sun Oct 25 02:55:27 2009 +0000 @@ -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.
--- a/lisp/cedet/semantic/db-mode.el Sun Oct 25 02:07:45 2009 +0000 +++ b/lisp/cedet/semantic/db-mode.el Sun Oct 25 02:55:27 2009 +0000 @@ -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 ()
--- a/lisp/cedet/semantic/decorate/mode.el Sun Oct 25 02:07:45 2009 +0000 +++ b/lisp/cedet/semantic/decorate/mode.el Sun Oct 25 02:55:27 2009 +0000 @@ -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.
--- a/lisp/cedet/semantic/edit.el Sun Oct 25 02:07:45 2009 +0000 +++ b/lisp/cedet/semantic/edit.el Sun Oct 25 02:55:27 2009 +0000 @@ -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.
--- a/lisp/cedet/semantic/fw.el Sun Oct 25 02:07:45 2009 +0000 +++ b/lisp/cedet/semantic/fw.el Sun Oct 25 02:55:27 2009 +0000 @@ -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.
--- a/lisp/cedet/semantic/idle.el Sun Oct 25 02:07:45 2009 +0000 +++ b/lisp/cedet/semantic/idle.el Sun Oct 25 02:55:27 2009 +0000 @@ -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.
--- a/lisp/cedet/semantic/java.el Sun Oct 25 02:07:45 2009 +0000 +++ b/lisp/cedet/semantic/java.el Sun Oct 25 02:55:27 2009 +0000 @@ -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 ;;
--- a/lisp/cedet/semantic/lex.el Sun Oct 25 02:07:45 2009 +0000 +++ b/lisp/cedet/semantic/lex.el Sun Oct 25 02:55:27 2009 +0000 @@ -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:
--- a/lisp/cedet/semantic/tag-file.el Sun Oct 25 02:07:45 2009 +0000 +++ b/lisp/cedet/semantic/tag-file.el Sun Oct 25 02:55:27 2009 +0000 @@ -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)
--- a/lisp/cedet/semantic/tag.el Sun Oct 25 02:07:45 2009 +0000 +++ b/lisp/cedet/semantic/tag.el Sun Oct 25 02:55:27 2009 +0000 @@ -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)
--- a/lisp/cedet/semantic/util.el Sun Oct 25 02:07:45 2009 +0000 +++ b/lisp/cedet/semantic/util.el Sun Oct 25 02:55:27 2009 +0000 @@ -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 ;;
--- a/lisp/cedet/semantic/wisent.el Sun Oct 25 02:07:45 2009 +0000 +++ b/lisp/cedet/semantic/wisent.el Sun Oct 25 02:55:27 2009 +0000 @@ -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.