@nfdi4plants/arctrl 3.1.0 → 3.1.1

package/dist/ts/ts/fable_modules/YAMLicious.1.0.0-alpha.7/Preprocessing.fs.js

@@ -1,181 +0,0 @@
-import { length, takeWhile } from '../../../node_modules/@fable-org/fable-library-js/Seq.js';
-import { trimStart, substring } from '../../../node_modules/@fable-org/fable-library-js/String.js';
-import { isWhiteSpace } from '../../../node_modules/@fable-org/fable-library-js/Char.js';
-import { Config_init_71136F3F, Config__get_WhitespaceString, Config, PreprocessorElement_Line, PreprocessorElement_Intendation, Preprocessor, PreprocessorElement_Level } from './YAMLiciousTypes.fs.js';
-import { value } from '../../../node_modules/@fable-org/fable-library-js/Option.js';
-import { StringBuffer_$ctor, StringBuffer__AppendLine_Z721C83C5 } from './StringBuffer.fs.js';
-import { getEnumerator, disposeSafe } from '../../../node_modules/@fable-org/fable-library-js/Util.js';
-import { toString } from '../../../node_modules/@fable-org/fable-library-js/Types.js';
-import { pipeline } from './Persil.fs.js';
-import { isEmpty, tail, head, tryFind, cons, takeWhile as takeWhile$1, skipWhile, reverse, empty, ofArray, ofSeq } from '../../../node_modules/@fable-org/fable-library-js/List.js';
-
-function ReadHelpers_indentLevel(line) {
-  return length(takeWhile((c) => c === " ", line.split("")));
-}
-function isDocumentMarker(marker, line) {
-  const trimmed = trimStart(line);
-  if (!trimmed.startsWith(marker)) {
-    return false;
-  } else if (trimmed.length === marker.length) {
-    return true;
-  } else {
-    return isWhiteSpace(trimmed[marker.length]);
-  }
-}
-function isDocumentStart(line) {
-  return isDocumentMarker("---", line);
-}
-function isDocumentEnd(line) {
-  return isDocumentMarker("...", line);
-}
-function write(rootElement, fconfig) {
-  let config_1;
-  const config = Config_init_71136F3F();
-  config_1 = fconfig != null ? value(fconfig)(config) : config;
-  const sb = StringBuffer_$ctor();
-  const loop = (current, sb_1, config_2) => {
-    switch (current.tag) {
-      case /* Intendation */
-      1: {
-        const nextConfig = new Config(config_2.Whitespace, config_2.Level + 1);
-        const enumerator = getEnumerator(current.fields[0]);
-        try {
-          while (enumerator["System.Collections.IEnumerator.MoveNext"]()) {
-            loop(enumerator["System.Collections.Generic.IEnumerator`1.get_Current"](), sb_1, nextConfig);
-          }
-        } finally {
-          disposeSafe(enumerator);
-        }
-        break;
-      }
-      case /* Level */
-      0: {
-        const enumerator_1 = getEnumerator(current.fields[0]);
-        try {
-          while (enumerator_1["System.Collections.IEnumerator.MoveNext"]()) {
-            loop(enumerator_1["System.Collections.Generic.IEnumerator`1.get_Current"](), sb_1, config_2);
-          }
-        } finally {
-          disposeSafe(enumerator_1);
-        }
-        break;
-      }
-      case /* Nil */
-      3: {
-        break;
-      }
-      default: {
-        const line = current.fields[0];
-        StringBuffer__AppendLine_Z721C83C5(sb_1, Config__get_WhitespaceString(config_2) + line);
-      }
-    }
-  };
-  loop(rootElement, sb, config_1);
-  return toString(sb);
-}
-function read(yamlStr) {
-  const content = pipeline(yamlStr);
-  const stripIndent = (indent, line) => {
-    if (indent <= 0) {
-      return line;
-    } else if (line.length >= indent) {
-      return substring(line, indent);
-    } else {
-      return trimStart(line);
-    }
-  };
-  const loop = (lines_mut, currentIntendation_mut, acc_mut) => {
-    loop:
-      while (true) {
-        const lines = lines_mut, currentIntendation = currentIntendation_mut, acc = acc_mut;
-        if (!isEmpty(lines)) {
-          const rest = tail(lines);
-          const line_1 = head(lines);
-          if (line_1.trim() === "") {
-            const nextIndentedLine = tryFind((l) => l.trim() !== "", rest);
-            let matchResult, nextLine_1;
-            if (nextIndentedLine != null) {
-              if (ReadHelpers_indentLevel(value(nextIndentedLine)) > currentIntendation) {
-                matchResult = 0;
-                nextLine_1 = value(nextIndentedLine);
-              } else {
-                matchResult = 1;
-              }
-            } else {
-              matchResult = 1;
-            }
-            switch (matchResult) {
-              case 0: {
-                const nextIntendation = ReadHelpers_indentLevel(nextLine_1) | 0;
-                const nextLevelLines = takeWhile$1((l_1) => {
-                  if (l_1.trim() === "") {
-                    return true;
-                  } else {
-                    return ReadHelpers_indentLevel(l_1) > currentIntendation;
-                  }
-                }, cons(line_1, rest));
-                lines_mut = skipWhile((l_2) => {
-                  if (l_2.trim() === "") {
-                    return true;
-                  } else {
-                    return ReadHelpers_indentLevel(l_2) > currentIntendation;
-                  }
-                }, rest);
-                currentIntendation_mut = currentIntendation;
-                acc_mut = cons(PreprocessorElement_Intendation(reverse(loop(nextLevelLines, nextIntendation, empty()))), acc);
-                continue loop;
-              }
-              default: {
-                lines_mut = rest;
-                currentIntendation_mut = currentIntendation;
-                acc_mut = cons(PreprocessorElement_Line(""), acc);
-                continue loop;
-              }
-            }
-          } else {
-            const nextIntendation_1 = ReadHelpers_indentLevel(line_1) | 0;
-            if (nextIntendation_1 === currentIntendation) {
-              lines_mut = rest;
-              currentIntendation_mut = currentIntendation;
-              acc_mut = cons(PreprocessorElement_Line(stripIndent(currentIntendation, line_1)), acc);
-              continue loop;
-            } else {
-              const lineText_1 = stripIndent(nextIntendation_1, line_1);
-              const nextLevelLines_1 = takeWhile$1((l_3) => {
-                if (l_3.trim() === "") {
-                  return true;
-                } else {
-                  return ReadHelpers_indentLevel(l_3) > currentIntendation;
-                }
-              }, rest);
-              lines_mut = skipWhile((l_4) => {
-                if (l_4.trim() === "") {
-                  return true;
-                } else {
-                  return ReadHelpers_indentLevel(l_4) > currentIntendation;
-                }
-              }, rest);
-              currentIntendation_mut = currentIntendation;
-              acc_mut = cons(PreprocessorElement_Intendation(cons(PreprocessorElement_Line(lineText_1), reverse(loop(nextLevelLines_1, nextIntendation_1, empty())))), acc);
-              continue loop;
-            }
-          }
-        } else {
-          return acc;
-        }
-        break;
-      }
-  };
-  return new Preprocessor(PreprocessorElement_Level(reverse(loop(ofArray(content.Lines), 0, empty()))), content.StringMap, content.CommentMap, content.YAMLVersion, content.TagHandles);
-}
-function mkLine(line) {
-  return PreprocessorElement_Line(line);
-}
-function mklLevel(children) {
-  return PreprocessorElement_Level(ofSeq(children));
-}
-function mkIntendation(children) {
-  return PreprocessorElement_Intendation(ofSeq(children));
-}
-
-export { ReadHelpers_indentLevel, isDocumentEnd, isDocumentStart, mkIntendation, mkLine, mklLevel, read, write };