From c3f6b2b4128b438cf8134137cbee8ed496f27869 Mon Sep 17 00:00:00 2001 From: Stefan Monnier Date: Wed, 18 Jun 2003 23:26:28 +0000 Subject: [PATCH] (gud-find-expr-function): Rename from gud-find-expr. (gud-find-fortran-expr): Move to fortran.el. --- lisp/progmodes/gud.el | 9 ++------- 1 file changed, 2 insertions(+), 7 deletions(-) diff --git a/lisp/progmodes/gud.el b/lisp/progmodes/gud.el index e449553fd9b..695f884a6a7 100644 --- a/lisp/progmodes/gud.el +++ b/lisp/progmodes/gud.el @@ -2658,15 +2658,10 @@ Obeying it means displaying in another window the specified file and line." ;; 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 , -- 2.39.2