Edit File by line

// CodeMirror, copyright (c) by Marijn Haverbeke and others

[0] Fix | Delete

// Distributed under an MIT license: http://codemirror.net/LICENSE

[1] Fix | Delete

[2] Fix | Delete

(function(mod) {

[3] Fix | Delete

if (typeof exports == "object" && typeof module == "object") // CommonJS

[4] Fix | Delete

mod(require("../../lib/codemirror"));

[5] Fix | Delete

else if (typeof define == "function" && define.amd) // AMD

[6] Fix | Delete

define(["../../lib/codemirror"], mod);

[7] Fix | Delete

else // Plain browser env

[8] Fix | Delete

mod(CodeMirror);

[9] Fix | Delete

})(function(CodeMirror) {

[10] Fix | Delete

"use strict";

[11] Fix | Delete

[12] Fix | Delete

CodeMirror.defineMode("apl", function() {

[13] Fix | Delete

var builtInOps = {

[14] Fix | Delete

".": "innerProduct",

[15] Fix | Delete

"\\": "scan",

[16] Fix | Delete

"/": "reduce",

[17] Fix | Delete

"⌿": "reduce1Axis",

[18] Fix | Delete

"⍀": "scan1Axis",

[19] Fix | Delete

"¨": "each",

[20] Fix | Delete

"⍣": "power"

[21] Fix | Delete

};

[22] Fix | Delete

var builtInFuncs = {

[23] Fix | Delete

"+": ["conjugate", "add"],

[24] Fix | Delete

"−": ["negate", "subtract"],

[25] Fix | Delete

"×": ["signOf", "multiply"],

[26] Fix | Delete

"÷": ["reciprocal", "divide"],

[27] Fix | Delete

"⌈": ["ceiling", "greaterOf"],

[28] Fix | Delete

"⌊": ["floor", "lesserOf"],

[29] Fix | Delete

"∣": ["absolute", "residue"],

[30] Fix | Delete

"⍳": ["indexGenerate", "indexOf"],

[31] Fix | Delete

"?": ["roll", "deal"],

[32] Fix | Delete

"⋆": ["exponentiate", "toThePowerOf"],

[33] Fix | Delete

"⍟": ["naturalLog", "logToTheBase"],

[34] Fix | Delete

"○": ["piTimes", "circularFuncs"],

[35] Fix | Delete

"!": ["factorial", "binomial"],

[36] Fix | Delete

"⌹": ["matrixInverse", "matrixDivide"],

[37] Fix | Delete

"<": [null, "lessThan"],

[38] Fix | Delete

"≤": [null, "lessThanOrEqual"],

[39] Fix | Delete

"=": [null, "equals"],

[40] Fix | Delete

">": [null, "greaterThan"],

[41] Fix | Delete

"≥": [null, "greaterThanOrEqual"],

[42] Fix | Delete

"≠": [null, "notEqual"],

[43] Fix | Delete

"≡": ["depth", "match"],

[44] Fix | Delete

"≢": [null, "notMatch"],

[45] Fix | Delete

"∈": ["enlist", "membership"],

[46] Fix | Delete

"⍷": [null, "find"],

[47] Fix | Delete

"∪": ["unique", "union"],

[48] Fix | Delete

"∩": [null, "intersection"],

[49] Fix | Delete

"∼": ["not", "without"],

[50] Fix | Delete

"∨": [null, "or"],

[51] Fix | Delete

"∧": [null, "and"],

[52] Fix | Delete

"⍱": [null, "nor"],

[53] Fix | Delete

"⍲": [null, "nand"],

[54] Fix | Delete

"⍴": ["shapeOf", "reshape"],

[55] Fix | Delete

",": ["ravel", "catenate"],

[56] Fix | Delete

"⍪": [null, "firstAxisCatenate"],

[57] Fix | Delete

"⌽": ["reverse", "rotate"],

[58] Fix | Delete

"⊖": ["axis1Reverse", "axis1Rotate"],

[59] Fix | Delete

"⍉": ["transpose", null],

[60] Fix | Delete

"↑": ["first", "take"],

[61] Fix | Delete

"↓": [null, "drop"],

[62] Fix | Delete

"⊂": ["enclose", "partitionWithAxis"],

[63] Fix | Delete

"⊃": ["diclose", "pick"],

[64] Fix | Delete

"⌷": [null, "index"],

[65] Fix | Delete

"⍋": ["gradeUp", null],

[66] Fix | Delete

"⍒": ["gradeDown", null],

[67] Fix | Delete

"⊤": ["encode", null],

[68] Fix | Delete

"⊥": ["decode", null],

[69] Fix | Delete

"⍕": ["format", "formatByExample"],

[70] Fix | Delete

"⍎": ["execute", null],

[71] Fix | Delete

"⊣": ["stop", "left"],

[72] Fix | Delete

"⊢": ["pass", "right"]

[73] Fix | Delete

};

[74] Fix | Delete

[75] Fix | Delete

var isOperator = /[\.\/⌿⍀¨⍣]/;

[76] Fix | Delete

var isNiladic = /⍬/;

[77] Fix | Delete

var isFunction = /[\+−×÷⌈⌊∣⍳\?⋆⍟○!⌹<≤=>≥≠≡≢∈⍷∪∩∼∨∧⍱⍲⍴,⍪⌽⊖⍉↑↓⊂⊃⌷⍋⍒⊤⊥⍕⍎⊣⊢]/;

[78] Fix | Delete

var isArrow = /←/;

[79] Fix | Delete

var isComment = /[⍝#].*$/;

[80] Fix | Delete

[81] Fix | Delete

var stringEater = function(type) {

[82] Fix | Delete

var prev;

[83] Fix | Delete

prev = false;

[84] Fix | Delete

return function(c) {

[85] Fix | Delete

prev = c;

[86] Fix | Delete

if (c === type) {

[87] Fix | Delete

return prev === "\\";

[88] Fix | Delete

}

[89] Fix | Delete

return true;

[90] Fix | Delete

};

[91] Fix | Delete

};

[92] Fix | Delete

return {

[93] Fix | Delete

startState: function() {

[94] Fix | Delete

return {

[95] Fix | Delete

prev: false,

[96] Fix | Delete

func: false,

[97] Fix | Delete

op: false,

[98] Fix | Delete

string: false,

[99] Fix | Delete

escape: false

[100] Fix | Delete

};

[101] Fix | Delete

[102] Fix | Delete

token: function(stream, state) {

[103] Fix | Delete

var ch, funcName;

[104] Fix | Delete

if (stream.eatSpace()) {

[105] Fix | Delete

return null;

[106] Fix | Delete

}

[107] Fix | Delete

ch = stream.next();

[108] Fix | Delete

if (ch === '"' || ch === "'") {

[109] Fix | Delete

stream.eatWhile(stringEater(ch));

[110] Fix | Delete

stream.next();

[111] Fix | Delete

state.prev = true;

[112] Fix | Delete

return "string";

[113] Fix | Delete

}

[114] Fix | Delete

if (/[\[{\(]/.test(ch)) {

[115] Fix | Delete

state.prev = false;

[116] Fix | Delete

return null;

[117] Fix | Delete

}

[118] Fix | Delete

if (/[\]}\)]/.test(ch)) {

[119] Fix | Delete

state.prev = true;

[120] Fix | Delete

return null;

[121] Fix | Delete

}

[122] Fix | Delete

if (isNiladic.test(ch)) {

[123] Fix | Delete

state.prev = false;

[124] Fix | Delete

return "niladic";

[125] Fix | Delete

}

[126] Fix | Delete

if (/[¯\d]/.test(ch)) {

[127] Fix | Delete

if (state.func) {

[128] Fix | Delete

state.func = false;

[129] Fix | Delete

state.prev = false;

[130] Fix | Delete

} else {

[131] Fix | Delete

state.prev = true;

[132] Fix | Delete

}

[133] Fix | Delete

stream.eatWhile(/[\w\.]/);

[134] Fix | Delete

return "number";

[135] Fix | Delete

}

[136] Fix | Delete

if (isOperator.test(ch)) {

[137] Fix | Delete

return "operator apl-" + builtInOps[ch];

[138] Fix | Delete

}

[139] Fix | Delete

if (isArrow.test(ch)) {

[140] Fix | Delete

return "apl-arrow";

[141] Fix | Delete

}

[142] Fix | Delete

if (isFunction.test(ch)) {

[143] Fix | Delete

funcName = "apl-";

[144] Fix | Delete

if (builtInFuncs[ch] != null) {

[145] Fix | Delete

if (state.prev) {

[146] Fix | Delete

funcName += builtInFuncs[ch][1];

[147] Fix | Delete

} else {

[148] Fix | Delete

funcName += builtInFuncs[ch][0];

[149] Fix | Delete

}

[150] Fix | Delete

}

[151] Fix | Delete

state.func = true;

[152] Fix | Delete

state.prev = false;

[153] Fix | Delete

return "function " + funcName;

[154] Fix | Delete

}

[155] Fix | Delete

if (isComment.test(ch)) {

[156] Fix | Delete

stream.skipToEnd();

[157] Fix | Delete

return "comment";

[158] Fix | Delete

}

[159] Fix | Delete

if (ch === "∘" && stream.peek() === ".") {

[160] Fix | Delete

stream.next();

[161] Fix | Delete

return "function jot-dot";

[162] Fix | Delete

}

[163] Fix | Delete

stream.eatWhile(/[\w\$_]/);

[164] Fix | Delete

state.prev = true;

[165] Fix | Delete

return "keyword";

[166] Fix | Delete

}

[167] Fix | Delete

};

[168] Fix | Delete

});

[169] Fix | Delete

[170] Fix | Delete

CodeMirror.defineMIME("text/apl", "apl");

[171] Fix | Delete

[172] Fix | Delete

});

[173] Fix | Delete

[174] Fix | Delete