| {"version":3,"sources":["webpack:///./node_modules/react-syntax-highlighter/node_modules/highlight.js/lib/languages/ocaml.js"],"names":["module","exports","hljs","name","aliases","keywords","$pattern","keyword","built_in","literal","illegal","contains","className","begin","relevance","COMMENT","inherit","APOS_STRING_MODE","QUOTE_STRING_MODE"],"mappings":"8EAmEAA,EAAOC,QA3DP,SAAeC,GAEb,MAAO,CACLC,KAAM,QACNC,QAAS,CAAC,MACVC,SAAU,CACRC,SAAU,eACVC,QAAS,sVAGTC,SAEA,qHAGAC,QAAS,cAEXC,QAAS,UACTC,SAAU,CAAC,CACTC,UAAW,UACXC,MAAO,yBACPC,UAAW,GACVZ,EAAKa,QAAQ,SAAU,SAAU,CAClCJ,SAAU,CAAC,UACT,CAEFC,UAAW,SACXC,MAAO,0BAGN,CAEDD,UAAW,OACXC,MAAO,iBACN,CAEDD,UAAW,OACXC,MAAO,kBACPC,UAAW,GACV,CAEDD,MAAO,qBACPC,UAAW,GACVZ,EAAKc,QAAQd,EAAKe,iBAAkB,CACrCL,UAAW,SACXE,UAAW,IACTZ,EAAKc,QAAQd,EAAKgB,kBAAmB,CACvCR,QAAS,OACP,CACFE,UAAW,SACXC,MAAO,2HACPC,UAAW,GACV,CACDD,MAAO","file":"react-syntax-highlighter_languages_highlight_ocaml-6ff2b605363650e5f7ce.js","sourcesContent":["/*\nLanguage: OCaml\nAuthor: Mehdi Dogguy <mehdi@dogguy.org>\nContributors: Nicolas Braud-Santoni <nicolas.braud-santoni@ens-cachan.fr>, Mickael Delahaye <mickael.delahaye@gmail.com>\nDescription: OCaml language definition.\nWebsite: https://ocaml.org\nCategory: functional\n*/\nfunction ocaml(hljs) {\n /* missing support for heredoc-like string (OCaml 4.0.2+) */\n return {\n name: 'OCaml',\n aliases: ['ml'],\n keywords: {\n $pattern: '[a-z_]\\\\w*!?',\n keyword: 'and as assert asr begin class constraint do done downto else end ' + 'exception external for fun function functor if in include ' + 'inherit! inherit initializer land lazy let lor lsl lsr lxor match method!|10 method ' + 'mod module mutable new object of open! open or private rec sig struct ' + 'then to try type val! val virtual when while with ' +\n /* camlp4 */\n 'parser value',\n built_in:\n /* built-in types */\n 'array bool bytes char exn|5 float int int32 int64 list lazy_t|5 nativeint|5 string unit ' +\n /* (some) types in Pervasives */\n 'in_channel out_channel ref',\n literal: 'true false'\n },\n illegal: /\\/\\/|>>/,\n contains: [{\n className: 'literal',\n begin: '\\\\[(\\\\|\\\\|)?\\\\]|\\\\(\\\\)',\n relevance: 0\n }, hljs.COMMENT('\\\\(\\\\*', '\\\\*\\\\)', {\n contains: ['self']\n }), {\n /* type variable */\n className: 'symbol',\n begin: '\\'[A-Za-z_](?!\\')[\\\\w\\']*'\n /* the grammar is ambiguous on how 'a'b should be interpreted but not the compiler */\n\n }, {\n /* polymorphic variant */\n className: 'type',\n begin: '`[A-Z][\\\\w\\']*'\n }, {\n /* module or constructor */\n className: 'type',\n begin: '\\\\b[A-Z][\\\\w\\']*',\n relevance: 0\n }, {\n /* don't color identifiers, but safely catch all identifiers with '*/\n begin: '[a-z_]\\\\w*\\'[\\\\w\\']*',\n relevance: 0\n }, hljs.inherit(hljs.APOS_STRING_MODE, {\n className: 'string',\n relevance: 0\n }), hljs.inherit(hljs.QUOTE_STRING_MODE, {\n illegal: null\n }), {\n className: 'number',\n begin: '\\\\b(0[xX][a-fA-F0-9_]+[Lln]?|' + '0[oO][0-7_]+[Lln]?|' + '0[bB][01_]+[Lln]?|' + '[0-9][0-9_]*([Lln]|(\\\\.[0-9_]*)?([eE][-+]?[0-9_]+)?)?)',\n relevance: 0\n }, {\n begin: /[-=]>/ // relevance booster\n\n }]\n };\n}\n\nmodule.exports = ocaml;"],"sourceRoot":""} |