RegexConversion class

projects/kiss-vscode/src/ktxt2/RegexConversion.hx

@@ -0,0 +1,8 @@
+package ktxt2;
+
+import kiss.Prelude;
+import kiss.List;
+import re_flex.R;
+
+@:build(kiss.Kiss.build())
+class RegexConversion {}

projects/kiss-vscode/src/ktxt2/RegexConversion.kiss

@@ -0,0 +1,9 @@
+(defNew [&prop &mut :String name
+            &prop &mut :String sourceType
+            &prop &mut :String outputType
+            :String regex
+            :String blockTemplate]
+    [
+        &mut :String->Bool canConvert ->block ?(R.match regex block)
+        &mut :String->String convert ->_ "\$(let [groups .namedGroups (R.match \"${regex}\" source) group ->g (dictGet groups g)] \"${blockTemplate}\")"
+    ])