diff options
| author | Richard M. Stallman | 1994-08-28 04:14:59 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 1994-08-28 04:14:59 +0000 |
| commit | 2e252751cb29cc8adef5b98d47662c0f8039f980 (patch) | |
| tree | a6efd76bb50b81dd0f93f37b2641826a96082920 | |
| parent | 33acbad21f51f22f583516db9b97010bd2df0564 (diff) | |
| download | emacs-2e252751cb29cc8adef5b98d47662c0f8039f980.tar.gz emacs-2e252751cb29cc8adef5b98d47662c0f8039f980.zip | |
(dbx): Use newline, not semicolon, between file and stop cmds.
| -rw-r--r-- | lisp/gud.el | 8 |
1 files changed, 0 insertions, 8 deletions
diff --git a/lisp/gud.el b/lisp/gud.el index bfb383d3bcd..fe47dc525ec 100644 --- a/lisp/gud.el +++ b/lisp/gud.el | |||
| @@ -635,14 +635,6 @@ and source-file directory for your debugger." | |||
| 635 | ;; Make dbx give out the source location info that we need. | 635 | ;; Make dbx give out the source location info that we need. |
| 636 | (process-send-string (get-buffer-process gud-comint-buffer) | 636 | (process-send-string (get-buffer-process gud-comint-buffer) |
| 637 | "printf \"\032\032%1d:\",$curline;file\n")) | 637 | "printf \"\032\032%1d:\",$curline;file\n")) |
| 638 | ((or (string-match "-sunos" system-configuration) | ||
| 639 | (string-match "-solaris" system-configuration)) | ||
| 640 | ;; The following works for both the UCB and SunPro 2.0.1 versions | ||
| 641 | ;; of dbx. The `stop' is lost using the `\n' separator as in the | ||
| 642 | ;; default case. Is there a dbx where the newline is actually | ||
| 643 | ;; necessary? (d.love@dl.ac.uk) | ||
| 644 | (gud-def gud-break "file \"%d%f\";stop at %l" | ||
| 645 | "\C-b" "Set breakpoint at current line.")) | ||
| 646 | (t | 638 | (t |
| 647 | (gud-def gud-break "file \"%d%f\"\nstop at %l" | 639 | (gud-def gud-break "file \"%d%f\"\nstop at %l" |
| 648 | "\C-b" "Set breakpoint at current line."))) | 640 | "\C-b" "Set breakpoint at current line."))) |