aboutsummaryrefslogtreecommitdiffstats
path: root/test/ignrcas2.awk
diff options
context:
space:
mode:
Diffstat (limited to 'test/ignrcas2.awk')
-rw-r--r--test/ignrcas2.awk13
1 files changed, 13 insertions, 0 deletions
diff --git a/test/ignrcas2.awk b/test/ignrcas2.awk
new file mode 100644
index 00000000..b7ef0cdf
--- /dev/null
+++ b/test/ignrcas2.awk
@@ -0,0 +1,13 @@
+# Based on test program submitted by:
+# Date: Sun, 7 Sep 2003 23:11:51 +0200
+# From: Michael Mauch <michael.mauch@gmx.de>
+# To: bug-gawk@gnu.org
+# Subject: Internal error in gawk-3.1.3 with character class
+
+BEGIN {
+ IGNORECASE = 1
+ if ("a" ~ /[[:alnum:]]/)
+ print "OK"
+ else
+ print "NOT OK"
+}