Build text parser

src/org/org_builder.nim

@@ -0,0 +1,17 @@
+import ./org_types
+import ../parser/parser_types
+
+type OrgBuilderT* = seq[OrgElement]
+type StringBuilder* = Builder[OrgBuilderT]
+type OrgBuilderResult* = BuilderResult[OrgBuilderT]
+
+proc concat*(typeInfo: OrgBuilderT): (seq[ParserToken], seq[OrgBuilderT]) -> seq[OrgBuilderT] =
+  return proc(xs: seq[ParserToken], ys: seq[OrgBuilderT]): seq[OrgBuilderT] =
+    return ys & xs.foldl(a & b.tokenStringValue() & seperator, typeInfo)
+
+proc initStringBuilder*(str: string): StringBuilderResult =
+  StringBuilderResult
+  .ok(StringBuilder((
+    parser: initParser(str),
+    tree: newSeq[OrgBuilderT](),
+  )))