summaryrefslogtreecommitdiff
path: root/lisp/gud.el
diff options
context:
space:
mode:
authorRichard M. Stallman <rms@gnu.org>1995-12-01 18:19:34 +0000
committerRichard M. Stallman <rms@gnu.org>1995-12-01 18:19:34 +0000
commit80e0c45c3896e5552a387a2b533b5235b42094ce (patch)
tree8c6dadc71a463e8915867690e4b55b203f23465a /lisp/gud.el
parent1997da89a50ced317d5add33f083b8d616023c72 (diff)
downloademacs-80e0c45c3896e5552a387a2b533b5235b42094ce.tar.gz
(gud-sdb-marker-filter): start may be nil, so check it
with numberp before using it.
Diffstat (limited to 'lisp/gud.el')
-rw-r--r--lisp/gud.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/gud.el b/lisp/gud.el
index 0f8776f3529..e7a43647a7e 100644
--- a/lisp/gud.el
+++ b/lisp/gud.el
@@ -454,7 +454,7 @@ available with older versions of GDB."
;; Otherwise clear gud-marker-acc. to avoid an
;; unnecessary concat when this function runs next.
(setq gud-marker-acc
- (if (= start (length gud-marker-acc))
+ (if (and (numberp start) (= start (length gud-marker-acc)))
(substring gud-marker-acc start)
nil)))
string)