| 1 |
- {"ast":null,"code":"/*\nLanguage: Hy\nDescription: Hy is a wonderful dialect of Lisp that’s embedded in Python.\nAuthor: Sergey Sobko <s.sobko@profitware.ru>\nWebsite: http://docs.hylang.org/en/stable/\nCategory: lisp\n*/\n\nfunction hy(hljs) {\n const SYMBOLSTART = 'a-zA-Z_\\\\-!.?+*=<>&#\\'';\n const SYMBOL_RE = '[' + SYMBOLSTART + '][' + SYMBOLSTART + '0-9/;:]*';\n const keywords = {\n $pattern: SYMBOL_RE,\n built_in:\n // keywords\n '!= % %= & &= * ** **= *= *map ' + '+ += , --build-class-- --import-- -= . / // //= ' + '/= < << <<= <= = > >= >> >>= ' + '@ @= ^ ^= abs accumulate all and any ap-compose ' + 'ap-dotimes ap-each ap-each-while ap-filter ap-first ap-if ap-last ap-map ap-map-when ap-pipe ' + 'ap-reduce ap-reject apply as-> ascii assert assoc bin break butlast ' + 'callable calling-module-name car case cdr chain chr coll? combinations compile ' + 'compress cond cons cons? continue count curry cut cycle dec ' + 'def default-method defclass defmacro defmacro-alias defmacro/g! defmain defmethod defmulti defn ' + 'defn-alias defnc defnr defreader defseq del delattr delete-route dict-comp dir ' + 'disassemble dispatch-reader-macro distinct divmod do doto drop drop-last drop-while empty? ' + 'end-sequence eval eval-and-compile eval-when-compile even? every? except exec filter first ' + 'flatten float? fn fnc fnr for for* format fraction genexpr ' + 'gensym get getattr global globals group-by hasattr hash hex id ' + 'identity if if* if-not if-python2 import in inc input instance? ' + 'integer integer-char? integer? interleave interpose is is-coll is-cons is-empty is-even ' + 'is-every is-float is-instance is-integer is-integer-char is-iterable is-iterator is-keyword is-neg is-none ' + 'is-not is-numeric is-odd is-pos is-string is-symbol is-zero isinstance islice issubclass ' + 'iter iterable? iterate iterator? keyword keyword? lambda last len let ' + 'lif lif-not list* list-comp locals loop macro-error macroexpand macroexpand-1 macroexpand-all ' + 'map max merge-with method-decorator min multi-decorator multicombinations name neg? next ' + 'none? nonlocal not not-in not? nth numeric? oct odd? open ' + 'or ord partition permutations pos? post-route postwalk pow prewalk print ' + 'product profile/calls profile/cpu put-route quasiquote quote raise range read read-str ' + 'recursive-replace reduce remove repeat repeatedly repr require rest round route ' + 'route-with-methods rwm second seq set-comp setattr setv some sorted string ' + 'string? sum switch symbol? take take-nth take-while tee try unless ' + 'unquote unquote-splicing vars walk when while with with* with-decorator with-gensyms ' + 'xi xor yield yield-from zero? zip zip-longest | |= ~'\n };\n const SIMPLE_NUMBER_RE = '[-+]?\\\\d+(\\\\.\\\\d+)?';\n const SYMBOL = {\n begin: SYMBOL_RE,\n relevance: 0\n };\n const NUMBER = {\n className: 'number',\n begin: SIMPLE_NUMBER_RE,\n relevance: 0\n };\n const STRING = hljs.inherit(hljs.QUOTE_STRING_MODE, {\n illegal: null\n });\n const COMMENT = hljs.COMMENT(';', '$', {\n relevance: 0\n });\n const LITERAL = {\n className: 'literal',\n begin: /\\b([Tt]rue|[Ff]alse|nil|None)\\b/\n };\n const COLLECTION = {\n begin: '[\\\\[\\\\{]',\n end: '[\\\\]\\\\}]',\n relevance: 0\n };\n const HINT = {\n className: 'comment',\n begin: '\\\\^' + SYMBOL_RE\n };\n const HINT_COL = hljs.COMMENT('\\\\^\\\\{', '\\\\}');\n const KEY = {\n className: 'symbol',\n begin: '[:]{1,2}' + SYMBOL_RE\n };\n const LIST = {\n begin: '\\\\(',\n end: '\\\\)'\n };\n const BODY = {\n endsWithParent: true,\n relevance: 0\n };\n const NAME = {\n className: 'name',\n relevance: 0,\n keywords: keywords,\n begin: SYMBOL_RE,\n starts: BODY\n };\n const DEFAULT_CONTAINS = [LIST, STRING, HINT, HINT_COL, COMMENT, KEY, COLLECTION, NUMBER, LITERAL, SYMBOL];\n LIST.contains = [hljs.COMMENT('comment', ''), NAME, BODY];\n BODY.contains = DEFAULT_CONTAINS;\n COLLECTION.contains = DEFAULT_CONTAINS;\n return {\n name: 'Hy',\n aliases: ['hylang'],\n illegal: /\\S/,\n contains: [hljs.SHEBANG(), LIST, STRING, HINT, HINT_COL, COMMENT, KEY, COLLECTION, NUMBER, LITERAL]\n };\n}\nmodule.exports = hy;","map":{"version":3,"names":["hy","hljs","SYMBOLSTART","SYMBOL_RE","keywords","$pattern","built_in","SIMPLE_NUMBER_RE","SYMBOL","begin","relevance","NUMBER","className","STRING","inherit","QUOTE_STRING_MODE","illegal","COMMENT","LITERAL","COLLECTION","end","HINT","HINT_COL","KEY","LIST","BODY","endsWithParent","NAME","starts","DEFAULT_CONTAINS","contains","name","aliases","SHEBANG","module","exports"],"sources":["F:/workspace/202226701027/huinongbao-app/node_modules/highlight.js/lib/languages/hy.js"],"sourcesContent":["/*\nLanguage: Hy\nDescription: Hy is a wonderful dialect of Lisp that’s embedded in Python.\nAuthor: Sergey Sobko <s.sobko@profitware.ru>\nWebsite: http://docs.hylang.org/en/stable/\nCategory: lisp\n*/\n\nfunction hy(hljs) {\n const SYMBOLSTART = 'a-zA-Z_\\\\-!.?+*=<>&#\\'';\n const SYMBOL_RE = '[' + SYMBOLSTART + '][' + SYMBOLSTART + '0-9/;:]*';\n const keywords = {\n $pattern: SYMBOL_RE,\n built_in:\n // keywords\n '!= % %= & &= * ** **= *= *map '\n + '+ += , --build-class-- --import-- -= . / // //= '\n + '/= < << <<= <= = > >= >> >>= '\n + '@ @= ^ ^= abs accumulate all and any ap-compose '\n + 'ap-dotimes ap-each ap-each-while ap-filter ap-first ap-if ap-last ap-map ap-map-when ap-pipe '\n + 'ap-reduce ap-reject apply as-> ascii assert assoc bin break butlast '\n + 'callable calling-module-name car case cdr chain chr coll? combinations compile '\n + 'compress cond cons cons? continue count curry cut cycle dec '\n + 'def default-method defclass defmacro defmacro-alias defmacro/g! defmain defmethod defmulti defn '\n + 'defn-alias defnc defnr defreader defseq del delattr delete-route dict-comp dir '\n + 'disassemble dispatch-reader-macro distinct divmod do doto drop drop-last drop-while empty? '\n + 'end-sequence eval eval-and-compile eval-when-compile even? every? except exec filter first '\n + 'flatten float? fn fnc fnr for for* format fraction genexpr '\n + 'gensym get getattr global globals group-by hasattr hash hex id '\n + 'identity if if* if-not if-python2 import in inc input instance? '\n + 'integer integer-char? integer? interleave interpose is is-coll is-cons is-empty is-even '\n + 'is-every is-float is-instance is-integer is-integer-char is-iterable is-iterator is-keyword is-neg is-none '\n + 'is-not is-numeric is-odd is-pos is-string is-symbol is-zero isinstance islice issubclass '\n + 'iter iterable? iterate iterator? keyword keyword? lambda last len let '\n + 'lif lif-not list* list-comp locals loop macro-error macroexpand macroexpand-1 macroexpand-all '\n + 'map max merge-with method-decorator min multi-decorator multicombinations name neg? next '\n + 'none? nonlocal not not-in not? nth numeric? oct odd? open '\n + 'or ord partition permutations pos? post-route postwalk pow prewalk print '\n + 'product profile/calls profile/cpu put-route quasiquote quote raise range read read-str '\n + 'recursive-replace reduce remove repeat repeatedly repr require rest round route '\n + 'route-with-methods rwm second seq set-comp setattr setv some sorted string '\n + 'string? sum switch symbol? take take-nth take-while tee try unless '\n + 'unquote unquote-splicing vars walk when while with with* with-decorator with-gensyms '\n + 'xi xor yield yield-from zero? zip zip-longest | |= ~'\n };\n\n const SIMPLE_NUMBER_RE = '[-+]?\\\\d+(\\\\.\\\\d+)?';\n\n const SYMBOL = {\n begin: SYMBOL_RE,\n relevance: 0\n };\n const NUMBER = {\n className: 'number',\n begin: SIMPLE_NUMBER_RE,\n relevance: 0\n };\n const STRING = hljs.inherit(hljs.QUOTE_STRING_MODE, { illegal: null });\n const COMMENT = hljs.COMMENT(\n ';',\n '$',\n { relevance: 0 }\n );\n const LITERAL = {\n className: 'literal',\n begin: /\\b([Tt]rue|[Ff]alse|nil|None)\\b/\n };\n const COLLECTION = {\n begin: '[\\\\[\\\\{]',\n end: '[\\\\]\\\\}]',\n relevance: 0\n };\n const HINT = {\n className: 'comment',\n begin: '\\\\^' + SYMBOL_RE\n };\n const HINT_COL = hljs.COMMENT('\\\\^\\\\{', '\\\\}');\n const KEY = {\n className: 'symbol',\n begin: '[:]{1,2}' + SYMBOL_RE\n };\n const LIST = {\n begin: '\\\\(',\n end: '\\\\)'\n };\n const BODY = {\n endsWithParent: true,\n relevance: 0\n };\n const NAME = {\n className: 'name',\n relevance: 0,\n keywords: keywords,\n begin: SYMBOL_RE,\n starts: BODY\n };\n const DEFAULT_CONTAINS = [\n LIST,\n STRING,\n HINT,\n HINT_COL,\n COMMENT,\n KEY,\n COLLECTION,\n NUMBER,\n LITERAL,\n SYMBOL\n ];\n\n LIST.contains = [\n hljs.COMMENT('comment', ''),\n NAME,\n BODY\n ];\n BODY.contains = DEFAULT_CONTAINS;\n COLLECTION.contains = DEFAULT_CONTAINS;\n\n return {\n name: 'Hy',\n aliases: [ 'hylang' ],\n illegal: /\\S/,\n contains: [\n hljs.SHEBANG(),\n LIST,\n STRING,\n HINT,\n HINT_COL,\n COMMENT,\n KEY,\n COLLECTION,\n NUMBER,\n LITERAL\n ]\n };\n}\n\nmodule.exports = hy;\n"],"mappings":"AAAA;AACA;AACA;AACA;AACA;AACA;AACA;;AAEA,SAASA,EAAEA,CAACC,IAAI,EAAE;EAChB,MAAMC,WAAW,GAAG,wBAAwB;EAC5C,MAAMC,SAAS,GAAG,GAAG,GAAGD,WAAW,GAAG,IAAI,GAAGA,WAAW,GAAG,UAAU;EACrE,MAAME,QAAQ,GAAG;IACfC,QAAQ,EAAEF,SAAS;IACnBG,QAAQ;IACN;IACA,gCAAgC,GAC9B,kDAAkD,GAClD,+BAA+B,GAC/B,kDAAkD,GAClD,+FAA+F,GAC/F,sEAAsE,GACtE,iFAAiF,GACjF,8DAA8D,GAC9D,kGAAkG,GAClG,iFAAiF,GACjF,6FAA6F,GAC7F,6FAA6F,GAC7F,6DAA6D,GAC7D,iEAAiE,GACjE,kEAAkE,GAClE,0FAA0F,GAC1F,6GAA6G,GAC7G,2FAA2F,GAC3F,wEAAwE,GACxE,gGAAgG,GAChG,2FAA2F,GAC3F,4DAA4D,GAC5D,2EAA2E,GAC3E,yFAAyF,GACzF,kFAAkF,GAClF,6EAA6E,GAC7E,qEAAqE,GACrE,uFAAuF,GACvF;EACN,CAAC;EAED,MAAMC,gBAAgB,GAAG,qBAAqB;EAE9C,MAAMC,MAAM,GAAG;IACbC,KAAK,EAAEN,SAAS;IAChBO,SAAS,EAAE;EACb,CAAC;EACD,MAAMC,MAAM,GAAG;IACbC,SAAS,EAAE,QAAQ;IACnBH,KAAK,EAAEF,gBAAgB;IACvBG,SAAS,EAAE;EACb,CAAC;EACD,MAAMG,MAAM,GAAGZ,IAAI,CAACa,OAAO,CAACb,IAAI,CAACc,iBAAiB,EAAE;IAAEC,OAAO,EAAE;EAAK,CAAC,CAAC;EACtE,MAAMC,OAAO,GAAGhB,IAAI,CAACgB,OAAO,CAC1B,GAAG,EACH,GAAG,EACH;IAAEP,SAAS,EAAE;EAAE,CACjB,CAAC;EACD,MAAMQ,OAAO,GAAG;IACdN,SAAS,EAAE,SAAS;IACpBH,KAAK,EAAE;EACT,CAAC;EACD,MAAMU,UAAU,GAAG;IACjBV,KAAK,EAAE,UAAU;IACjBW,GAAG,EAAE,UAAU;IACfV,SAAS,EAAE;EACb,CAAC;EACD,MAAMW,IAAI,GAAG;IACXT,SAAS,EAAE,SAAS;IACpBH,KAAK,EAAE,KAAK,GAAGN;EACjB,CAAC;EACD,MAAMmB,QAAQ,GAAGrB,IAAI,CAACgB,OAAO,CAAC,QAAQ,EAAE,KAAK,CAAC;EAC9C,MAAMM,GAAG,GAAG;IACVX,SAAS,EAAE,QAAQ;IACnBH,KAAK,EAAE,UAAU,GAAGN;EACtB,CAAC;EACD,MAAMqB,IAAI,GAAG;IACXf,KAAK,EAAE,KAAK;IACZW,GAAG,EAAE;EACP,CAAC;EACD,MAAMK,IAAI,GAAG;IACXC,cAAc,EAAE,IAAI;IACpBhB,SAAS,EAAE;EACb,CAAC;EACD,MAAMiB,IAAI,GAAG;IACXf,SAAS,EAAE,MAAM;IACjBF,SAAS,EAAE,CAAC;IACZN,QAAQ,EAAEA,QAAQ;IAClBK,KAAK,EAAEN,SAAS;IAChByB,MAAM,EAAEH;EACV,CAAC;EACD,MAAMI,gBAAgB,GAAG,CACvBL,IAAI,EACJX,MAAM,EACNQ,IAAI,EACJC,QAAQ,EACRL,OAAO,EACPM,GAAG,EACHJ,UAAU,EACVR,MAAM,EACNO,OAAO,EACPV,MAAM,CACP;EAEDgB,IAAI,CAACM,QAAQ,GAAG,CACd7B,IAAI,CAACgB,OAAO,CAAC,SAAS,EAAE,EAAE,CAAC,EAC3BU,IAAI,EACJF,IAAI,CACL;EACDA,IAAI,CAACK,QAAQ,GAAGD,gBAAgB;EAChCV,UAAU,CAACW,QAAQ,GAAGD,gBAAgB;EAEtC,OAAO;IACLE,IAAI,EAAE,IAAI;IACVC,OAAO,EAAE,CAAE,QAAQ,CAAE;IACrBhB,OAAO,EAAE,IAAI;IACbc,QAAQ,EAAE,CACR7B,IAAI,CAACgC,OAAO,CAAC,CAAC,EACdT,IAAI,EACJX,MAAM,EACNQ,IAAI,EACJC,QAAQ,EACRL,OAAO,EACPM,GAAG,EACHJ,UAAU,EACVR,MAAM,EACNO,OAAO;EAEX,CAAC;AACH;AAEAgB,MAAM,CAACC,OAAO,GAAGnC,EAAE","ignoreList":[]},"metadata":{},"sourceType":"script","externalDependencies":[]}
|
