@vc-shell/framework 1.1.16 → 1.1.17

package/dist/forth-BmxRyE9S.js

@@ -1,60 +0,0 @@
-function t(i) {
-  var n = [];
-  return i.split(" ").forEach(function(E) {
-    n.push({ name: E });
-  }), n;
-}
-var r = t(
-  "INVERT AND OR XOR 2* 2/ LSHIFT RSHIFT 0= = 0< < > U< MIN MAX 2DROP 2DUP 2OVER 2SWAP ?DUP DEPTH DROP DUP OVER ROT SWAP >R R> R@ + - 1+ 1- ABS NEGATE S>D * M* UM* FM/MOD SM/REM UM/MOD */ */MOD / /MOD MOD HERE , @ ! CELL+ CELLS C, C@ C! CHARS 2@ 2! ALIGN ALIGNED +! ALLOT CHAR [CHAR] [ ] BL FIND EXECUTE IMMEDIATE COUNT LITERAL STATE ; DOES> >BODY EVALUATE SOURCE >IN <# # #S #> HOLD SIGN BASE >NUMBER HEX DECIMAL FILL MOVE . CR EMIT SPACE SPACES TYPE U. .R U.R ACCEPT TRUE FALSE <> U> 0<> 0> NIP TUCK ROLL PICK 2>R 2R@ 2R> WITHIN UNUSED MARKER I J TO COMPILE, [COMPILE] SAVE-INPUT RESTORE-INPUT PAD ERASE 2LITERAL DNEGATE D- D+ D0< D0= D2* D2/ D< D= DMAX DMIN D>S DABS M+ M*/ D. D.R 2ROT DU< CATCH THROW FREE RESIZE ALLOCATE CS-PICK CS-ROLL GET-CURRENT SET-CURRENT FORTH-WORDLIST GET-ORDER SET-ORDER PREVIOUS SEARCH-WORDLIST WORDLIST FIND ALSO ONLY FORTH DEFINITIONS ORDER -TRAILING /STRING SEARCH COMPARE CMOVE CMOVE> BLANK SLITERAL"
-), O = t("IF ELSE THEN BEGIN WHILE REPEAT UNTIL RECURSE [IF] [ELSE] [THEN] ?DO DO LOOP +LOOP UNLOOP LEAVE EXIT AGAIN CASE OF ENDOF ENDCASE");
-function R(i, n) {
-  var E;
-  for (E = i.length - 1; E >= 0; E--)
-    if (i[E].name === n.toUpperCase())
-      return i[E];
-}
-const L = {
-  name: "forth",
-  startState: function() {
-    return {
-      state: "",
-      base: 10,
-      coreWordList: r,
-      immediateWordList: O,
-      wordList: []
-    };
-  },
-  token: function(i, n) {
-    var E;
-    if (i.eatSpace())
-      return null;
-    if (n.state === "") {
-      if (i.match(/^(\]|:NONAME)(\s|$)/i))
-        return n.state = " compilation", "builtin";
-      if (E = i.match(/^(\:)\s+(\S+)(\s|$)+/), E)
-        return n.wordList.push({ name: E[2].toUpperCase() }), n.state = " compilation", "def";
-      if (E = i.match(/^(VARIABLE|2VARIABLE|CONSTANT|2CONSTANT|CREATE|POSTPONE|VALUE|WORD)\s+(\S+)(\s|$)+/i), E)
-        return n.wordList.push({ name: E[2].toUpperCase() }), "def";
-      if (E = i.match(/^(\'|\[\'\])\s+(\S+)(\s|$)+/), E)
-        return "builtin";
-    } else {
-      if (i.match(/^(\;|\[)(\s)/))
-        return n.state = "", i.backUp(1), "builtin";
-      if (i.match(/^(\;|\[)($)/))
-        return n.state = "", "builtin";
-      if (i.match(/^(POSTPONE)\s+\S+(\s|$)+/))
-        return "builtin";
-    }
-    if (E = i.match(/^(\S+)(\s+|$)/), E)
-      return R(n.wordList, E[1]) !== void 0 ? "variable" : E[1] === "\\" ? (i.skipToEnd(), "comment") : R(n.coreWordList, E[1]) !== void 0 ? "builtin" : R(n.immediateWordList, E[1]) !== void 0 ? "keyword" : E[1] === "(" ? (i.eatWhile(function(e) {
-        return e !== ")";
-      }), i.eat(")"), "comment") : E[1] === ".(" ? (i.eatWhile(function(e) {
-        return e !== ")";
-      }), i.eat(")"), "string") : E[1] === 'S"' || E[1] === '."' || E[1] === 'C"' ? (i.eatWhile(function(e) {
-        return e !== '"';
-      }), i.eat('"'), "string") : E[1] - 68719476735 ? "number" : "atom";
-  }
-};
-export {
-  L as forth
-};

package/dist/fortran-9bvPyrOW.js

@@ -1,442 +0,0 @@
-function r(t) {
-  for (var n = {}, e = 0; e < t.length; ++e)
-    n[t[e]] = !0;
-  return n;
-}
-var l = r([
-  "abstract",
-  "accept",
-  "allocatable",
-  "allocate",
-  "array",
-  "assign",
-  "asynchronous",
-  "backspace",
-  "bind",
-  "block",
-  "byte",
-  "call",
-  "case",
-  "class",
-  "close",
-  "common",
-  "contains",
-  "continue",
-  "cycle",
-  "data",
-  "deallocate",
-  "decode",
-  "deferred",
-  "dimension",
-  "do",
-  "elemental",
-  "else",
-  "encode",
-  "end",
-  "endif",
-  "entry",
-  "enumerator",
-  "equivalence",
-  "exit",
-  "external",
-  "extrinsic",
-  "final",
-  "forall",
-  "format",
-  "function",
-  "generic",
-  "go",
-  "goto",
-  "if",
-  "implicit",
-  "import",
-  "include",
-  "inquire",
-  "intent",
-  "interface",
-  "intrinsic",
-  "module",
-  "namelist",
-  "non_intrinsic",
-  "non_overridable",
-  "none",
-  "nopass",
-  "nullify",
-  "open",
-  "optional",
-  "options",
-  "parameter",
-  "pass",
-  "pause",
-  "pointer",
-  "print",
-  "private",
-  "program",
-  "protected",
-  "public",
-  "pure",
-  "read",
-  "recursive",
-  "result",
-  "return",
-  "rewind",
-  "save",
-  "select",
-  "sequence",
-  "stop",
-  "subroutine",
-  "target",
-  "then",
-  "to",
-  "type",
-  "use",
-  "value",
-  "volatile",
-  "where",
-  "while",
-  "write"
-]), s = r([
-  "abort",
-  "abs",
-  "access",
-  "achar",
-  "acos",
-  "adjustl",
-  "adjustr",
-  "aimag",
-  "aint",
-  "alarm",
-  "all",
-  "allocated",
-  "alog",
-  "amax",
-  "amin",
-  "amod",
-  "and",
-  "anint",
-  "any",
-  "asin",
-  "associated",
-  "atan",
-  "besj",
-  "besjn",
-  "besy",
-  "besyn",
-  "bit_size",
-  "btest",
-  "cabs",
-  "ccos",
-  "ceiling",
-  "cexp",
-  "char",
-  "chdir",
-  "chmod",
-  "clog",
-  "cmplx",
-  "command_argument_count",
-  "complex",
-  "conjg",
-  "cos",
-  "cosh",
-  "count",
-  "cpu_time",
-  "cshift",
-  "csin",
-  "csqrt",
-  "ctime",
-  "c_funloc",
-  "c_loc",
-  "c_associated",
-  "c_null_ptr",
-  "c_null_funptr",
-  "c_f_pointer",
-  "c_null_char",
-  "c_alert",
-  "c_backspace",
-  "c_form_feed",
-  "c_new_line",
-  "c_carriage_return",
-  "c_horizontal_tab",
-  "c_vertical_tab",
-  "dabs",
-  "dacos",
-  "dasin",
-  "datan",
-  "date_and_time",
-  "dbesj",
-  "dbesj",
-  "dbesjn",
-  "dbesy",
-  "dbesy",
-  "dbesyn",
-  "dble",
-  "dcos",
-  "dcosh",
-  "ddim",
-  "derf",
-  "derfc",
-  "dexp",
-  "digits",
-  "dim",
-  "dint",
-  "dlog",
-  "dlog",
-  "dmax",
-  "dmin",
-  "dmod",
-  "dnint",
-  "dot_product",
-  "dprod",
-  "dsign",
-  "dsinh",
-  "dsin",
-  "dsqrt",
-  "dtanh",
-  "dtan",
-  "dtime",
-  "eoshift",
-  "epsilon",
-  "erf",
-  "erfc",
-  "etime",
-  "exit",
-  "exp",
-  "exponent",
-  "extends_type_of",
-  "fdate",
-  "fget",
-  "fgetc",
-  "float",
-  "floor",
-  "flush",
-  "fnum",
-  "fputc",
-  "fput",
-  "fraction",
-  "fseek",
-  "fstat",
-  "ftell",
-  "gerror",
-  "getarg",
-  "get_command",
-  "get_command_argument",
-  "get_environment_variable",
-  "getcwd",
-  "getenv",
-  "getgid",
-  "getlog",
-  "getpid",
-  "getuid",
-  "gmtime",
-  "hostnm",
-  "huge",
-  "iabs",
-  "iachar",
-  "iand",
-  "iargc",
-  "ibclr",
-  "ibits",
-  "ibset",
-  "ichar",
-  "idate",
-  "idim",
-  "idint",
-  "idnint",
-  "ieor",
-  "ierrno",
-  "ifix",
-  "imag",
-  "imagpart",
-  "index",
-  "int",
-  "ior",
-  "irand",
-  "isatty",
-  "ishft",
-  "ishftc",
-  "isign",
-  "iso_c_binding",
-  "is_iostat_end",
-  "is_iostat_eor",
-  "itime",
-  "kill",
-  "kind",
-  "lbound",
-  "len",
-  "len_trim",
-  "lge",
-  "lgt",
-  "link",
-  "lle",
-  "llt",
-  "lnblnk",
-  "loc",
-  "log",
-  "logical",
-  "long",
-  "lshift",
-  "lstat",
-  "ltime",
-  "matmul",
-  "max",
-  "maxexponent",
-  "maxloc",
-  "maxval",
-  "mclock",
-  "merge",
-  "move_alloc",
-  "min",
-  "minexponent",
-  "minloc",
-  "minval",
-  "mod",
-  "modulo",
-  "mvbits",
-  "nearest",
-  "new_line",
-  "nint",
-  "not",
-  "or",
-  "pack",
-  "perror",
-  "precision",
-  "present",
-  "product",
-  "radix",
-  "rand",
-  "random_number",
-  "random_seed",
-  "range",
-  "real",
-  "realpart",
-  "rename",
-  "repeat",
-  "reshape",
-  "rrspacing",
-  "rshift",
-  "same_type_as",
-  "scale",
-  "scan",
-  "second",
-  "selected_int_kind",
-  "selected_real_kind",
-  "set_exponent",
-  "shape",
-  "short",
-  "sign",
-  "signal",
-  "sinh",
-  "sin",
-  "sleep",
-  "sngl",
-  "spacing",
-  "spread",
-  "sqrt",
-  "srand",
-  "stat",
-  "sum",
-  "symlnk",
-  "system",
-  "system_clock",
-  "tan",
-  "tanh",
-  "time",
-  "tiny",
-  "transfer",
-  "transpose",
-  "trim",
-  "ttynam",
-  "ubound",
-  "umask",
-  "unlink",
-  "unpack",
-  "verify",
-  "xor",
-  "zabs",
-  "zcos",
-  "zexp",
-  "zlog",
-  "zsin",
-  "zsqrt"
-]), d = r([
-  "c_bool",
-  "c_char",
-  "c_double",
-  "c_double_complex",
-  "c_float",
-  "c_float_complex",
-  "c_funptr",
-  "c_int",
-  "c_int16_t",
-  "c_int32_t",
-  "c_int64_t",
-  "c_int8_t",
-  "c_int_fast16_t",
-  "c_int_fast32_t",
-  "c_int_fast64_t",
-  "c_int_fast8_t",
-  "c_int_least16_t",
-  "c_int_least32_t",
-  "c_int_least64_t",
-  "c_int_least8_t",
-  "c_intmax_t",
-  "c_intptr_t",
-  "c_long",
-  "c_long_double",
-  "c_long_double_complex",
-  "c_long_long",
-  "c_ptr",
-  "c_short",
-  "c_signed_char",
-  "c_size_t",
-  "character",
-  "complex",
-  "double",
-  "integer",
-  "logical",
-  "real"
-]), c = /[+\-*&=<>\/\:]/, _ = /^\.(and|or|eq|lt|le|gt|ge|ne|not|eqv|neqv)\./i;
-function u(t, n) {
-  if (t.match(_))
-    return "operator";
-  var e = t.next();
-  if (e == "!")
-    return t.skipToEnd(), "comment";
-  if (e == '"' || e == "'")
-    return n.tokenize = m(e), n.tokenize(t, n);
-  if (/[\[\]\(\),]/.test(e))
-    return null;
-  if (/\d/.test(e))
-    return t.eatWhile(/[\w\.]/), "number";
-  if (c.test(e))
-    return t.eatWhile(c), "operator";
-  t.eatWhile(/[\w\$_]/);
-  var i = t.current().toLowerCase();
-  return l.hasOwnProperty(i) ? "keyword" : s.hasOwnProperty(i) || d.hasOwnProperty(i) ? "builtin" : "variable";
-}
-function m(t) {
-  return function(n, e) {
-    for (var i = !1, a, o = !1; (a = n.next()) != null; ) {
-      if (a == t && !i) {
-        o = !0;
-        break;
-      }
-      i = !i && a == "\\";
-    }
-    return (o || !i) && (e.tokenize = null), "string";
-  };
-}
-const p = {
-  name: "fortran",
-  startState: function() {
-    return { tokenize: null };
-  },
-  token: function(t, n) {
-    if (t.eatSpace()) return null;
-    var e = (n.tokenize || u)(t, n);
-    return e == "comment" || e == "meta", e;
-  }
-};
-export {
-  p as fortran
-};