telegram-tt/dist/3698.3541c155e1b629af7d33.js.map

{"version":3,"file":"3698.3541c155e1b629af7d33.js","mappings":"sFA+LAA,EAAOC,QAvLP,SAAiBC,GACf,MAAMC,EAAU,CAAEC,SAAU,CAC1BF,EAAKC,QAAQ,KAAM,KACnBD,EAAKC,QACH,MACA,MACA,CAAEE,SAAU,CAAE,YAIZC,EAAS,CACbC,UAAW,OACXC,MAAO,OACPC,IAAK,QAGDC,EAAe,CACnBH,UAAW,OACXC,MAAO,KACPC,IAAK,KAGDE,EAAc,CAClBJ,UAAW,OACXC,MAAO,kBACPI,UAAW,GAGPC,EAAO,CACXL,MAAO,MACPC,IAAK,MACLK,QAAS,IACTT,SAAU,CACRC,EACAI,EACA,CACEH,UAAW,OACXC,MAAO,0CAETN,EAAKa,QAAQb,EAAKc,WAAY,CAAER,MAAO,kBACvCL,IAmBEc,EAAY,mBAIZC,EAAS,CACbX,UAAW,SACXK,UAAW,EACXR,SAAU,CAER,CAAEe,MAAO,gEAET,CAAEA,MAAO,cAAcF,UAAkBA,mCAEzC,CAAEE,MAAO,2BAET,CAAEA,MAAO,4BAIb,MAAO,CACLC,KAAM,UACNC,QAAS,CAAE,MACXC,SACE,wOAIFjB,SAAU,CAER,CACEkB,cAAe,SACfd,IAAK,QACLa,SAAU,eACVjB,SAAU,CACRQ,EACAV,GAEFW,QAAS,YAEX,CACEN,MAAO,eACPC,IAAK,IACLa,SAAU,6BACVjB,SAAU,CACRQ,EACAV,GAEFW,QAAS,YAEX,CACEP,UAAW,QACXC,MAAO,8BACPC,IAAK,QACLa,SAAU,8BACVjB,SAAU,CACRM,EACAE,EACAV,IAGJ,CACEI,UAAW,QACXC,MAAO,0BACPC,IAAK,IACLa,SAAU,oCACVjB,SAAU,CACRC,EACAK,EACAE,EAnFO,CACbL,MAAO,KACPC,IAAK,KACLJ,SAAUQ,EAAKR,UAkFTF,IAGJ,CACEoB,cAAe,UACfd,IAAK,IACLJ,SAAU,CACRM,EACAE,EACAV,IAGJ,CACEoB,cAAe,sBACfd,IAAK,IACLJ,SAAU,CACRH,EAAKsB,cACLrB,IAGJ,CACEK,MAAO,gBACPC,IAAK,IACLa,SAAU,uEAEVjB,SAAU,CACRM,EACAT,EAAKuB,kBACLtB,IAGJ,CACEI,UAAW,OACXC,MAAO,kCACPC,IAAK,KAGPH,EACAI,EAKAR,EAAKuB,kBACLP,EACAP,EACAT,EAAKa,QAAQb,EAAKc,WAAY,CAAER,MAAO,mBACvCL,EACA,CACEK,MAAO","sources":["webpack://telegram-t/./node_modules/highlight.js/lib/languages/haskell.js"],"sourcesContent":["/*\nLanguage: Haskell\nAuthor: Jeremy Hull <sourdrums@gmail.com>\nContributors: Zena Treep <zena.treep@gmail.com>\nWebsite: https://www.haskell.org\nCategory: functional\n*/\n\nfunction haskell(hljs) {\n  const COMMENT = { variants: [\n    hljs.COMMENT('--', '$'),\n    hljs.COMMENT(\n      /\\{-/,\n      /-\\}/,\n      { contains: [ 'self' ] }\n    )\n  ] };\n\n  const PRAGMA = {\n    className: 'meta',\n    begin: /\\{-#/,\n    end: /#-\\}/\n  };\n\n  const PREPROCESSOR = {\n    className: 'meta',\n    begin: '^#',\n    end: '$'\n  };\n\n  const CONSTRUCTOR = {\n    className: 'type',\n    begin: '\\\\b[A-Z][\\\\w\\']*', // TODO: other constructors (build-in, infix).\n    relevance: 0\n  };\n\n  const LIST = {\n    begin: '\\\\(',\n    end: '\\\\)',\n    illegal: '\"',\n    contains: [\n      PRAGMA,\n      PREPROCESSOR,\n      {\n        className: 'type',\n        begin: '\\\\b[A-Z][\\\\w]*(\\\\((\\\\.\\\\.|,|\\\\w+)\\\\))?'\n      },\n      hljs.inherit(hljs.TITLE_MODE, { begin: '[_a-z][\\\\w\\']*' }),\n      COMMENT\n    ]\n  };\n\n  const RECORD = {\n    begin: /\\{/,\n    end: /\\}/,\n    contains: LIST.contains\n  };\n\n  /* See:\n\n     - https://www.haskell.org/onlinereport/lexemes.html\n     - https://downloads.haskell.org/ghc/9.0.1/docs/html/users_guide/exts/binary_literals.html\n     - https://downloads.haskell.org/ghc/9.0.1/docs/html/users_guide/exts/numeric_underscores.html\n     - https://downloads.haskell.org/ghc/9.0.1/docs/html/users_guide/exts/hex_float_literals.html\n\n  */\n  const decimalDigits = '([0-9]_*)+';\n  const hexDigits = '([0-9a-fA-F]_*)+';\n  const binaryDigits = '([01]_*)+';\n  const octalDigits = '([0-7]_*)+';\n\n  const NUMBER = {\n    className: 'number',\n    relevance: 0,\n    variants: [\n      // decimal floating-point-literal (subsumes decimal-literal)\n      { match: `\\\\b(${decimalDigits})(\\\\.(${decimalDigits}))?` + `([eE][+-]?(${decimalDigits}))?\\\\b` },\n      // hexadecimal floating-point-literal (subsumes hexadecimal-literal)\n      { match: `\\\\b0[xX]_*(${hexDigits})(\\\\.(${hexDigits}))?` + `([pP][+-]?(${decimalDigits}))?\\\\b` },\n      // octal-literal\n      { match: `\\\\b0[oO](${octalDigits})\\\\b` },\n      // binary-literal\n      { match: `\\\\b0[bB](${binaryDigits})\\\\b` }\n    ]\n  };\n\n  return {\n    name: 'Haskell',\n    aliases: [ 'hs' ],\n    keywords:\n      'let in if then else case of where do module import hiding '\n      + 'qualified type data newtype deriving class instance as default '\n      + 'infix infixl infixr foreign export ccall stdcall cplusplus '\n      + 'jvm dotnet safe unsafe family forall