2 (load-file "../realgud.el")
4 (declare-function realgud:loaded-features 'realgud)
5 (declare-function realgud:unload-features 'realgud-regexp)
6 (declare-function __FILE__ 'load-relative)
11 (defvar test-realgud:features)
16 (note "realgud:loaded-features")
17 (set (make-local-variable 'test-realgud:features) (realgud:loaded-features))
18 (dolist (feature '(realgud-trepan realgud-pydbgr
20 (assert-t (not (not (member feature test-realgud:features)))) )
22 (note "realgud-unload-features")
23 (load-file "../realgud.el")
24 (assert-nil (not (realgud:loaded-features)))
25 (assert-nil (not (realgud:unload-features)))
26 (realgud:loaded-features)