From 43072fd1ec168662f2072e60fd1e5dbae6ea05d1 Mon Sep 17 00:00:00 2001
From: Nat Quayle Nelson <natquaylenelson@gmail.com>
Date: Fri, 29 Oct 2021 22:33:59 -0400
Subject: [PATCH] R.optional

---
 projects/re-flex/src/re_flex/R.kiss | 3 +++
 1 file changed, 3 insertions(+)

diff --git a/projects/re-flex/src/re_flex/R.kiss b/projects/re-flex/src/re_flex/R.kiss
index 92d0dd00..4147a318 100644
--- a/projects/re-flex/src/re_flex/R.kiss
+++ b/projects/re-flex/src/re_flex/R.kiss
@@ -40,6 +40,9 @@
                 (true
                     (for _ (range (- max min)) (oneOf expr "")))))))
 
+(function :String optional [:String expr]
+    (repeat expr 0 1))
+
 // TODO could memoize compiled regexes
 (function :Null<RMatch> match [:String regex :String textToSearch &opt :String flags]
     (#if hxnodejs