From 30e6e96de8d04d46a56b0610289af57c3f34bd1f Mon Sep 17 00:00:00 2001
From: Karen Arutyunov <karen@codesynthesis.com>
Date: Tue, 1 Oct 2019 16:37:17 +0300
Subject: Disable for GCC 4.9 failing testscript

---
 tests/switch/testscript | 28 ++++++++++++++++++----------
 1 file changed, 18 insertions(+), 10 deletions(-)

(limited to 'tests/switch')

diff --git a/tests/switch/testscript b/tests/switch/testscript
index 346e968..9e536e7 100644
--- a/tests/switch/testscript
+++ b/tests/switch/testscript
@@ -88,20 +88,28 @@ EOO
 
 : matcher-arg
 :
-$* <<EOI >>EOO
-for i: abc ABC aBC
+: Note that case-insensitive regex matching is broken in older versions of
+: libstdc++ (see GCC bug 71500 for details).
+:
+if ($cxx.id != 'gcc'       || \
+    $cxx.version.major > 7 || \
+    ($cxx.version.major == 7 && $cxx.version.minor >= 1))
 {
-  switch $i: regex.match icase
+  $* <<EOI >>EOO
+  for i: abc ABC aBC
   {
-    case '[a-z]+'
-      print a
+    switch $i: regex.match icase
+    {
+      case '[a-z]+'
+        print a
+    }
   }
+  EOI
+  a
+  a
+  a
+  EOO
 }
-EOI
-a
-a
-a
-EOO
 
 : matcher-multiple
 :
-- 
cgit v1.1