diff options
| author | Chong Yidong <cyd@stupidchicken.com> | 2009-08-31 00:45:41 +0000 |
|---|---|---|
| committer | Chong Yidong <cyd@stupidchicken.com> | 2009-08-31 00:45:41 +0000 |
| commit | 691a065ecb6920eb73f2a72229b8c803202a00b6 (patch) | |
| tree | bc828c8002ac6d2f65c93d144038687b1d045bec /lisp/cedet/semantic/db-ref.el | |
| parent | afa85dfef0d74a70c383cdcd7ed7dc10f4e50025 (diff) | |
| download | emacs-691a065ecb6920eb73f2a72229b8c803202a00b6.tar.gz | |
cedet/semantic/db-debug.el: Don't require semantic/db-mode, since
semanticdb-current-database and semanticdb-current-table are now in
semantic/db.el.
cedet/semantic/db-ebrowse.el: Don't require semantic/db-mode, since
semanticdb-current-database and semanticdb-current-table are now in
semantic/db.el.
cedet/semantic/db-el.el: Require semantic/lex-spp.
Require semantic/db instead of semantic/db-search.
cedet/semantic/db-file.el: Declare inversion-test and
data-debug-insert-thing.
(semanticdb-load-database): Load inversion only if necessary.
cedet/semantic/db-find.el: Autoload semanticdb-find-default-throttle.
Defvar data-debug-thing-alist, and ede-current-project.
Declare data-debug-insert-stuff-list, data-debug-insert-tag-list,
semantic-scope-reset-cache, and semanticdb-typecache-notify-reset.
Require semantic/tag-file, and semantic/sort.
(semantic-reset): Require semantic/scope.
(semanticdb-partial-synchronize): Require semantic/db-typecache.
(semanticdb-find-table-for-include) Move up to avoid compiler warning.
cedet/semantic/db-global.el: Declare data-debug-new-buffer and
data-debug-insert-thing.
(semanticdb-project-database-global) Move up to avoid compiler warning.
cedet/semantic/db-javascript.el: Fix provide statement.
Require semantic/db-find instead of semantic/db-search.
cedet/semantic/db-mode.el: Declare semantic-lex-spp-set-dynamic-table.
(semanticdb-current-database, semanticdb-current-table): Move into
semantic/db.el
cedet/semantic/db-ref.el: Require eieio, semantic/db, and semantic/util.
Declare data-debug-new-buffer and data-debug-insert-object-slots.
Defvar semantic-case-fold. Require semantic/find when compiling.
cedet/semantic/db-typecache.el: Require semantic/tag-ls,
semantic/analyze/fcn, and semantic/scope. Declare
data-debug-insert-thing and data-debug-new-buffer.
cedet/semantic/db.el (semanticdb-search-results-table): Move class
definition here from semantic/db-search.el.
(semanticdb-current-database, semanticdb-current-table) Move variable
definitions here from semantic/db-mode.el.
Diffstat (limited to 'lisp/cedet/semantic/db-ref.el')
| -rw-r--r-- | lisp/cedet/semantic/db-ref.el | 20 |
1 files changed, 18 insertions, 2 deletions
diff --git a/lisp/cedet/semantic/db-ref.el b/lisp/cedet/semantic/db-ref.el index 62faf9933c2..45f87edbc6e 100644 --- a/lisp/cedet/semantic/db-ref.el +++ b/lisp/cedet/semantic/db-ref.el @@ -1,4 +1,4 @@ -;;; db-ref.el --- Handle cross-db file references +;;; semantic/db-ref.el --- Handle cross-db file references ;;; Copyright (C) 2007, 2008, 2009 Free Software Foundation, Inc. @@ -36,6 +36,16 @@ ;;; Code: +(require 'eieio) +(require 'semantic/db) +(require 'semantic/util) + +(defvar semanticdb-find-default-throttle) + +;; For the semantic-find-tags-by-name-regexp macro. +(eval-when-compile (require 'semantic/find)) +(defvar semantic-case-fold) + (defmethod semanticdb-add-reference ((dbt semanticdb-abstract-table) include-tag) "Add a reference for the database table DBT based on INCLUDE-TAG. @@ -137,11 +147,17 @@ DBT, the second argument is DBT." (i-include :initarg :i-include)) "Simple class to allow ADEBUG to show a nice list.") +(defvar semanticdb-current-table) +(declare-function data-debug-new-buffer "data-debug") +(declare-function data-debug-insert-object-slots "data-debug") + (defun semanticdb-ref-test (refresh) "Dump out the list of references for the current buffer. If REFRESH is non-nil, cause the current table to have it's references refreshed before dumping the result." (interactive "p") + (require 'data-debug) + (require 'semantic/db) ;; If we need to refresh... then do so. (when refresh (semanticdb-refresh-references semanticdb-current-table)) @@ -158,4 +174,4 @@ refreshed before dumping the result." ) (provide 'semantic/db-ref) -;;; semanticdb-ref.el ends here +;;; semantic/db-ref.el ends here |
