From fb8147fd407535eeabf3994ce55a6fb9de150f08 Mon Sep 17 00:00:00 2001
From: Adam Radziszewski <adam.radziszewski@pwr.wroc.pl>
Date: Fri, 10 Dec 2010 13:57:59 +0100
Subject: [PATCH] tests for regex

---
 tests/data/string.ccl | 16 ++++++++++++++++
 1 file changed, 16 insertions(+)

diff --git a/tests/data/string.ccl b/tests/data/string.ccl
index 69dd884..7aa3136 100644
--- a/tests/data/string.ccl
+++ b/tests/data/string.ccl
@@ -24,3 +24,19 @@ affix(["psi", "pies"], 0)
 
 ["pies", "psi"]
 ---
+regex(["ökonomisch", "ökologisch", "oko", "okoń", "ok"], "\\p{Ll}+")
+
+True
+---
+regex(["ökonomisch", "ökologisch", "okoŃ", "okoń", "ok"], "\\p{Ll}+")
+
+False
+---
+regex(["SCHLÜSSEL.", "OKOŃ;", "ŹDŹBŁO:"], "\\p{Lu}+\\p{P}")
+
+True
+---
+regex(["SCHLÜSSEL.", "OKOń;", "ŹDŹBŁO:"], "\\p{Lu}+\\p{P}")
+
+False
+---
-- 
GitLab