aboutsummaryrefslogtreecommitdiffstats
path: root/lisp/cedet/srecode/semantic.el
diff options
context:
space:
mode:
authorStefan Monnier2019-10-11 13:54:30 -0400
committerStefan Monnier2019-10-11 13:54:30 -0400
commita93dceda3fdcca18b51cb96461e1b8a4fc61bfd7 (patch)
treecea78c213727884969164b13de3ececf4233a96d /lisp/cedet/srecode/semantic.el
parent421db07d061cdc493300b30646c2acd13f26d8f3 (diff)
downloademacs-a93dceda3fdcca18b51cb96461e1b8a4fc61bfd7.tar.gz
emacs-a93dceda3fdcca18b51cb96461e1b8a4fc61bfd7.zip
* lisp/cedet/mode-local.el (define-overload): Declare obsolete
* lisp/cedet/srecode/ctxt.el (srecode-calculate-context): * lisp/cedet/srecode/semantic.el (srecode-semantic-apply-tag-to-dict) (srecode-semantic-find-template): Use define-overloadable-function instead.
Diffstat (limited to 'lisp/cedet/srecode/semantic.el')
-rw-r--r--lisp/cedet/srecode/semantic.el4
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/cedet/srecode/semantic.el b/lisp/cedet/srecode/semantic.el
index 1e1a60e0245..344b908da32 100644
--- a/lisp/cedet/srecode/semantic.el
+++ b/lisp/cedet/srecode/semantic.el
@@ -89,7 +89,7 @@ If this is nil, then `senator-tag-ring' is used.")
89The hook is called with two arguments, the TAG and DICT 89The hook is called with two arguments, the TAG and DICT
90to be augmented.") 90to be augmented.")
91 91
92(define-overload srecode-semantic-apply-tag-to-dict (tagobj dict) 92(define-overloadable-function srecode-semantic-apply-tag-to-dict (tagobj dict)
93 "Insert features of TAGOBJ into the dictionary DICT. 93 "Insert features of TAGOBJ into the dictionary DICT.
94TAGOBJ is an object of class `srecode-semantic-tag'. This class 94TAGOBJ is an object of class `srecode-semantic-tag'. This class
95is a compound inserter value. 95is a compound inserter value.
@@ -227,7 +227,7 @@ Assumes the cursor is in a tag of class type. If not, throw an error."
227;;; INSERT A TAG API 227;;; INSERT A TAG API
228;; 228;;
229;; Routines that take a tag, and insert into a buffer. 229;; Routines that take a tag, and insert into a buffer.
230(define-overload srecode-semantic-find-template (class prototype ctxt) 230(define-overloadable-function srecode-semantic-find-template (class prototype ctxt)
231 "Find a template for a tag of class CLASS based on context. 231 "Find a template for a tag of class CLASS based on context.
232PROTOTYPE is non-nil if we want a prototype template instead." 232PROTOTYPE is non-nil if we want a prototype template instead."
233 ) 233 )