diff --git a/gas/testsuite/ChangeLog b/gas/testsuite/ChangeLog
index 21e65a309d..4fd13d3d89 100644
--- a/gas/testsuite/ChangeLog
+++ b/gas/testsuite/ChangeLog
@@ -1,3 +1,8 @@
+Wed Aug 29 12:05:13 2001  J"orn Rennecke <amylaar@redhat.com>
+
+	* lib/gas-defs.exp: (regexp_diff) At verbosity 3, also show
+	where mismatch occurs due to regexp mismatch.
+
 2001-08-27  Staffan Ulfberg  <staffanu@swox.se>
 	    Alan Modra  <amodra@bigpond.net.au>
 
diff --git a/gas/testsuite/lib/gas-defs.exp b/gas/testsuite/lib/gas-defs.exp
index 7f98c854e5..e695abf7cb 100644
--- a/gas/testsuite/lib/gas-defs.exp
+++ b/gas/testsuite/lib/gas-defs.exp
@@ -539,6 +539,7 @@ proc regexp_diff { file_1 file_2 } {
             if ![regexp "^$line_b$" "$line_a"] {
 		send_log "regexp_diff match failure\n"
 		send_log "regexp \"^$line_b$\"\nline   \"$line_a\"\n"
+		verbose "regexp_diff match failure\n" 3
 		set differences 1
             }
         }