From 6f68d15565e158e0f595d2a5d75f0de0c09c7acf Mon Sep 17 00:00:00 2001 From: Nat Quayle Nelson Date: Fri, 21 Oct 2022 19:51:17 +0000 Subject: [PATCH] R.oneOfChars --- src/re_flex/R.kiss | 3 +++ 1 file changed, 3 insertions(+) diff --git a/src/re_flex/R.kiss b/src/re_flex/R.kiss index 3ebf165..0a86e00 100644 --- a/src/re_flex/R.kiss +++ b/src/re_flex/R.kiss @@ -28,6 +28,9 @@ (var :Function oneOf (Reflect.makeVarArgs _oneOf)) +(function :String oneOfChars [:String chars] + (_oneOf (map (chars.split "") R.escape))) + (function :String repeat [:String expr &opt :Int min :Int max] (apply group (concat