annotate .cms/lib/codemirror/mode/yacas/yacas.js @ 1:1d486627aa1e draft default tip

24.10
author Coffee CMS <info@coffee-cms.ru>
date Sat, 12 Oct 2024 02:51:39 +0000
parents 78edf6b517a0
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
0
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
1 // CodeMirror, copyright (c) by Marijn Haverbeke and others
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
2 // Distributed under an MIT license: https://codemirror.net/5/LICENSE
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
3
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
4 // Yacas mode copyright (c) 2015 by Grzegorz Mazur
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
5 // Loosely based on mathematica mode by Calin Barbat
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
6
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
7 (function(mod) {
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
8 if (typeof exports == "object" && typeof module == "object") // CommonJS
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
9 mod(require("../../lib/codemirror"));
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
10 else if (typeof define == "function" && define.amd) // AMD
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
11 define(["../../lib/codemirror"], mod);
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
12 else // Plain browser env
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
13 mod(CodeMirror);
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
14 })(function(CodeMirror) {
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
15 "use strict";
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
16
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
17 CodeMirror.defineMode('yacas', function(_config, _parserConfig) {
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
18
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
19 function words(str) {
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
20 var obj = {}, words = str.split(" ");
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
21 for (var i = 0; i < words.length; ++i) obj[words[i]] = true;
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
22 return obj;
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
23 }
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
24
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
25 var bodiedOps = words("Assert BackQuote D Defun Deriv For ForEach FromFile " +
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
26 "FromString Function Integrate InverseTaylor Limit " +
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
27 "LocalSymbols Macro MacroRule MacroRulePattern " +
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
28 "NIntegrate Rule RulePattern Subst TD TExplicitSum " +
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
29 "TSum Taylor Taylor1 Taylor2 Taylor3 ToFile " +
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
30 "ToStdout ToString TraceRule Until While");
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
31
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
32 // patterns
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
33 var pFloatForm = "(?:(?:\\.\\d+|\\d+\\.\\d*|\\d+)(?:[eE][+-]?\\d+)?)";
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
34 var pIdentifier = "(?:[a-zA-Z\\$'][a-zA-Z0-9\\$']*)";
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
35
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
36 // regular expressions
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
37 var reFloatForm = new RegExp(pFloatForm);
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
38 var reIdentifier = new RegExp(pIdentifier);
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
39 var rePattern = new RegExp(pIdentifier + "?_" + pIdentifier);
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
40 var reFunctionLike = new RegExp(pIdentifier + "\\s*\\(");
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
41
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
42 function tokenBase(stream, state) {
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
43 var ch;
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
44
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
45 // get next character
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
46 ch = stream.next();
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
47
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
48 // string
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
49 if (ch === '"') {
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
50 state.tokenize = tokenString;
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
51 return state.tokenize(stream, state);
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
52 }
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
53
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
54 // comment
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
55 if (ch === '/') {
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
56 if (stream.eat('*')) {
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
57 state.tokenize = tokenComment;
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
58 return state.tokenize(stream, state);
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
59 }
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
60 if (stream.eat("/")) {
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
61 stream.skipToEnd();
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
62 return "comment";
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
63 }
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
64 }
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
65
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
66 // go back one character
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
67 stream.backUp(1);
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
68
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
69 // update scope info
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
70 var m = stream.match(/^(\w+)\s*\(/, false);
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
71 if (m !== null && bodiedOps.hasOwnProperty(m[1]))
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
72 state.scopes.push('bodied');
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
73
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
74 var scope = currentScope(state);
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
75
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
76 if (scope === 'bodied' && ch === '[')
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
77 state.scopes.pop();
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
78
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
79 if (ch === '[' || ch === '{' || ch === '(')
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
80 state.scopes.push(ch);
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
81
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
82 scope = currentScope(state);
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
83
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
84 if (scope === '[' && ch === ']' ||
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
85 scope === '{' && ch === '}' ||
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
86 scope === '(' && ch === ')')
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
87 state.scopes.pop();
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
88
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
89 if (ch === ';') {
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
90 while (scope === 'bodied') {
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
91 state.scopes.pop();
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
92 scope = currentScope(state);
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
93 }
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
94 }
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
95
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
96 // look for ordered rules
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
97 if (stream.match(/\d+ *#/, true, false)) {
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
98 return 'qualifier';
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
99 }
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
100
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
101 // look for numbers
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
102 if (stream.match(reFloatForm, true, false)) {
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
103 return 'number';
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
104 }
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
105
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
106 // look for placeholders
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
107 if (stream.match(rePattern, true, false)) {
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
108 return 'variable-3';
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
109 }
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
110
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
111 // match all braces separately
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
112 if (stream.match(/(?:\[|\]|{|}|\(|\))/, true, false)) {
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
113 return 'bracket';
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
114 }
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
115
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
116 // literals looking like function calls
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
117 if (stream.match(reFunctionLike, true, false)) {
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
118 stream.backUp(1);
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
119 return 'variable';
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
120 }
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
121
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
122 // all other identifiers
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
123 if (stream.match(reIdentifier, true, false)) {
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
124 return 'variable-2';
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
125 }
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
126
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
127 // operators; note that operators like @@ or /; are matched separately for each symbol.
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
128 if (stream.match(/(?:\\|\+|\-|\*|\/|,|;|\.|:|@|~|=|>|<|&|\||_|`|'|\^|\?|!|%|#)/, true, false)) {
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
129 return 'operator';
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
130 }
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
131
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
132 // everything else is an error
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
133 return 'error';
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
134 }
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
135
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
136 function tokenString(stream, state) {
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
137 var next, end = false, escaped = false;
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
138 while ((next = stream.next()) != null) {
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
139 if (next === '"' && !escaped) {
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
140 end = true;
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
141 break;
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
142 }
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
143 escaped = !escaped && next === '\\';
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
144 }
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
145 if (end && !escaped) {
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
146 state.tokenize = tokenBase;
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
147 }
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
148 return 'string';
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
149 };
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
150
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
151 function tokenComment(stream, state) {
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
152 var prev, next;
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
153 while((next = stream.next()) != null) {
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
154 if (prev === '*' && next === '/') {
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
155 state.tokenize = tokenBase;
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
156 break;
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
157 }
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
158 prev = next;
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
159 }
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
160 return 'comment';
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
161 }
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
162
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
163 function currentScope(state) {
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
164 var scope = null;
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
165 if (state.scopes.length > 0)
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
166 scope = state.scopes[state.scopes.length - 1];
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
167 return scope;
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
168 }
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
169
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
170 return {
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
171 startState: function() {
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
172 return {
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
173 tokenize: tokenBase,
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
174 scopes: []
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
175 };
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
176 },
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
177 token: function(stream, state) {
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
178 if (stream.eatSpace()) return null;
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
179 return state.tokenize(stream, state);
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
180 },
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
181 indent: function(state, textAfter) {
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
182 if (state.tokenize !== tokenBase && state.tokenize !== null)
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
183 return CodeMirror.Pass;
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
184
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
185 var delta = 0;
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
186 if (textAfter === ']' || textAfter === '];' ||
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
187 textAfter === '}' || textAfter === '};' ||
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
188 textAfter === ');')
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
189 delta = -1;
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
190
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
191 return (state.scopes.length + delta) * _config.indentUnit;
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
192 },
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
193 electricChars: "{}[]();",
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
194 blockCommentStart: "/*",
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
195 blockCommentEnd: "*/",
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
196 lineComment: "//"
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
197 };
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
198 });
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
199
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
200 CodeMirror.defineMIME('text/x-yacas', {
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
201 name: 'yacas'
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
202 });
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
203
Coffee CMS <info@coffee-cms.ru>
parents:
diff changeset
204 });