From: Chong Yidong Date: Sat, 5 Sep 2009 20:38:12 +0000 (+0000) Subject: lisp/cedet/semantic/edit.el: Add local vars for autoloading. X-Git-Tag: emacs-pretest-23.1.90~1091^2~70 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=06b434594e3894899a2e224926db91ae681c1a70;p=emacs.git lisp/cedet/semantic/edit.el: Add local vars for autoloading. Autoload semantic-parse-changes-default defalias. lisp/cedet/semantic/analyze/complete.el: Require semantic/find when compiling. lisp/cedet/semantic/analyze/debug.el: Require semantic and semantic/analyze/complete. Require semantic/find when compiling. (semantic-analyzer-debug-insert-include-summary): Require semantic/dep. lisp/cedet/semantic/analyze/fcn.el: Require semantic and semantic/tag. --- diff --git a/lisp/cedet/semantic/analyze/complete.el b/lisp/cedet/semantic/analyze/complete.el index a44100b128f..c0914cefe4c 100644 --- a/lisp/cedet/semantic/analyze/complete.el +++ b/lisp/cedet/semantic/analyze/complete.el @@ -32,6 +32,9 @@ (require 'semantic/analyze) +;; For semantic-find-* macros: +(eval-when-compile (require 'semantic/find)) + ;;; Code: ;;; Helper Fcns @@ -272,6 +275,7 @@ Argument CONTEXT is an object specifying the locally derived context." ;; Local variables: ;; generated-autoload-file: "../loaddefs.el" ;; generated-autoload-feature: semantic/loaddefs +;; generated-autoload-load-name: "semantic/analyze/complete" ;; End: ;;; semantic/analyze/complete.el ends here diff --git a/lisp/cedet/semantic/analyze/debug.el b/lisp/cedet/semantic/analyze/debug.el index 09c1e70f23a..db89f66e300 100644 --- a/lisp/cedet/semantic/analyze/debug.el +++ b/lisp/cedet/semantic/analyze/debug.el @@ -24,9 +24,14 @@ ;; Provide a top-order debugging tool for figuring out what's going on with ;; smart completion and analyzer mode. +(require 'semantic) (require 'semantic/analyze) +(require 'semantic/analyze/complete) (require 'semantic/db-typecache) +;; For semantic-find-tags-by-class: +(eval-when-compile (require 'semantic/find)) + ;;; Code: (defun semantic-analyze-debug-assist () @@ -375,8 +380,11 @@ or implementing a version specific to ") (princ "\n")) (princ "\n"))) +(defvar semantic-dependency-system-include-path) + (defun semantic-analyzer-debug-insert-include-summary (table) "Display a summary of includes for the semanticdb TABLE." + (require 'semantic/dep) (semantic-fetch-tags) (let ((inc (semantic-find-tags-by-class 'include table)) ;;(path (semanticdb-find-test-translate-path-no-loading)) diff --git a/lisp/cedet/semantic/analyze/fcn.el b/lisp/cedet/semantic/analyze/fcn.el index 304ab12cbe8..6fe5c49b0bc 100644 --- a/lisp/cedet/semantic/analyze/fcn.el +++ b/lisp/cedet/semantic/analyze/fcn.el @@ -26,6 +26,8 @@ ;;; Code: (require 'mode-local) +(require 'semantic) +(require 'semantic/tag) ;;; Small Mode Specific Options ;; diff --git a/lisp/cedet/semantic/edit.el b/lisp/cedet/semantic/edit.el index 79cfe185dee..e53198aa7ab 100644 --- a/lisp/cedet/semantic/edit.el +++ b/lisp/cedet/semantic/edit.el @@ -818,6 +818,7 @@ This function is for internal use by `semantic-edits-incremental-parser'." changed-tags)) ;; Make it the default changes parser +;;;###autoload (defalias 'semantic-parse-changes-default 'semantic-edits-incremental-parser) @@ -961,4 +962,10 @@ lost if not transferred into NEWTAG." (provide 'semantic/edit) +;; Local variables: +;; generated-autoload-file: "loaddefs.el" +;; generated-autoload-feature: semantic/loaddefs +;; generated-autoload-load-name: "semantic/edit" +;; End: + ;;; semantic/edit.el ends here