1 define(["prism/prism","prism/components/prism-clike"], function () {
2 Prism
.languages
.fsharp
= Prism
.languages
.extend('clike', {
5 pattern
: /(^|[^\\])\(\*[\s\S]*?\*\)/,
9 pattern
: /(^|[^\\:])\/\/.*/,
14 pattern
: /(?:"""[\s\S]*?"""|@"(?:""|[^"])*"|"(?:\\[\s\S]|[^\\"])*")B?|'(?:[^\\']|\\(?:.|\d{3}|x[a-fA-F\d]{2}|u[a-fA-F\d]{4}|U[a-fA-F\d]{8}))'B?/,
18 pattern
: /(\b(?:exception|inherit|interface|new|of|type)\s+|\w\s*:\s*|\s:\??>\s*)[.\w]+\b(?:\s*(?:->|\*)\s*[.\w]+\b)*(?!\s*[:.])/,
25 'keyword': /\b(?:let|return|use|yield)(?:!\B|\b)|\b(?:abstract|and|as|assert|base|begin|class|default|delegate|do|done|downcast|downto|elif|else|end|exception|extern|false|finally|for|fun|function|global|if|in|inherit|inline|interface|internal|lazy|match|member|module|mutable|namespace|new|not|null|of|open|or|override|private|public|rec|select|static|struct|then|to|true|try|type|upcast|val|void|when|while|with|asr|land|lor|lsl|lsr|lxor|mod|sig|atomic|break|checked|component|const|constraint|constructor|continue|eager|event|external|fixed|functor|include|method|mixin|object|parallel|process|protected|pure|sealed|tailcall|trait|virtual|volatile)\b/,
27 /\b0x[\da-fA-F]+(?:un|lf|LF)?\b/,
28 /\b0b[01]+(?:y|uy)?\b/,
29 /(?:\b\d+\.?\d*|\B\.\d+)(?:[fm]|e[+-]?\d+)?\b/i,
30 /\b\d+(?:[IlLsy]|u[lsy]?|UL)?\b/
32 'operator': /([<>~&^])\1\1|([*.:<>&])\2|<-|->|[!=:]=|<?\|{1,3}>?|\??(?:<=|>=|<>|[-+*/%=<>])\??|[!?^&]|~[+~-]|:>|:\?>?/
34 Prism
.languages
.insertBefore('fsharp', 'keyword', {
36 pattern
: /^[^\r\n\S]*#.*/m,
40 pattern
: /(\s*#)\b(?:else|endif|if|light|line|nowarn)\b/,
47 Prism
.languages
.insertBefore('fsharp', 'punctuation', {
48 'computation-expression': {
49 pattern
: /[_a-z]\w*(?=\s*\{)/i,
53 Prism
.languages
.insertBefore('fsharp', 'string', {
57 'punctuation': /^\[<|>\]$/,
59 pattern
: /^\w+$|(^|;\s*)[A-Z]\w*(?=\()/,
62 'annotation-content': {
64 inside
: Prism
.languages
.fsharp