| 1 !function(e){e.languages.pure={"inline-lang":{pattern:/%<[\s\S]+?%>/,inside:{lan
g:{pattern:/(^%< *)-\*-.+?-\*-/,lookbehind:!0,alias:"comment"},delimiter:{patter
n:/^%<.*|%>$/,alias:"punctuation"}}},comment:[{pattern:/(^|[^\\])\/\*[\w\W]*?\*\
//,lookbehind:!0},{pattern:/(^|[^\\:])\/\/.*/,lookbehind:!0},/#!.+/],string:/"(?
:\\.|[^"\\\r\n])*"/,number:{pattern:/((?:\.\.)?)(?:\b(?:inf|nan)\b|\b0x[\da-f]+|
(?:\b(?:0b)?\d+(?:\.\d)?|\B\.\d)\d*(?:e[+-]?\d+)?L?)/i,lookbehind:!0},keyword:/\
b(?:ans|break|bt|case|catch|cd|clear|const|def|del|dump|else|end|exit|extern|fal
se|force|help|if|infix[lr]?|interface|let|ls|mem|namespace|nonfix|NULL|of|otherw
ise|outfix|override|postfix|prefix|private|public|pwd|quit|run|save|show|stats|t
hen|throw|trace|true|type|underride|using|when|with)\b/,"function":/\b(?:abs|add
_(?:(?:fundef|interface|macdef|typedef)(?:_at)?|addr|constdef|vardef)|all|any|ap
plp?|arity|bigintp?|blob(?:_crc|_size|p)?|boolp?|byte_(?:matrix|pointer)|byte_c?
string(?:_pointer)?|calloc|cat|catmap|ceil|char[ps]?|check_ptrtag|chr|clear_sent
ry|clearsym|closurep?|cmatrixp?|cols?|colcat(?:map)?|colmap|colrev|colvector(?:p
|seq)?|complex(?:_float_(?:matrix|pointer)|_matrix(?:_view)?|_pointer|p)?|conj|c
ookedp?|cst|cstring(?:_(?:dup|list|vector))?|curry3?|cyclen?|del_(?:constdef|fun
def|interface|macdef|typedef|vardef)|delete|diag(?:mat)?|dim|dmatrixp?|do|double
(?:_matrix(?:_view)?|_pointer|p)?|dowith3?|drop|dropwhile|eval(?:cmd)?|exactp|fi
lter|fix|fixity|flip|float(?:_matrix|_pointer)|floor|fold[lr]1?|frac|free|funp?|
functionp?|gcd|get(?:_(?:byte|constdef|double|float|fundef|int(?:64)?|interface(
?:_typedef)?|long|macdef|pointer|ptrtag|short|sentry|string|typedef|vardef))?|gl
obsym|hash|head|id|im|imatrixp?|index|inexactp|infp|init|insert|int(?:_matrix(?:
_view)?|_pointer|p)?|int64_(?:matrix|pointer)|integerp?|iteraten?|iterwhile|join
|keys?|lambdap?|last(?:err(?:pos)?)?|lcd|list[2p]?|listmap|make_ptrtag|malloc|ma
p|matcat|matrixp?|max|member|min|nanp|nargs|nmatrixp?|null|numberp?|ord|pack(?:e
d)?|pointer(?:_cast|_tag|_type|p)?|pow|pred|ptrtag|put(?:_(?:byte|double|float|i
nt(?:64)?|long|pointer|short|string))?|rationalp?|re|realp?|realloc|recordp?|red
im|reduce(?:_with)?|refp?|repeatn?|reverse|rlistp?|round|rows?|rowcat(?:map)?|ro
wmap|rowrev|rowvector(?:p|seq)?|same|scan[lr]1?|sentry|sgn|short_(?:matrix|point
er)|slice|smatrixp?|sort|split|str|strcat|stream|stride|string(?:_(?:dup|list|ve
ctor)|p)?|subdiag(?:mat)?|submat|subseq2?|substr|succ|supdiag(?:mat)?|symbolp?|t
ail|take|takewhile|thunkp?|transpose|trunc|tuplep?|typep|ubyte|uint(?:64)?|ulong
|uncurry3?|unref|unzip3?|update|ushort|vals?|varp?|vector(?:p|seq)?|void|zip3?|z
ipwith3?)\b/,special:{pattern:/\b__[a-z]+__\b/i,alias:"builtin"},operator:/(?=\b
_|[^_])[!"#$%&'*+,\-.\/:<=>?@\\^_`|~\u00a1-\u00bf\u00d7-\u00f7\u20d0-\u2bff]+|\b
(?:and|div|mod|not|or)\b/,punctuation:/[(){}\[\];,|]/};var t=["c",{lang:"c++",al
ias:"cpp"},"fortran","ats","dsp"],a="%< *-\\*- *{lang}\\d* *-\\*-[\\s\\S]+?%>";t
.forEach(function(t){var r=t;if("string"!=typeof t&&(r=t.alias,t=t.lang),e.langu
ages[r]){var i={};i["inline-lang-"+r]={pattern:RegExp(a.replace("{lang}",t.repla
ce(/([.+*?\/\\(){}\[\]])/g,"\\$1")),"i"),inside:e.util.clone(e.languages.pure["i
nline-lang"].inside)},i["inline-lang-"+r].inside.rest=e.util.clone(e.languages[r
]),e.languages.insertBefore("pure","inline-lang",i)}}),e.languages.c&&(e.languag
es.pure["inline-lang"].inside.rest=e.util.clone(e.languages.c))}(Prism); |