From: David Edelsohn <dje.gcc@gmail.com>
Date: Sun, 30 Apr 1995 20:16:22 +0000 (+0000)
Subject: (gas-dg-test): Detect invalid values of `do_what'.
X-Git-Url: https://git.libre-soc.org/?a=commitdiff_plain;h=dd0f8fcfe49b282ab0581e22934f64dd4cef951a;p=binutils-gdb.git

(gas-dg-test): Detect invalid values of `do_what'.
---

diff --git a/gas/testsuite/lib/gas-dg.exp b/gas/testsuite/lib/gas-dg.exp
index ab0741c2eb2..031ca342aa5 100644
--- a/gas/testsuite/lib/gas-dg.exp
+++ b/gas/testsuite/lib/gas-dg.exp
@@ -17,6 +17,10 @@ proc gas-dg-test { prog do_what tool_flags default_tool_flags libs } {
 	}
 	"run" {
 	}
+	default {
+	    perror "$do_what: not a valid dg-do keyword"
+	    return
+	}
     }
 
     # gas_start prepends $srcdir/$subdir so we must remove it from PROG