From dd0f8fcfe49b282ab0581e22934f64dd4cef951a Mon Sep 17 00:00:00 2001
From: David Edelsohn <dje.gcc@gmail.com>
Date: Sun, 30 Apr 1995 20:16:22 +0000
Subject: (gas-dg-test): Detect invalid values of `do_what'.

---
 gas/testsuite/lib/gas-dg.exp | 4 ++++
 1 file changed, 4 insertions(+)

(limited to 'gas/testsuite')

diff --git a/gas/testsuite/lib/gas-dg.exp b/gas/testsuite/lib/gas-dg.exp
index ab0741c..031ca34 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
-- 
cgit v1.1