%PDF-
%PDF-
Mini Shell
Mini Shell
(function(A){if(typeof exports=="object"&&typeof module=="object"){A(require("../../lib/codemirror"))}else{if(typeof define=="function"&&define.amd){define(["../../lib/codemirror"],A)}else{A(CodeMirror)}}})(function(A){A.defineMode("r",function(E){function B(Q){var P=Q.split(" "),O={};for(var N=0;N<P.length;++N){O[P[N]]=true}return O}var I=B("NULL NA Inf NaN NA_integer_ NA_real_ NA_complex_ NA_character_");var C=B("list quote bquote eval return call parse deparse");var H=B("if else repeat while function for in next break");var G=B("if else repeat while function for");var D=/[+\-*\/^<>=!&|~$:]/;var K;function F(Q,O){K=null;var N=Q.next();if(N=="#"){Q.skipToEnd();return"comment"}else{if(N=="0"&&Q.eat("x")){Q.eatWhile(/[\da-f]/i);return"number"}else{if(N=="."&&Q.eat(/\d/)){Q.match(/\d*(?:e[+\-]?\d+)?/);return"number"}else{if(/\d/.test(N)){Q.match(/\d*(?:\.\d+)?(?:e[+\-]\d+)?L?/);return"number"}else{if(N=="'"||N=='"'){O.tokenize=L(N);return"string"}else{if(N=="."&&Q.match(/.[.\d]+/)){return"keyword"}else{if(/[\w\.]/.test(N)&&N!="_"){Q.eatWhile(/[\w\.]/);var P=Q.current();if(I.propertyIsEnumerable(P)){return"atom"}if(H.propertyIsEnumerable(P)){if(G.propertyIsEnumerable(P)&&!Q.match(/\s*if(\s+|$)/,false)){K="block"}return"keyword"}if(C.propertyIsEnumerable(P)){return"builtin"}return"variable"}else{if(N=="%"){if(Q.skipTo("%")){Q.next()}return"variable-2"}else{if(N=="<"&&Q.eat("-")){return"arrow"}else{if(N=="="&&O.ctx.argList){return"arg-is"}else{if(D.test(N)){if(N=="$"){return"dollar"}Q.eatWhile(D);return"operator"}else{if(/[\(\){}\[\];]/.test(N)){K=N;if(N==";"){return"semi"}return null}else{return null}}}}}}}}}}}}}function L(N){return function(R,Q){if(R.eat("\\")){var P=R.next();if(P=="x"){R.match(/^[a-f0-9]{2}/i)}else{if((P=="u"||P=="U")&&R.eat("{")&&R.skipTo("}")){R.next()}else{if(P=="u"){R.match(/^[a-f0-9]{4}/i)}else{if(P=="U"){R.match(/^[a-f0-9]{8}/i)}else{if(/[0-7]/.test(P)){R.match(/^[0-7]{1,2}/)}}}}}return"string-2"}else{var O;while((O=R.next())!=null){if(O==N){Q.tokenize=F;break}if(O=="\\"){R.backUp(1);break}}return"string"}}}function J(O,N,P){O.ctx={type:N,indent:O.indent,align:null,column:P.column(),prev:O.ctx}}function M(N){N.indent=N.ctx.indent;N.ctx=N.ctx.prev}return{startState:function(){return{tokenize:F,ctx:{type:"top",indent:-E.indentUnit,align:false},indent:0,afterIdent:false}},token:function(Q,P){if(Q.sol()){if(P.ctx.align==null){P.ctx.align=false}P.indent=Q.indentation()}if(Q.eatSpace()){return null}var O=P.tokenize(Q,P);if(O!="comment"&&P.ctx.align==null){P.ctx.align=true}var N=P.ctx.type;if((K==";"||K=="{"||K=="}")&&N=="block"){M(P)}if(K=="{"){J(P,"}",Q)}else{if(K=="("){J(P,")",Q);if(P.afterIdent){P.ctx.argList=true}}else{if(K=="["){J(P,"]",Q)}else{if(K=="block"){J(P,"block",Q)}else{if(K==N){M(P)}}}}}P.afterIdent=O=="variable"||O=="keyword";return O},indent:function(R,O){if(R.tokenize!=F){return 0}var Q=O&&O.charAt(0),N=R.ctx,P=Q==N.type;if(N.type=="block"){return N.indent+(Q=="{"?0:E.indentUnit)}else{if(N.align){return N.column+(P?0:1)}else{return N.indent+(P?0:E.indentUnit)}}},lineComment:"#"}});A.defineMIME("text/x-rsrc","r")});
Zerion Mini Shell 1.0