Mercurial > emacs
changeset 10447:55bc74681031
(dbx): Fix missing cast of $curline for Irix.
(gud-irixdbx-marker-filter): Make $curline cast consistent with the others.
author | Richard M. Stallman <rms@gnu.org> |
---|---|
date | Tue, 17 Jan 1995 22:31:45 +0000 |
parents | 034609a036b1 |
children | ec596f12f13f |
files | lisp/gud.el |
diffstat | 1 files changed, 2 insertions(+), 2 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/gud.el Tue Jan 17 20:53:31 1995 +0000 +++ b/lisp/gud.el Tue Jan 17 22:31:45 1995 +0000 @@ -618,7 +618,7 @@ ;; prod dbx into printing out the line number and file ;; name in a form we can grok as below (process-send-string (get-buffer-process gud-comint-buffer) - "printf \"\032\032%1d:\",(int)$curline;file\n")) + "printf \"\032\032%1d:\",(long)$curline;file\n")) ;; look for result of, say, "up" e.g.: ;; .pplot.pplot(0x800) ["src/pplot.f":261, 0x400c7c] ;; (this will also catch one of the lines printed by "where") @@ -693,7 +693,7 @@ ">" "Down (numeric arg) stack frames.") ;; Make dbx give out the source location info that we need. (process-send-string (get-buffer-process gud-comint-buffer) - "printf \"\032\032%1d:\",$curline;file\n")) + "printf \"\032\032%1d:\",(long)$curline;file\n")) (t (gud-def gud-up "up %p" "<" "Up (numeric arg) stack frames.") (gud-def gud-down "down %p" ">" "Down (numeric arg) stack frames.")