@milkdown/crepe 7.3.6 → 7.4.0

package/lib/clojure-iYO8U8Sg.js

@@ -1,810 +0,0 @@
-var d = ["false", "nil", "true"], l = [
-  ".",
-  "catch",
-  "def",
-  "do",
-  "if",
-  "monitor-enter",
-  "monitor-exit",
-  "new",
-  "quote",
-  "recur",
-  "set!",
-  "throw",
-  "try",
-  "var"
-], u = [
-  "*",
-  "*'",
-  "*1",
-  "*2",
-  "*3",
-  "*agent*",
-  "*allow-unresolved-vars*",
-  "*assert*",
-  "*clojure-version*",
-  "*command-line-args*",
-  "*compile-files*",
-  "*compile-path*",
-  "*compiler-options*",
-  "*data-readers*",
-  "*default-data-reader-fn*",
-  "*e",
-  "*err*",
-  "*file*",
-  "*flush-on-newline*",
-  "*fn-loader*",
-  "*in*",
-  "*math-context*",
-  "*ns*",
-  "*out*",
-  "*print-dup*",
-  "*print-length*",
-  "*print-level*",
-  "*print-meta*",
-  "*print-namespace-maps*",
-  "*print-readably*",
-  "*read-eval*",
-  "*reader-resolver*",
-  "*source-path*",
-  "*suppress-read*",
-  "*unchecked-math*",
-  "*use-context-classloader*",
-  "*verbose-defrecords*",
-  "*warn-on-reflection*",
-  "+",
-  "+'",
-  "-",
-  "-'",
-  "->",
-  "->>",
-  "->ArrayChunk",
-  "->Eduction",
-  "->Vec",
-  "->VecNode",
-  "->VecSeq",
-  "-cache-protocol-fn",
-  "-reset-methods",
-  "..",
-  "/",
-  "<",
-  "<=",
-  "=",
-  "==",
-  ">",
-  ">=",
-  "EMPTY-NODE",
-  "Inst",
-  "StackTraceElement->vec",
-  "Throwable->map",
-  "accessor",
-  "aclone",
-  "add-classpath",
-  "add-watch",
-  "agent",
-  "agent-error",
-  "agent-errors",
-  "aget",
-  "alength",
-  "alias",
-  "all-ns",
-  "alter",
-  "alter-meta!",
-  "alter-var-root",
-  "amap",
-  "ancestors",
-  "and",
-  "any?",
-  "apply",
-  "areduce",
-  "array-map",
-  "as->",
-  "aset",
-  "aset-boolean",
-  "aset-byte",
-  "aset-char",
-  "aset-double",
-  "aset-float",
-  "aset-int",
-  "aset-long",
-  "aset-short",
-  "assert",
-  "assoc",
-  "assoc!",
-  "assoc-in",
-  "associative?",
-  "atom",
-  "await",
-  "await-for",
-  "await1",
-  "bases",
-  "bean",
-  "bigdec",
-  "bigint",
-  "biginteger",
-  "binding",
-  "bit-and",
-  "bit-and-not",
-  "bit-clear",
-  "bit-flip",
-  "bit-not",
-  "bit-or",
-  "bit-set",
-  "bit-shift-left",
-  "bit-shift-right",
-  "bit-test",
-  "bit-xor",
-  "boolean",
-  "boolean-array",
-  "boolean?",
-  "booleans",
-  "bound-fn",
-  "bound-fn*",
-  "bound?",
-  "bounded-count",
-  "butlast",
-  "byte",
-  "byte-array",
-  "bytes",
-  "bytes?",
-  "case",
-  "cast",
-  "cat",
-  "char",
-  "char-array",
-  "char-escape-string",
-  "char-name-string",
-  "char?",
-  "chars",
-  "chunk",
-  "chunk-append",
-  "chunk-buffer",
-  "chunk-cons",
-  "chunk-first",
-  "chunk-next",
-  "chunk-rest",
-  "chunked-seq?",
-  "class",
-  "class?",
-  "clear-agent-errors",
-  "clojure-version",
-  "coll?",
-  "comment",
-  "commute",
-  "comp",
-  "comparator",
-  "compare",
-  "compare-and-set!",
-  "compile",
-  "complement",
-  "completing",
-  "concat",
-  "cond",
-  "cond->",
-  "cond->>",
-  "condp",
-  "conj",
-  "conj!",
-  "cons",
-  "constantly",
-  "construct-proxy",
-  "contains?",
-  "count",
-  "counted?",
-  "create-ns",
-  "create-struct",
-  "cycle",
-  "dec",
-  "dec'",
-  "decimal?",
-  "declare",
-  "dedupe",
-  "default-data-readers",
-  "definline",
-  "definterface",
-  "defmacro",
-  "defmethod",
-  "defmulti",
-  "defn",
-  "defn-",
-  "defonce",
-  "defprotocol",
-  "defrecord",
-  "defstruct",
-  "deftype",
-  "delay",
-  "delay?",
-  "deliver",
-  "denominator",
-  "deref",
-  "derive",
-  "descendants",
-  "destructure",
-  "disj",
-  "disj!",
-  "dissoc",
-  "dissoc!",
-  "distinct",
-  "distinct?",
-  "doall",
-  "dorun",
-  "doseq",
-  "dosync",
-  "dotimes",
-  "doto",
-  "double",
-  "double-array",
-  "double?",
-  "doubles",
-  "drop",
-  "drop-last",
-  "drop-while",
-  "eduction",
-  "empty",
-  "empty?",
-  "ensure",
-  "ensure-reduced",
-  "enumeration-seq",
-  "error-handler",
-  "error-mode",
-  "eval",
-  "even?",
-  "every-pred",
-  "every?",
-  "ex-data",
-  "ex-info",
-  "extend",
-  "extend-protocol",
-  "extend-type",
-  "extenders",
-  "extends?",
-  "false?",
-  "ffirst",
-  "file-seq",
-  "filter",
-  "filterv",
-  "find",
-  "find-keyword",
-  "find-ns",
-  "find-protocol-impl",
-  "find-protocol-method",
-  "find-var",
-  "first",
-  "flatten",
-  "float",
-  "float-array",
-  "float?",
-  "floats",
-  "flush",
-  "fn",
-  "fn?",
-  "fnext",
-  "fnil",
-  "for",
-  "force",
-  "format",
-  "frequencies",
-  "future",
-  "future-call",
-  "future-cancel",
-  "future-cancelled?",
-  "future-done?",
-  "future?",
-  "gen-class",
-  "gen-interface",
-  "gensym",
-  "get",
-  "get-in",
-  "get-method",
-  "get-proxy-class",
-  "get-thread-bindings",
-  "get-validator",
-  "group-by",
-  "halt-when",
-  "hash",
-  "hash-combine",
-  "hash-map",
-  "hash-ordered-coll",
-  "hash-set",
-  "hash-unordered-coll",
-  "ident?",
-  "identical?",
-  "identity",
-  "if-let",
-  "if-not",
-  "if-some",
-  "ifn?",
-  "import",
-  "in-ns",
-  "inc",
-  "inc'",
-  "indexed?",
-  "init-proxy",
-  "inst-ms",
-  "inst-ms*",
-  "inst?",
-  "instance?",
-  "int",
-  "int-array",
-  "int?",
-  "integer?",
-  "interleave",
-  "intern",
-  "interpose",
-  "into",
-  "into-array",
-  "ints",
-  "io!",
-  "isa?",
-  "iterate",
-  "iterator-seq",
-  "juxt",
-  "keep",
-  "keep-indexed",
-  "key",
-  "keys",
-  "keyword",
-  "keyword?",
-  "last",
-  "lazy-cat",
-  "lazy-seq",
-  "let",
-  "letfn",
-  "line-seq",
-  "list",
-  "list*",
-  "list?",
-  "load",
-  "load-file",
-  "load-reader",
-  "load-string",
-  "loaded-libs",
-  "locking",
-  "long",
-  "long-array",
-  "longs",
-  "loop",
-  "macroexpand",
-  "macroexpand-1",
-  "make-array",
-  "make-hierarchy",
-  "map",
-  "map-entry?",
-  "map-indexed",
-  "map?",
-  "mapcat",
-  "mapv",
-  "max",
-  "max-key",
-  "memfn",
-  "memoize",
-  "merge",
-  "merge-with",
-  "meta",
-  "method-sig",
-  "methods",
-  "min",
-  "min-key",
-  "mix-collection-hash",
-  "mod",
-  "munge",
-  "name",
-  "namespace",
-  "namespace-munge",
-  "nat-int?",
-  "neg-int?",
-  "neg?",
-  "newline",
-  "next",
-  "nfirst",
-  "nil?",
-  "nnext",
-  "not",
-  "not-any?",
-  "not-empty",
-  "not-every?",
-  "not=",
-  "ns",
-  "ns-aliases",
-  "ns-imports",
-  "ns-interns",
-  "ns-map",
-  "ns-name",
-  "ns-publics",
-  "ns-refers",
-  "ns-resolve",
-  "ns-unalias",
-  "ns-unmap",
-  "nth",
-  "nthnext",
-  "nthrest",
-  "num",
-  "number?",
-  "numerator",
-  "object-array",
-  "odd?",
-  "or",
-  "parents",
-  "partial",
-  "partition",
-  "partition-all",
-  "partition-by",
-  "pcalls",
-  "peek",
-  "persistent!",
-  "pmap",
-  "pop",
-  "pop!",
-  "pop-thread-bindings",
-  "pos-int?",
-  "pos?",
-  "pr",
-  "pr-str",
-  "prefer-method",
-  "prefers",
-  "primitives-classnames",
-  "print",
-  "print-ctor",
-  "print-dup",
-  "print-method",
-  "print-simple",
-  "print-str",
-  "printf",
-  "println",
-  "println-str",
-  "prn",
-  "prn-str",
-  "promise",
-  "proxy",
-  "proxy-call-with-super",
-  "proxy-mappings",
-  "proxy-name",
-  "proxy-super",
-  "push-thread-bindings",
-  "pvalues",
-  "qualified-ident?",
-  "qualified-keyword?",
-  "qualified-symbol?",
-  "quot",
-  "rand",
-  "rand-int",
-  "rand-nth",
-  "random-sample",
-  "range",
-  "ratio?",
-  "rational?",
-  "rationalize",
-  "re-find",
-  "re-groups",
-  "re-matcher",
-  "re-matches",
-  "re-pattern",
-  "re-seq",
-  "read",
-  "read-line",
-  "read-string",
-  "reader-conditional",
-  "reader-conditional?",
-  "realized?",
-  "record?",
-  "reduce",
-  "reduce-kv",
-  "reduced",
-  "reduced?",
-  "reductions",
-  "ref",
-  "ref-history-count",
-  "ref-max-history",
-  "ref-min-history",
-  "ref-set",
-  "refer",
-  "refer-clojure",
-  "reify",
-  "release-pending-sends",
-  "rem",
-  "remove",
-  "remove-all-methods",
-  "remove-method",
-  "remove-ns",
-  "remove-watch",
-  "repeat",
-  "repeatedly",
-  "replace",
-  "replicate",
-  "require",
-  "reset!",
-  "reset-meta!",
-  "reset-vals!",
-  "resolve",
-  "rest",
-  "restart-agent",
-  "resultset-seq",
-  "reverse",
-  "reversible?",
-  "rseq",
-  "rsubseq",
-  "run!",
-  "satisfies?",
-  "second",
-  "select-keys",
-  "send",
-  "send-off",
-  "send-via",
-  "seq",
-  "seq?",
-  "seqable?",
-  "seque",
-  "sequence",
-  "sequential?",
-  "set",
-  "set-agent-send-executor!",
-  "set-agent-send-off-executor!",
-  "set-error-handler!",
-  "set-error-mode!",
-  "set-validator!",
-  "set?",
-  "short",
-  "short-array",
-  "shorts",
-  "shuffle",
-  "shutdown-agents",
-  "simple-ident?",
-  "simple-keyword?",
-  "simple-symbol?",
-  "slurp",
-  "some",
-  "some->",
-  "some->>",
-  "some-fn",
-  "some?",
-  "sort",
-  "sort-by",
-  "sorted-map",
-  "sorted-map-by",
-  "sorted-set",
-  "sorted-set-by",
-  "sorted?",
-  "special-symbol?",
-  "spit",
-  "split-at",
-  "split-with",
-  "str",
-  "string?",
-  "struct",
-  "struct-map",
-  "subs",
-  "subseq",
-  "subvec",
-  "supers",
-  "swap!",
-  "swap-vals!",
-  "symbol",
-  "symbol?",
-  "sync",
-  "tagged-literal",
-  "tagged-literal?",
-  "take",
-  "take-last",
-  "take-nth",
-  "take-while",
-  "test",
-  "the-ns",
-  "thread-bound?",
-  "time",
-  "to-array",
-  "to-array-2d",
-  "trampoline",
-  "transduce",
-  "transient",
-  "tree-seq",
-  "true?",
-  "type",
-  "unchecked-add",
-  "unchecked-add-int",
-  "unchecked-byte",
-  "unchecked-char",
-  "unchecked-dec",
-  "unchecked-dec-int",
-  "unchecked-divide-int",
-  "unchecked-double",
-  "unchecked-float",
-  "unchecked-inc",
-  "unchecked-inc-int",
-  "unchecked-int",
-  "unchecked-long",
-  "unchecked-multiply",
-  "unchecked-multiply-int",
-  "unchecked-negate",
-  "unchecked-negate-int",
-  "unchecked-remainder-int",
-  "unchecked-short",
-  "unchecked-subtract",
-  "unchecked-subtract-int",
-  "underive",
-  "unquote",
-  "unquote-splicing",
-  "unreduced",
-  "unsigned-bit-shift-right",
-  "update",
-  "update-in",
-  "update-proxy",
-  "uri?",
-  "use",
-  "uuid?",
-  "val",
-  "vals",
-  "var-get",
-  "var-set",
-  "var?",
-  "vary-meta",
-  "vec",
-  "vector",
-  "vector-of",
-  "vector?",
-  "volatile!",
-  "volatile?",
-  "vreset!",
-  "vswap!",
-  "when",
-  "when-first",
-  "when-let",
-  "when-not",
-  "when-some",
-  "while",
-  "with-bindings",
-  "with-bindings*",
-  "with-in-str",
-  "with-loading-context",
-  "with-local-vars",
-  "with-meta",
-  "with-open",
-  "with-out-str",
-  "with-precision",
-  "with-redefs",
-  "with-redefs-fn",
-  "xml-seq",
-  "zero?",
-  "zipmap"
-], p = [
-  "->",
-  "->>",
-  "as->",
-  "binding",
-  "bound-fn",
-  "case",
-  "catch",
-  "comment",
-  "cond",
-  "cond->",
-  "cond->>",
-  "condp",
-  "def",
-  "definterface",
-  "defmethod",
-  "defn",
-  "defmacro",
-  "defprotocol",
-  "defrecord",
-  "defstruct",
-  "deftype",
-  "do",
-  "doseq",
-  "dotimes",
-  "doto",
-  "extend",
-  "extend-protocol",
-  "extend-type",
-  "fn",
-  "for",
-  "future",
-  "if",
-  "if-let",
-  "if-not",
-  "if-some",
-  "let",
-  "letfn",
-  "locking",
-  "loop",
-  "ns",
-  "proxy",
-  "reify",
-  "struct-map",
-  "some->",
-  "some->>",
-  "try",
-  "when",
-  "when-first",
-  "when-let",
-  "when-not",
-  "when-some",
-  "while",
-  "with-bindings",
-  "with-bindings*",
-  "with-in-str",
-  "with-loading-context",
-  "with-local-vars",
-  "with-meta",
-  "with-open",
-  "with-out-str",
-  "with-precision",
-  "with-redefs",
-  "with-redefs-fn"
-], f = o(d), m = o(l), h = o(u), y = o(p), b = /^(?:[\\\[\]\s"(),;@^`{}~]|$)/, v = /^(?:[+\-]?\d+(?:(?:N|(?:[eE][+\-]?\d+))|(?:\.?\d*(?:M|(?:[eE][+\-]?\d+))?)|\/\d+|[xX][0-9a-fA-F]+|r[0-9a-zA-Z]+)?(?=[\\\[\]\s"#'(),;@^`{}~]|$))/, g = /^(?:\\(?:backspace|formfeed|newline|return|space|tab|o[0-7]{3}|u[0-9A-Fa-f]{4}|x[0-9A-Fa-f]{4}|.)?(?=[\\\[\]\s"(),;@^`{}~]|$))/, k = /^(?:(?:[^\\\/\[\]\d\s"#'(),;@^`{}~.][^\\\[\]\s"(),;@^`{}~.\/]*(?:\.[^\\\/\[\]\d\s"#'(),;@^`{}~.][^\\\[\]\s"(),;@^`{}~.\/]*)*\/)?(?:\/|[^\\\/\[\]\d\s"#'(),;@^`{}~][^\\\[\]\s"(),;@^`{}~]*)*(?=[\\\[\]\s"(),;@^`{}~]|$))/;
-function s(t, e) {
-  if (t.eatSpace() || t.eat(","))
-    return ["space", null];
-  if (t.match(v))
-    return [null, "number"];
-  if (t.match(g))
-    return [null, "string.special"];
-  if (t.eat(/^"/))
-    return (e.tokenize = x)(t, e);
-  if (t.eat(/^[(\[{]/))
-    return ["open", "bracket"];
-  if (t.eat(/^[)\]}]/))
-    return ["close", "bracket"];
-  if (t.eat(/^;/))
-    return t.skipToEnd(), ["space", "comment"];
-  if (t.eat(/^[#'@^`~]/))
-    return [null, "meta"];
-  var r = t.match(k), n = r && r[0];
-  return n ? n === "comment" && e.lastToken === "(" ? (e.tokenize = w)(t, e) : a(n, f) || n.charAt(0) === ":" ? ["symbol", "atom"] : a(n, m) || a(n, h) ? ["symbol", "keyword"] : e.lastToken === "(" ? ["symbol", "builtin"] : ["symbol", "variable"] : (t.next(), t.eatWhile(function(i) {
-    return !a(i, b);
-  }), [null, "error"]);
-}
-function x(t, e) {
-  for (var r = !1, n; n = t.next(); ) {
-    if (n === '"' && !r) {
-      e.tokenize = s;
-      break;
-    }
-    r = !r && n === "\\";
-  }
-  return [null, "string"];
-}
-function w(t, e) {
-  for (var r = 1, n; n = t.next(); )
-    if (n === ")" && r--, n === "(" && r++, r === 0) {
-      t.backUp(1), e.tokenize = s;
-      break;
-    }
-  return ["space", "comment"];
-}
-function o(t) {
-  for (var e = {}, r = 0; r < t.length; ++r)
-    e[t[r]] = !0;
-  return e;
-}
-function a(t, e) {
-  if (e instanceof RegExp)
-    return e.test(t);
-  if (e instanceof Object)
-    return e.propertyIsEnumerable(t);
-}
-const q = {
-  name: "clojure",
-  startState: function() {
-    return {
-      ctx: { prev: null, start: 0, indentTo: 0 },
-      lastToken: null,
-      tokenize: s
-    };
-  },
-  token: function(t, e) {
-    t.sol() && typeof e.ctx.indentTo != "number" && (e.ctx.indentTo = e.ctx.start + 1);
-    var r = e.tokenize(t, e), n = r[0], i = r[1], c = t.current();
-    return n !== "space" && (e.lastToken === "(" && e.ctx.indentTo === null ? n === "symbol" && a(c, y) ? e.ctx.indentTo = e.ctx.start + t.indentUnit : e.ctx.indentTo = "next" : e.ctx.indentTo === "next" && (e.ctx.indentTo = t.column()), e.lastToken = c), n === "open" ? e.ctx = { prev: e.ctx, start: t.column(), indentTo: null } : n === "close" && (e.ctx = e.ctx.prev || e.ctx), i;
-  },
-  indent: function(t) {
-    var e = t.ctx.indentTo;
-    return typeof e == "number" ? e : t.ctx.start + 1;
-  },
-  languageData: {
-    closeBrackets: { brackets: ["(", "[", "{", '"'] },
-    commentTokens: { line: ";;" },
-    autocomplete: [].concat(d, l, u)
-  }
-};
-export {
-  q as clojure
-};