From 5daf973fa5ba6fdbf2b4a65f4aed6513e337be8e Mon Sep 17 00:00:00 2001 From: Camil Staps Date: Thu, 23 Jun 2016 09:29:58 +0200 Subject: exec flags --- test.icl | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'test.icl') diff --git a/test.icl b/test.icl index a89ffe4..6f6d306 100644 --- a/test.icl +++ b/test.icl @@ -4,7 +4,7 @@ import StdEnv import Regex import Data.Maybe -Start = map (match rgx) ["hello", "abc"] +Start = map (fromJust o (match rgx zero)) ["hello", "abc", "aXz"] where - (Just rgx) = toRegex 0 "^a[[:alnum:]]" + (Just rgx) = toRegex REG_EXTENDED "^a[a-z]*$" -- cgit v1.2.3