1(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){"use strict";a.defineMode("pascal",function(){function a(a){var b={},c=a.split(" ");for(var d=0;d<c.length;++d)b[c[d]]=true;return b}var b=a("absolute and array asm begin case const constructor destructor div do "+"downto else end file for function goto if implementation in inherited "+"inline interface label mod nil not object of operator or packed procedure "+"program record reintroduce repeat self set shl shr string then to type "+"unit until uses var while with xor as class dispinterface except exports "+"finalization finally initialization inline is library on out packed "+"property raise resourcestring threadvar try absolute abstract alias "+"assembler bitpacked break cdecl continue cppdecl cvar default deprecated "+"dynamic enumerator experimental export external far far16 forward generic "+"helper implements index interrupt iocheck local message name near "+"nodefault noreturn nostackframe oldfpccall otherwise overload override "+"pascal platform private protected public published read register "+"reintroduce result safecall saveregisters softfloat specialize static "+"stdcall stored strict unaligned unimplemented varargs virtual write");var c={"null":true};var d=/[+\-*&%=<>!?|\/]/;function e(a,e){var i=a.next();if(i=="#"&&e.startOfLine){a.skipToEnd();return"meta"}if(i=='"'||i=="'"){e.tokenize=f(i);return e.tokenize(a,e)}if(i=="("&&a.eat("*")){e.tokenize=g;return g(a,e)}if(i=="{"){e.tokenize=h;return h(a,e)}if(/[\[\]\(\),;\:\.]/.test(i)){return null}if(/\d/.test(i)){a.eatWhile(/[\w\.]/);return"number"}if(i=="/"){if(a.eat("/")){a.skipToEnd();return"comment"}}if(d.test(i)){a.eatWhile(d);return"operator"}a.eatWhile(/[\w\$_]/);var j=a.current();if(b.propertyIsEnumerable(j))return"keyword";if(c.propertyIsEnumerable(j))return"atom";return"variable"}function f(a){return function(b,c){var d=false,e,f=false;while((e=b.next())!=null){if(e==a&&!d){f=true;break}d=!d&&e=="\\"}if(f||!d)c.tokenize=null;return"string"}}function g(a,b){var c=false,d;while(d=a.next()){if(d==")"&&c){b.tokenize=null;break}c=d=="*"}return"comment"}function h(a,b){var c;while(c=a.next()){if(c=="}"){b.tokenize=null;break}}return"comment"}return{startState:function(){return{tokenize:null}},token:function(a,b){if(a.eatSpace())return null;var c=(b.tokenize||e)(a,b);if(c=="comment"||c=="meta")return c;return c},electricChars:"{}"}});a.defineMIME("text/x-pascal","pascal")});
2//# sourceMappingURL=pascal.min.js.map