Directory:~$ /home/lmsyaran/public_html/j3/media/editors/codemirror/mode/haskell/

Upload File

[Home] [System Details] [Kill Me]

!(function(a){"object"==typeof
exports&&"object"==typeof
module?a(require("../../lib/codemirror")):"function"==typeof
define&&define.amd?define(["../../lib/codemirror"],a):a(CodeMirror)})((function(a){"use
strict";a.defineMode("haskell",(function(a,b){function
c(a,b,c){return b(c),c(a,b)}function d(a,b){if(a.eatWhile(p))return
null;var
d=a.next();if(o.test(d)){if("{"==d&&a.eat("-")){var
g="comment";return
a.eat("#")&&(g="meta"),c(a,b,e(g,1))}return
null}if("'"==d)return
a.eat("\\"),a.next(),a.eat("'")?"string":"string
error";if('"'==d)return c(a,b,f);if(i.test(d))return
a.eatWhile(m),a.eat(".")?"qualifier":"variable-2";if(h.test(d))return
a.eatWhile(m),"variable";if(j.test(d)){if("0"==d){if(a.eat(/[xX]/))return
a.eatWhile(k),"integer";if(a.eat(/[oO]/))return
a.eatWhile(l),"number"}a.eatWhile(j);var
g="number";return
a.match(/^\.\d+/)&&(g="number"),a.eat(/[eE]/)&&(g="number",a.eat(/[-+]/),a.eatWhile(j)),g}if("."==d&&a.eat("."))return"keyword";if(n.test(d)){if("-"==d&&a.eat(/-/)&&(a.eatWhile(/-/),!a.eat(n)))return
a.skipToEnd(),"comment";var
g="variable";return":"==d&&(g="variable-2"),a.eatWhile(n),g}return"error"}function
e(a,b){return 0==b?d:function(c,f){for(var g=b;!c.eol();){var
h=c.next();if("{"==h&&c.eat("-"))++g;else
if("-"==h&&c.eat("}")&&0==--g)return
f(d),a}return f(e(a,g)),a}}function f(a,b){for(;!a.eol();){var
c=a.next();if('"'==c)return
b(d),"string";if("\\"==c){if(a.eol()||a.eat(p))return
b(g),"string";a.eat("&")||a.next()}}return
b(d),"string error"}function g(a,b){return
a.eat("\\")?c(a,b,f):(a.next(),b(d),"error")}var
h=/[a-z_]/,i=/[A-Z]/,j=/\d/,k=/[0-9A-Fa-f]/,l=/[0-7]/,m=/[a-z_A-Z0-9'\xa1-\uffff]/,n=/[-!#$%&*+.\/<=>?@\\^|~:]/,o=/[(),;[\]`{}]/,p=/[
\t\v\f]/,q=(function(){function a(a){return function(){for(var
b=0;b<arguments.length;b++)c[arguments[b]]=a}}var
c={};a("keyword")("case","class","data","default","deriving","do","else","foreign","if","import","in","infix","infixl","infixr","instance","let","module","newtype","of","then","type","where","_"),a("keyword")("..",":","::","=","\\","<-","->","@","~","=>"),a("builtin")("!!","$!","$","&&","+","++","-",".","/","/=","<","<*","<=","<$>","<*>","=<<","==",">",">=",">>",">>=","^","^^","||","*","*>","**"),a("builtin")("Applicative","Bool","Bounded","Char","Double","EQ","Either","Enum","Eq","False","FilePath","Float","Floating","Fractional","Functor","GT","IO","IOError","Int","Integer","Integral","Just","LT","Left","Maybe","Monad","Nothing","Num","Ord","Ordering","Rational","Read","ReadS","Real","RealFloat","RealFrac","Right","Show","ShowS","String","True"),a("builtin")("abs","acos","acosh","all","and","any","appendFile","asTypeOf","asin","asinh","atan","atan2","atanh","break","catch","ceiling","compare","concat","concatMap","const","cos","cosh","curry","cycle","decodeFloat","div","divMod","drop","dropWhile","either","elem","encodeFloat","enumFrom","enumFromThen","enumFromThenTo","enumFromTo","error","even","exp","exponent","fail","filter","flip","floatDigits","floatRadix","floatRange","floor","fmap","foldl","foldl1","foldr","foldr1","fromEnum","fromInteger","fromIntegral","fromRational","fst","gcd","getChar","getContents","getLine","head","id","init","interact","ioError","isDenormalized","isIEEE","isInfinite","isNaN","isNegativeZero","iterate","last","lcm","length","lex","lines","log","logBase","lookup","map","mapM","mapM_","max","maxBound","maximum","maybe","min","minBound","minimum","mod","negate","not","notElem","null","odd","or","otherwise","pi","pred","print","product","properFraction","pure","putChar","putStr","putStrLn","quot","quotRem","read","readFile","readIO","readList","readLn","readParen","reads","readsPrec","realToFrac","recip","rem","repeat","replicate","return","reverse","round","scaleFloat","scanl","scanl1","scanr","scanr1","seq","sequence","sequence_","show","showChar","showList","showParen","showString","shows","showsPrec","significand","signum","sin","sinh","snd","span","splitAt","sqrt","subtract","succ","sum","tail","take","takeWhile","tan","tanh","toEnum","toInteger","toRational","truncate","uncurry","undefined","unlines","until","unwords","unzip","unzip3","userError","words","writeFile","zip","zip3","zipWith","zipWith3");var
d=b.overrideKeywords;if(d)for(var e in
d)d.hasOwnProperty(e)&&(c[e]=d[e]);return
c})();return{startState:function(){return{f:d}},copyState:function(a){return{f:a.f}},token:function(a,b){var
c=b.f(a,(function(a){b.f=a})),d=a.current();return
q.hasOwnProperty(d)?q[d]:c},blockCommentStart:"{-",blockCommentEnd:"-}",lineComment:"--"}})),a.defineMIME("text/x-haskell","haskell")}));