summaryrefslogtreecommitdiff
path: root/lisp/cedet/semantic/db-ebrowse.el
diff options
context:
space:
mode:
authorChong Yidong <cyd@stupidchicken.com>2009-09-20 03:44:02 +0000
committerChong Yidong <cyd@stupidchicken.com>2009-09-20 03:44:02 +0000
commit00999a2ef0648870573dcb3a3866c6401db8bc28 (patch)
tree208a115701fffc358811e9612c99c874484abd2b /lisp/cedet/semantic/db-ebrowse.el
parent1eac105a705a5d055f38e2734c16101d0f550112 (diff)
downloademacs-00999a2ef0648870573dcb3a3866c6401db8bc28.tar.gz
emacs-00999a2ef0648870573dcb3a3866c6401db8bc28.tar.bz2
emacs-00999a2ef0648870573dcb3a3866c6401db8bc28.zip
* files.el (auto-mode-alist): Use emacs-lisp-mode for Project.ede.
* cedet/semantic/bovine/gcc.el (semantic-gcc-test-output-parser) (semantic-gcc-test-output-parser-this-machine): * cedet/semantic/symref/filter.el (semantic-symref-test-count-hits-in-tag): * cedet/semantic/db-global.el (semanticdb-test-gnu-global): * cedet/semantic/tag-write.el (semantic-tag-write-test) (semantic-tag-write-list-test): * cedet/semantic/lex-spp.el (semantic-lex-spp-write-test) (semantic-lex-spp-write-utest): * cedet/semantic/lex.el (semantic-lex-test-region) (semantic-lex-test-full-depth): * cedet/semantic/idle.el (semantic-idle-pnf-test): * cedet/semantic/fw.el (semantic-test-data-cache) (semantic-test-throw-on-input): * cedet/semantic/format.el (semantic-test-all-format-tag-functions): * cedet/semantic/complete.el (semantic-complete-test): * cedet/semantic/db-ebrowse.el (semanticdb-ebrowse-run-tests) (semanticdb-ebrowse-dump): Test functions moved to semantic-tests.el in the test/ directory. * cedet/semantic/db-ref.el (semanticdb-ref-test): Doc fix.
Diffstat (limited to 'lisp/cedet/semantic/db-ebrowse.el')
-rw-r--r--lisp/cedet/semantic/db-ebrowse.el43
1 files changed, 0 insertions, 43 deletions
diff --git a/lisp/cedet/semantic/db-ebrowse.el b/lisp/cedet/semantic/db-ebrowse.el
index dcd27e786eb..6101f3a8b66 100644
--- a/lisp/cedet/semantic/db-ebrowse.el
+++ b/lisp/cedet/semantic/db-ebrowse.el
@@ -59,8 +59,6 @@
(require 'semantic/find)
(declare-function semantic-add-system-include "semantic/dep")
-(declare-function data-debug-new-buffer "data-debug")
-(declare-function data-debug-insert-thing "data-debug")
(eval-and-compile
;; Hopefully, this will allow semanticdb-ebrowse to compile under
@@ -668,47 +666,6 @@ Return a list of tags."
nil
))
-;;; TESTING
-;;
-;; This is a complex bit of stuff. Here are some tests for the
-;; system.
-
-(defun semanticdb-ebrowse-run-tests ()
- "Run some tests of the semanticdb-ebrowse system.
-All systems are different. Ask questions along the way."
- (interactive)
- (let ((doload nil))
- (when (y-or-n-p "Create a system database to test with? ")
- (call-interactively 'semanticdb-create-ebrowse-database)
- (setq doload t))
- ;; Should we load in caches
- (when (if doload
- (y-or-n-p "New database created. Reload system databases? ")
- (y-or-n-p "Load in all system databases? "))
- (semanticdb-load-ebrowse-caches)))
- ;; Ok, databases were creatd. Lets try some searching.
- (when (not (or (eq major-mode 'c-mode)
- (eq major-mode 'c++-mode)))
- (error "Please make your default buffer be a C or C++ file, then
-run the test again..")
- )
-
- )
-
-(defun semanticdb-ebrowse-dump ()
- "Find the first loaded ebrowse table, and dump out the contents."
- (interactive)
- (require 'data-debug)
- (let ((db semanticdb-database-list)
- (ab nil))
- (while db
- (when (semanticdb-project-database-ebrowse-p (car db))
- (setq ab (data-debug-new-buffer "*EBROWSE Database*"))
- (data-debug-insert-thing (car db) "*" "")
- (setq db nil)
- )
- (setq db (cdr db)))))
-
(provide 'semantic/db-ebrowse)
;;; semantic/db-ebrowse.el ends here