research-copilot 0.1.0

package/app/out/renderer/assets/forth-B9D2JCeE.js

@@ -0,0 +1,116 @@
+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/app/out/renderer/assets/fortran-CAG2BFbe.js

@@ -0,0 +1,467 @@
+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
+};