From 5f318627d716c0e353f33fe412ad9bbd50c7e340 Mon Sep 17 00:00:00 2001
From: Rickard Green <rickard@erlang.org>
Date: Mon, 27 Mar 2017 15:08:43 +0200
Subject: Update tests for PCRE version 8.40

---
 lib/stdlib/test/re_SUITE_data/testoutput4 | 20 ++++++++++++++++++++
 1 file changed, 20 insertions(+)

(limited to 'lib/stdlib/test/re_SUITE_data/testoutput4')

diff --git a/lib/stdlib/test/re_SUITE_data/testoutput4 b/lib/stdlib/test/re_SUITE_data/testoutput4
index 6694111fb5..d43c12392d 100644
--- a/lib/stdlib/test/re_SUITE_data/testoutput4
+++ b/lib/stdlib/test/re_SUITE_data/testoutput4
@@ -1,6 +1,8 @@
 /-- This set of tests is for UTF support, excluding Unicode properties. It is
     compatible with all versions of Perl >= 5.10 and both the 8-bit and 16-bit
     PCRE libraries. --/
+    
+< forbid 9?=ABCDEFfGILMNPTUWXZ<
    
 /a.b/8
     acb
@@ -1257,4 +1259,22 @@ No match
     \x{100}\x{100}\x{100}
 No match
 
+/^a+[a\x{200}]/8
+    aa
+ 0: aa
+
+/^.\B.\B./8
+    \x{10123}\x{10124}\x{10125}
+ 0: \x{10123}\x{10124}\x{10125}
+
+/^#[^\x{ffff}]#[^\x{ffff}]#[^\x{ffff}]#/8
+    #\x{10000}#\x{100}#\x{10ffff}#
+ 0: #\x{10000}#\x{100}#\x{10ffff}#
+
+"[\S\V\H]"8
+
+/\C(\W?ſ)'?{{/8
+    \\C(\\W?ſ)'?{{
+No match
+
 /-- End of testinput4 --/
-- 
cgit v1.2.3