changeset 51619:16b79b135bf5

(gud-find-expr-function): Rename from gud-find-expr. (gud-find-fortran-expr): Move to fortran.el.
author Stefan Monnier <monnier@iro.umontreal.ca>
date Wed, 18 Jun 2003 23:26:28 +0000
parents 6a5cb63d165c
children a668aa6d6cdc
files lisp/progmodes/gud.el
diffstat 1 files changed, 2 insertions(+), 7 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/progmodes/gud.el	Wed Jun 18 23:25:39 2003 +0000
+++ b/lisp/progmodes/gud.el	Wed Jun 18 23:26:28 2003 +0000
@@ -2658,15 +2658,10 @@
 ;; point is gud-find-expr, which tries to return an lvalue expression from
 ;; around point.
 
-(defvar gud-find-expr 'gud-find-c-expr)
+(defvar gud-find-expr-function 'gud-find-c-expr)
 
 (defun gud-find-expr (&rest args)
-  (apply gud-find-expr args))
-
-(defun gud-find-fortran-expr ()
-  ;; Consider \n as punctuation (end of expression).
-  (with-syntax-table fortran-gud-syntax-table
-    (gud-find-c-expr)))
+  (apply gud-find-expr-function args))
 
 ;; The next eight functions are hacked from gdbsrc.el by
 ;; Debby Ayers <ayers@asc.slb.com>,