From 500f12df892637116a998dfd7deda9a4e1ed09ae Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Sun, 24 May 1998 17:16:20 +0000 Subject: [PATCH] (gud-jdb-class-source-alist): defvar moved up. (gud-jdb-analysis-buffer): Likewise. --- lisp/gud.el | 14 +++++++------- 1 file changed, 7 insertions(+), 7 deletions(-) diff --git a/lisp/gud.el b/lisp/gud.el index 66cd552c7a8..9ccd06b4639 100644 --- a/lisp/gud.el +++ b/lisp/gud.el @@ -1494,6 +1494,13 @@ The file names should be absolute, or relative to the current directory.") ;; List of the java source files for this debugging session. (defvar gud-jdb-source-files nil) +;; Association list of fully qualified class names (package + class name) and +;; their source files. +(defvar gud-jdb-class-source-alist nil) + +;; This is used to hold a source file during analysis. +(defvar gud-jdb-analysis-buffer nil) + ;; Return a list of java source files. PATH gives the directories in ;; which to search for files with extension EXTN. Normally EXTN is ;; given as the regular expression "\\.java$" . @@ -1695,13 +1702,6 @@ The file names should be absolute, or relative to the current directory.") (cons c file)) (gud-jdb-analyze-source gud-jdb-analysis-buffer file))) -;; Association list of fully qualified class names (package + class name) and -;; their source files. -(defvar gud-jdb-class-source-alist nil) - -;; This is used to hold a source file during analysis. -(defvar gud-jdb-analysis-buffer nil) - ;; Return an alist of fully qualified classes and the source files ;; holding their definitions. SOURCES holds a list of all the source ;; files to examine. -- 2.39.2