@voicenter-team/voicenter-ui-plus 1.1.21 → 2.0.2

package/library/forth-B9D2JCeE.mjs

@@ -1,116 +0,0 @@
-function toWordList(words) {
-  var ret = [];
-  words.split(" ").forEach(function(e) {
-    ret.push({ name: e });
-  });
-  return ret;
-}
-var coreWordList = toWordList(
-  "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"
-);
-var immediateWordList = toWordList("IF ELSE THEN BEGIN WHILE REPEAT UNTIL RECURSE [IF] [ELSE] [THEN] ?DO DO LOOP +LOOP UNLOOP LEAVE EXIT AGAIN CASE OF ENDOF ENDCASE");
-function searchWordList(wordList, word) {
-  var i;
-  for (i = wordList.length - 1; i >= 0; i--) {
-    if (wordList[i].name === word.toUpperCase()) {
-      return wordList[i];
-    }
-  }
-  return void 0;
-}
-const forth = {
-  name: "forth",
-  startState: function() {
-    return {
-      state: "",
-      base: 10,
-      coreWordList,
-      immediateWordList,
-      wordList: []
-    };
-  },
-  token: function(stream, stt) {
-    var mat;
-    if (stream.eatSpace()) {
-      return null;
-    }
-    if (stt.state === "") {
-      if (stream.match(/^(\]|:NONAME)(\s|$)/i)) {
-        stt.state = " compilation";
-        return "builtin";
-      }
-      mat = stream.match(/^(\:)\s+(\S+)(\s|$)+/);
-      if (mat) {
-        stt.wordList.push({ name: mat[2].toUpperCase() });
-        stt.state = " compilation";
-        return "def";
-      }
-      mat = stream.match(/^(VARIABLE|2VARIABLE|CONSTANT|2CONSTANT|CREATE|POSTPONE|VALUE|WORD)\s+(\S+)(\s|$)+/i);
-      if (mat) {
-        stt.wordList.push({ name: mat[2].toUpperCase() });
-        return "def";
-      }
-      mat = stream.match(/^(\'|\[\'\])\s+(\S+)(\s|$)+/);
-      if (mat) {
-        return "builtin";
-      }
-    } else {
-      if (stream.match(/^(\;|\[)(\s)/)) {
-        stt.state = "";
-        stream.backUp(1);
-        return "builtin";
-      }
-      if (stream.match(/^(\;|\[)($)/)) {
-        stt.state = "";
-        return "builtin";
-      }
-      if (stream.match(/^(POSTPONE)\s+\S+(\s|$)+/)) {
-        return "builtin";
-      }
-    }
-    mat = stream.match(/^(\S+)(\s+|$)/);
-    if (mat) {
-      if (searchWordList(stt.wordList, mat[1]) !== void 0) {
-        return "variable";
-      }
-      if (mat[1] === "\\") {
-        stream.skipToEnd();
-        return "comment";
-      }
-      if (searchWordList(stt.coreWordList, mat[1]) !== void 0) {
-        return "builtin";
-      }
-      if (searchWordList(stt.immediateWordList, mat[1]) !== void 0) {
-        return "keyword";
-      }
-      if (mat[1] === "(") {
-        stream.eatWhile(function(s) {
-          return s !== ")";
-        });
-        stream.eat(")");
-        return "comment";
-      }
-      if (mat[1] === ".(") {
-        stream.eatWhile(function(s) {
-          return s !== ")";
-        });
-        stream.eat(")");
-        return "string";
-      }
-      if (mat[1] === 'S"' || mat[1] === '."' || mat[1] === 'C"') {
-        stream.eatWhile(function(s) {
-          return s !== '"';
-        });
-        stream.eat('"');
-        return "string";
-      }
-      if (mat[1] - 68719476735) {
-        return "number";
-      }
-      return "atom";
-    }
-  }
-};
-export {
-  forth
-};

package/library/fortran-CAG2BFbe.mjs

@@ -1,467 +0,0 @@
-function words(array) {
-  var keys = {};
-  for (var i = 0; i < array.length; ++i) {
-    keys[array[i]] = true;
-  }
-  return keys;
-}
-var keywords = words([
-  "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"
-]);
-var builtins = words([
-  "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"
-]);
-var dataTypes = words([
-  "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"
-]);
-var isOperatorChar = /[+\-*&=<>\/\:]/;
-var litOperator = /^\.(and|or|eq|lt|le|gt|ge|ne|not|eqv|neqv)\./i;
-function tokenBase(stream, state) {
-  if (stream.match(litOperator)) {
-    return "operator";
-  }
-  var ch = stream.next();
-  if (ch == "!") {
-    stream.skipToEnd();
-    return "comment";
-  }
-  if (ch == '"' || ch == "'") {
-    state.tokenize = tokenString(ch);
-    return state.tokenize(stream, state);
-  }
-  if (/[\[\]\(\),]/.test(ch)) {
-    return null;
-  }
-  if (/\d/.test(ch)) {
-    stream.eatWhile(/[\w\.]/);
-    return "number";
-  }
-  if (isOperatorChar.test(ch)) {
-    stream.eatWhile(isOperatorChar);
-    return "operator";
-  }
-  stream.eatWhile(/[\w\$_]/);
-  var word = stream.current().toLowerCase();
-  if (keywords.hasOwnProperty(word)) {
-    return "keyword";
-  }
-  if (builtins.hasOwnProperty(word) || dataTypes.hasOwnProperty(word)) {
-    return "builtin";
-  }
-  return "variable";
-}
-function tokenString(quote) {
-  return function(stream, state) {
-    var escaped = false, next, end = false;
-    while ((next = stream.next()) != null) {
-      if (next == quote && !escaped) {
-        end = true;
-        break;
-      }
-      escaped = !escaped && next == "\\";
-    }
-    if (end || !escaped) state.tokenize = null;
-    return "string";
-  };
-}
-const fortran = {
-  name: "fortran",
-  startState: function() {
-    return { tokenize: null };
-  },
-  token: function(stream, state) {
-    if (stream.eatSpace()) return null;
-    var style = (state.tokenize || tokenBase)(stream, state);
-    if (style == "comment" || style == "meta") return style;
-    return style;
-  }
-};
-export {
-  fortran
-};