summaryrefslogtreecommitdiff
path: root/lisp/cedet/semantic/lex.el
diff options
context:
space:
mode:
authorGlenn Morris <rgm@gnu.org>2018-01-09 13:54:11 -0500
committerGlenn Morris <rgm@gnu.org>2018-01-09 13:54:11 -0500
commit34b41e3bc63db635612233a887a30ef11651c1c1 (patch)
tree35432811e88dfab34a173cf46f3b85f3bb3ff4f9 /lisp/cedet/semantic/lex.el
parente25f961e37b063c10d7ffb3caa167ff61e816dcb (diff)
downloademacs-34b41e3bc63db635612233a887a30ef11651c1c1.tar.gz
Quieten semantic normal usage
* lisp/cedet/semantic/lex.el (semantic-flex): Mark obsolete at compile time in the normal way, not at run-time. (Bug#30035)
Diffstat (limited to 'lisp/cedet/semantic/lex.el')
-rw-r--r--lisp/cedet/semantic/lex.el3
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/cedet/semantic/lex.el b/lisp/cedet/semantic/lex.el
index 9a35dd82f06..3a8b0c78002 100644
--- a/lisp/cedet/semantic/lex.el
+++ b/lisp/cedet/semantic/lex.el
@@ -471,6 +471,7 @@ PROPERTY set."
;;; Lexical Analyzer framework settings
;;
+;; FIXME change to non-obsolete default.
(defvar semantic-lex-analyzer 'semantic-flex
"The lexical analyzer used for a given buffer.
See `semantic-lex' for documentation.
@@ -1857,7 +1858,7 @@ end of the return token will be larger than END. To truly restrict
scanning, use `narrow-to-region'.
The last argument, LENGTH specifies that `semantic-flex' should only
return LENGTH tokens."
- (message "`semantic-flex' is an obsolete function. Use `define-lex' to create lexers.")
+ (declare (obsolete define-lex "23.2"))
(if (not semantic-flex-keywords-obarray)
(setq semantic-flex-keywords-obarray [ nil ]))
(let ((ts nil)