{"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":""}