# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 773599855 0
# Node ID 1eb5638ab4b5e0f83d8599cae483524acb13b49e
# Parent  750282040c1744770a54a5ded6377be516e4e387
(gud-mips-p): Check for OSF system on Alpha also.

diff -r 750282040c17 -r 1eb5638ab4b5 lisp/gud.el
--- a/lisp/gud.el	Thu Jul 07 16:25:53 1994 +0000
+++ b/lisp/gud.el	Thu Jul 07 16:50:55 1994 +0000
@@ -459,7 +459,8 @@
       ;; We haven't tested gud on this system:
       (string-match "^mips-[^-]*-riscos" system-configuration)
       ;; It's documented on OSF/1.3
-      (string-match "^mips-[^-]*-osf1" system-configuration))
+      (string-match "^mips-[^-]*-osf1" system-configuration)
+      (string-match "^alpha-[^-]*-osf" system-configuration))
   "Non-nil to assume the MIPS/OSF dbx conventions (argument `-emacs').")
 
 (defun gud-mipsdbx-massage-args (file args)