From 6e80eb23173ade6bdf9d6da43c067fa77e9162a5 Mon Sep 17 00:00:00 2001
From: Karl Williamson <public@khwilliamson.com>
Date: Sat, 4 Feb 2012 17:44:56 -0700
Subject: reg_posixcc.t: Add tests for \v, \V, \h, \H

---
 t/re/reg_posixcc.t | 6 +++++-
 1 file changed, 5 insertions(+), 1 deletion(-)

(limited to 't')

diff --git a/t/re/reg_posixcc.t b/t/re/reg_posixcc.t
index d37411be38..29364bc30d 100644
--- a/t/re/reg_posixcc.t
+++ b/t/re/reg_posixcc.t
@@ -17,6 +17,10 @@ my @pats=(
 	    "\\S",
 	    "\\d",
 	    "\\D",
+            "\\h",
+	    "\\H",
+            "\\v",
+	    "\\V",
 	    "[:alnum:]",
 	    "[:^alnum:]",
 	    "[:alpha:]",
@@ -98,7 +102,7 @@ while (@pats) {
             $got{"[^$yes]"}{$type} = $str=~/[^$yes]/ ? 1 : 0;
             $got{"[^$no]"}{$type} = $str=~/[^$no]/ ? 1 : 0;
 
-            # For \w, \s, and \d, also test without being in character
+            # For \w, \s, and \d, \h, \v, also test without being in character
             # classes.
             next if $yes =~ /\[/;
 
-- 
cgit v1.2.1