@threadlabs/looma 0.18.6 → 0.19.1

package/vue/chunks/scheme.js

@@ -0,0 +1,118 @@
+//#region ../../node_modules/.pnpm/highlight.js@11.11.2/node_modules/highlight.js/es/languages/scheme.js
+function scheme(hljs) {
+	const SCHEME_IDENT_RE = "[^\\(\\)\\[\\]\\{\\}\",'`;#|\\\\\\s]+";
+	const SCHEME_SIMPLE_NUMBER_RE = "(-|\\+)?\\d+([./]\\d+)?";
+	const SCHEME_COMPLEX_NUMBER_RE = "(-|\\+)?\\d+([./]\\d+)?[+\\-](-|\\+)?\\d+([./]\\d+)?i";
+	const KEYWORDS = {
+		$pattern: SCHEME_IDENT_RE,
+		built_in: "case-lambda call/cc class define-class exit-handler field import inherit init-field interface let*-values let-values let/ec mixin opt-lambda override protect provide public rename require require-for-syntax syntax syntax-case syntax-error unit/sig unless when with-syntax and begin call-with-current-continuation call-with-input-file call-with-output-file case cond define define-syntax delay do dynamic-wind else for-each if lambda let let* let-syntax letrec letrec-syntax map or syntax-rules ' * + , ,@ - ... / ; < <= = => > >= ` abs acos angle append apply asin assoc assq assv atan boolean? caar cadr call-with-input-file call-with-output-file call-with-values car cdddar cddddr cdr ceiling char->integer char-alphabetic? char-ci<=? char-ci<? char-ci=? char-ci>=? char-ci>? char-downcase char-lower-case? char-numeric? char-ready? char-upcase char-upper-case? char-whitespace? char<=? char<? char=? char>=? char>? char? close-input-port close-output-port complex? cons cos current-input-port current-output-port denominator display eof-object? eq? equal? eqv? eval even? exact->inexact exact? exp expt floor force gcd imag-part inexact->exact inexact? input-port? integer->char integer? interaction-environment lcm length list list->string list->vector list-ref list-tail list? load log magnitude make-polar make-rectangular make-string make-vector max member memq memv min modulo negative? newline not null-environment null? number->string number? numerator odd? open-input-file open-output-file output-port? pair? peek-char port? positive? procedure? quasiquote quote quotient rational? rationalize read read-char real-part real? remainder reverse round scheme-report-environment set! set-car! set-cdr! sin sqrt string string->list string->number string->symbol string-append string-ci<=? string-ci<? string-ci=? string-ci>=? string-ci>? string-copy string-fill! string-length string-ref string-set! string<=? string<? string=? string>=? string>? string? substring symbol->string symbol? tan transcript-off transcript-on truncate values vector vector->list vector-fill! vector-length vector-ref vector-set! with-input-from-file with-output-to-file write write-char zero?"
+	};
+	const LITERAL = {
+		className: "literal",
+		begin: "(#t|#f|#\\\\" + SCHEME_IDENT_RE + "|#\\\\.)"
+	};
+	const NUMBER = {
+		className: "number",
+		variants: [
+			{
+				begin: SCHEME_SIMPLE_NUMBER_RE,
+				relevance: 0
+			},
+			{
+				begin: SCHEME_COMPLEX_NUMBER_RE,
+				relevance: 0
+			},
+			{ begin: "#b[0-1]+(/[0-1]+)?" },
+			{ begin: "#o[0-7]+(/[0-7]+)?" },
+			{ begin: "#x[0-9a-f]+(/[0-9a-f]+)?" }
+		]
+	};
+	const STRING = hljs.QUOTE_STRING_MODE;
+	const COMMENT_MODES = [hljs.COMMENT(";", "$", { relevance: 0 }), hljs.COMMENT("#\\|", "\\|#")];
+	const IDENT = {
+		begin: SCHEME_IDENT_RE,
+		relevance: 0
+	};
+	const QUOTED_IDENT = {
+		className: "symbol",
+		begin: "'" + SCHEME_IDENT_RE
+	};
+	const BODY = {
+		endsWithParent: true,
+		relevance: 0
+	};
+	const QUOTED_LIST = {
+		variants: [{ begin: /'/ }, { begin: "`" }],
+		contains: [{
+			begin: "\\(",
+			end: "\\)",
+			contains: [
+				"self",
+				LITERAL,
+				STRING,
+				NUMBER,
+				IDENT,
+				QUOTED_IDENT
+			]
+		}]
+	};
+	const NAME = {
+		className: "name",
+		relevance: 0,
+		begin: SCHEME_IDENT_RE,
+		keywords: KEYWORDS
+	};
+	const LIST = {
+		variants: [{
+			begin: "\\(",
+			end: "\\)"
+		}, {
+			begin: "\\[",
+			end: "\\]"
+		}],
+		contains: [
+			{
+				begin: /lambda/,
+				endsWithParent: true,
+				returnBegin: true,
+				contains: [NAME, {
+					endsParent: true,
+					variants: [{
+						begin: /\(/,
+						end: /\)/
+					}, {
+						begin: /\[/,
+						end: /\]/
+					}],
+					contains: [IDENT]
+				}]
+			},
+			NAME,
+			BODY
+		]
+	};
+	BODY.contains = [
+		LITERAL,
+		NUMBER,
+		STRING,
+		IDENT,
+		QUOTED_IDENT,
+		QUOTED_LIST,
+		LIST
+	].concat(COMMENT_MODES);
+	return {
+		name: "Scheme",
+		aliases: ["scm"],
+		illegal: /\S/,
+		contains: [
+			hljs.SHEBANG(),
+			NUMBER,
+			STRING,
+			QUOTED_IDENT,
+			QUOTED_LIST,
+			LIST
+		].concat(COMMENT_MODES)
+	};
+}
+//#endregion
+export { scheme as default };

package/vue/chunks/scilab.js

@@ -0,0 +1,45 @@
+//#region ../../node_modules/.pnpm/highlight.js@11.11.2/node_modules/highlight.js/es/languages/scilab.js
+function scilab(hljs) {
+	const COMMON_CONTAINS = [hljs.C_NUMBER_MODE, {
+		className: "string",
+		begin: "'|\"",
+		end: "'|\"",
+		contains: [hljs.BACKSLASH_ESCAPE, { begin: "''" }]
+	}];
+	return {
+		name: "Scilab",
+		aliases: ["sci"],
+		keywords: {
+			$pattern: /%?\w+/,
+			keyword: "abort break case clear catch continue do elseif else endfunction end for function global if pause return resume select try then while",
+			literal: "%f %F %t %T %pi %eps %inf %nan %e %i %z %s",
+			built_in: "abs and acos asin atan ceil cd chdir clearglobal cosh cos cumprod deff disp error exec execstr exists exp eye gettext floor fprintf fread fsolve imag isdef isempty isinfisnan isvector lasterror length load linspace list listfiles log10 log2 log max min msprintf mclose mopen ones or pathconvert poly printf prod pwd rand real round sinh sin size gsort sprintf sqrt strcat strcmps tring sum system tanh tan type typename warning zeros matrix"
+		},
+		illegal: "(\"|#|/\\*|\\s+/\\w+)",
+		contains: [
+			{
+				className: "function",
+				beginKeywords: "function",
+				end: "$",
+				contains: [hljs.UNDERSCORE_TITLE_MODE, {
+					className: "params",
+					begin: "\\(",
+					end: "\\)"
+				}]
+			},
+			{
+				begin: "[a-zA-Z_][a-zA-Z_0-9]*[\\.']+",
+				relevance: 0
+			},
+			{
+				begin: "\\[",
+				end: "\\][\\.']*",
+				relevance: 0,
+				contains: COMMON_CONTAINS
+			},
+			hljs.COMMENT("//", "$")
+		].concat(COMMON_CONTAINS)
+	};
+}
+//#endregion
+export { scilab as default };