1 |
- {"ast":null,"code":"/*\nLanguage: Tcl\nDescription: Tcl is a very simple programming language.\nAuthor: Radek Liska <radekliska@gmail.com>\nWebsite: https://www.tcl.tk/about/language.html\nCategory: scripting\n*/\n\nfunction tcl(hljs) {\n const regex = hljs.regex;\n const TCL_IDENT = /[a-zA-Z_][a-zA-Z0-9_]*/;\n const NUMBER = {\n className: 'number',\n variants: [hljs.BINARY_NUMBER_MODE, hljs.C_NUMBER_MODE]\n };\n const KEYWORDS = [\"after\", \"append\", \"apply\", \"array\", \"auto_execok\", \"auto_import\", \"auto_load\", \"auto_mkindex\", \"auto_mkindex_old\", \"auto_qualify\", \"auto_reset\", \"bgerror\", \"binary\", \"break\", \"catch\", \"cd\", \"chan\", \"clock\", \"close\", \"concat\", \"continue\", \"dde\", \"dict\", \"encoding\", \"eof\", \"error\", \"eval\", \"exec\", \"exit\", \"expr\", \"fblocked\", \"fconfigure\", \"fcopy\", \"file\", \"fileevent\", \"filename\", \"flush\", \"for\", \"foreach\", \"format\", \"gets\", \"glob\", \"global\", \"history\", \"http\", \"if\", \"incr\", \"info\", \"interp\", \"join\", \"lappend|10\", \"lassign|10\", \"lindex|10\", \"linsert|10\", \"list\", \"llength|10\", \"load\", \"lrange|10\", \"lrepeat|10\", \"lreplace|10\", \"lreverse|10\", \"lsearch|10\", \"lset|10\", \"lsort|10\", \"mathfunc\", \"mathop\", \"memory\", \"msgcat\", \"namespace\", \"open\", \"package\", \"parray\", \"pid\", \"pkg::create\", \"pkg_mkIndex\", \"platform\", \"platform::shell\", \"proc\", \"puts\", \"pwd\", \"read\", \"refchan\", \"regexp\", \"registry\", \"regsub|10\", \"rename\", \"return\", \"safe\", \"scan\", \"seek\", \"set\", \"socket\", \"source\", \"split\", \"string\", \"subst\", \"switch\", \"tcl_endOfWord\", \"tcl_findLibrary\", \"tcl_startOfNextWord\", \"tcl_startOfPreviousWord\", \"tcl_wordBreakAfter\", \"tcl_wordBreakBefore\", \"tcltest\", \"tclvars\", \"tell\", \"time\", \"tm\", \"trace\", \"unknown\", \"unload\", \"unset\", \"update\", \"uplevel\", \"upvar\", \"variable\", \"vwait\", \"while\"];\n return {\n name: 'Tcl',\n aliases: ['tk'],\n keywords: KEYWORDS,\n contains: [hljs.COMMENT(';[ \\\\t]*#', '$'), hljs.COMMENT('^[ \\\\t]*#', '$'), {\n beginKeywords: 'proc',\n end: '[\\\\{]',\n excludeEnd: true,\n contains: [{\n className: 'title',\n begin: '[ \\\\t\\\\n\\\\r]+(::)?[a-zA-Z_]((::)?[a-zA-Z0-9_])*',\n end: '[ \\\\t\\\\n\\\\r]',\n endsWithParent: true,\n excludeEnd: true\n }]\n }, {\n className: \"variable\",\n variants: [{\n begin: regex.concat(/\\$/, regex.optional(/::/), TCL_IDENT, '(::', TCL_IDENT, ')*')\n }, {\n begin: '\\\\$\\\\{(::)?[a-zA-Z_]((::)?[a-zA-Z0-9_])*',\n end: '\\\\}',\n contains: [NUMBER]\n }]\n }, {\n className: 'string',\n contains: [hljs.BACKSLASH_ESCAPE],\n variants: [hljs.inherit(hljs.QUOTE_STRING_MODE, {\n illegal: null\n })]\n }, NUMBER]\n };\n}\nmodule.exports = tcl;","map":{"version":3,"names":["tcl","hljs","regex","TCL_IDENT","NUMBER","className","variants","BINARY_NUMBER_MODE","C_NUMBER_MODE","KEYWORDS","name","aliases","keywords","contains","COMMENT","beginKeywords","end","excludeEnd","begin","endsWithParent","concat","optional","BACKSLASH_ESCAPE","inherit","QUOTE_STRING_MODE","illegal","module","exports"],"sources":["F:/workspace/202226701027/huinongbao-app/node_modules/highlight.js/lib/languages/tcl.js"],"sourcesContent":["/*\nLanguage: Tcl\nDescription: Tcl is a very simple programming language.\nAuthor: Radek Liska <radekliska@gmail.com>\nWebsite: https://www.tcl.tk/about/language.html\nCategory: scripting\n*/\n\nfunction tcl(hljs) {\n const regex = hljs.regex;\n const TCL_IDENT = /[a-zA-Z_][a-zA-Z0-9_]*/;\n\n const NUMBER = {\n className: 'number',\n variants: [\n hljs.BINARY_NUMBER_MODE,\n hljs.C_NUMBER_MODE\n ]\n };\n\n const KEYWORDS = [\n \"after\",\n \"append\",\n \"apply\",\n \"array\",\n \"auto_execok\",\n \"auto_import\",\n \"auto_load\",\n \"auto_mkindex\",\n \"auto_mkindex_old\",\n \"auto_qualify\",\n \"auto_reset\",\n \"bgerror\",\n \"binary\",\n \"break\",\n \"catch\",\n \"cd\",\n \"chan\",\n \"clock\",\n \"close\",\n \"concat\",\n \"continue\",\n \"dde\",\n \"dict\",\n \"encoding\",\n \"eof\",\n \"error\",\n \"eval\",\n \"exec\",\n \"exit\",\n \"expr\",\n \"fblocked\",\n \"fconfigure\",\n \"fcopy\",\n \"file\",\n \"fileevent\",\n \"filename\",\n \"flush\",\n \"for\",\n \"foreach\",\n \"format\",\n \"gets\",\n \"glob\",\n \"global\",\n \"history\",\n \"http\",\n \"if\",\n \"incr\",\n \"info\",\n \"interp\",\n \"join\",\n \"lappend|10\",\n \"lassign|10\",\n \"lindex|10\",\n \"linsert|10\",\n \"list\",\n \"llength|10\",\n \"load\",\n \"lrange|10\",\n \"lrepeat|10\",\n \"lreplace|10\",\n \"lreverse|10\",\n \"lsearch|10\",\n \"lset|10\",\n \"lsort|10\",\n \"mathfunc\",\n \"mathop\",\n \"memory\",\n \"msgcat\",\n \"namespace\",\n \"open\",\n \"package\",\n \"parray\",\n \"pid\",\n \"pkg::create\",\n \"pkg_mkIndex\",\n \"platform\",\n \"platform::shell\",\n \"proc\",\n \"puts\",\n \"pwd\",\n \"read\",\n \"refchan\",\n \"regexp\",\n \"registry\",\n \"regsub|10\",\n \"rename\",\n \"return\",\n \"safe\",\n \"scan\",\n \"seek\",\n \"set\",\n \"socket\",\n \"source\",\n \"split\",\n \"string\",\n \"subst\",\n \"switch\",\n \"tcl_endOfWord\",\n \"tcl_findLibrary\",\n \"tcl_startOfNextWord\",\n \"tcl_startOfPreviousWord\",\n \"tcl_wordBreakAfter\",\n \"tcl_wordBreakBefore\",\n \"tcltest\",\n \"tclvars\",\n \"tell\",\n \"time\",\n \"tm\",\n \"trace\",\n \"unknown\",\n \"unload\",\n \"unset\",\n \"update\",\n \"uplevel\",\n \"upvar\",\n \"variable\",\n \"vwait\",\n \"while\"\n ];\n\n return {\n name: 'Tcl',\n aliases: [ 'tk' ],\n keywords: KEYWORDS,\n contains: [\n hljs.COMMENT(';[ \\\\t]*#', '$'),\n hljs.COMMENT('^[ \\\\t]*#', '$'),\n {\n beginKeywords: 'proc',\n end: '[\\\\{]',\n excludeEnd: true,\n contains: [\n {\n className: 'title',\n begin: '[ \\\\t\\\\n\\\\r]+(::)?[a-zA-Z_]((::)?[a-zA-Z0-9_])*',\n end: '[ \\\\t\\\\n\\\\r]',\n endsWithParent: true,\n excludeEnd: true\n }\n ]\n },\n {\n className: \"variable\",\n variants: [\n { begin: regex.concat(\n /\\$/,\n regex.optional(/::/),\n TCL_IDENT,\n '(::',\n TCL_IDENT,\n ')*'\n ) },\n {\n begin: '\\\\$\\\\{(::)?[a-zA-Z_]((::)?[a-zA-Z0-9_])*',\n end: '\\\\}',\n contains: [ NUMBER ]\n }\n ]\n },\n {\n className: 'string',\n contains: [ hljs.BACKSLASH_ESCAPE ],\n variants: [ hljs.inherit(hljs.QUOTE_STRING_MODE, { illegal: null }) ]\n },\n NUMBER\n ]\n };\n}\n\nmodule.exports = tcl;\n"],"mappings":"AAAA;AACA;AACA;AACA;AACA;AACA;AACA;;AAEA,SAASA,GAAGA,CAACC,IAAI,EAAE;EACjB,MAAMC,KAAK,GAAGD,IAAI,CAACC,KAAK;EACxB,MAAMC,SAAS,GAAG,wBAAwB;EAE1C,MAAMC,MAAM,GAAG;IACbC,SAAS,EAAE,QAAQ;IACnBC,QAAQ,EAAE,CACRL,IAAI,CAACM,kBAAkB,EACvBN,IAAI,CAACO,aAAa;EAEtB,CAAC;EAED,MAAMC,QAAQ,GAAG,CACf,OAAO,EACP,QAAQ,EACR,OAAO,EACP,OAAO,EACP,aAAa,EACb,aAAa,EACb,WAAW,EACX,cAAc,EACd,kBAAkB,EAClB,cAAc,EACd,YAAY,EACZ,SAAS,EACT,QAAQ,EACR,OAAO,EACP,OAAO,EACP,IAAI,EACJ,MAAM,EACN,OAAO,EACP,OAAO,EACP,QAAQ,EACR,UAAU,EACV,KAAK,EACL,MAAM,EACN,UAAU,EACV,KAAK,EACL,OAAO,EACP,MAAM,EACN,MAAM,EACN,MAAM,EACN,MAAM,EACN,UAAU,EACV,YAAY,EACZ,OAAO,EACP,MAAM,EACN,WAAW,EACX,UAAU,EACV,OAAO,EACP,KAAK,EACL,SAAS,EACT,QAAQ,EACR,MAAM,EACN,MAAM,EACN,QAAQ,EACR,SAAS,EACT,MAAM,EACN,IAAI,EACJ,MAAM,EACN,MAAM,EACN,QAAQ,EACR,MAAM,EACN,YAAY,EACZ,YAAY,EACZ,WAAW,EACX,YAAY,EACZ,MAAM,EACN,YAAY,EACZ,MAAM,EACN,WAAW,EACX,YAAY,EACZ,aAAa,EACb,aAAa,EACb,YAAY,EACZ,SAAS,EACT,UAAU,EACV,UAAU,EACV,QAAQ,EACR,QAAQ,EACR,QAAQ,EACR,WAAW,EACX,MAAM,EACN,SAAS,EACT,QAAQ,EACR,KAAK,EACL,aAAa,EACb,aAAa,EACb,UAAU,EACV,iBAAiB,EACjB,MAAM,EACN,MAAM,EACN,KAAK,EACL,MAAM,EACN,SAAS,EACT,QAAQ,EACR,UAAU,EACV,WAAW,EACX,QAAQ,EACR,QAAQ,EACR,MAAM,EACN,MAAM,EACN,MAAM,EACN,KAAK,EACL,QAAQ,EACR,QAAQ,EACR,OAAO,EACP,QAAQ,EACR,OAAO,EACP,QAAQ,EACR,eAAe,EACf,iBAAiB,EACjB,qBAAqB,EACrB,yBAAyB,EACzB,oBAAoB,EACpB,qBAAqB,EACrB,SAAS,EACT,SAAS,EACT,MAAM,EACN,MAAM,EACN,IAAI,EACJ,OAAO,EACP,SAAS,EACT,QAAQ,EACR,OAAO,EACP,QAAQ,EACR,SAAS,EACT,OAAO,EACP,UAAU,EACV,OAAO,EACP,OAAO,CACR;EAED,OAAO;IACLC,IAAI,EAAE,KAAK;IACXC,OAAO,EAAE,CAAE,IAAI,CAAE;IACjBC,QAAQ,EAAEH,QAAQ;IAClBI,QAAQ,EAAE,CACRZ,IAAI,CAACa,OAAO,CAAC,WAAW,EAAE,GAAG,CAAC,EAC9Bb,IAAI,CAACa,OAAO,CAAC,WAAW,EAAE,GAAG,CAAC,EAC9B;MACEC,aAAa,EAAE,MAAM;MACrBC,GAAG,EAAE,OAAO;MACZC,UAAU,EAAE,IAAI;MAChBJ,QAAQ,EAAE,CACR;QACER,SAAS,EAAE,OAAO;QAClBa,KAAK,EAAE,iDAAiD;QACxDF,GAAG,EAAE,cAAc;QACnBG,cAAc,EAAE,IAAI;QACpBF,UAAU,EAAE;MACd,CAAC;IAEL,CAAC,EACD;MACEZ,SAAS,EAAE,UAAU;MACrBC,QAAQ,EAAE,CACR;QAAEY,KAAK,EAAEhB,KAAK,CAACkB,MAAM,CACnB,IAAI,EACJlB,KAAK,CAACmB,QAAQ,CAAC,IAAI,CAAC,EACpBlB,SAAS,EACT,KAAK,EACLA,SAAS,EACT,IACF;MAAE,CAAC,EACH;QACEe,KAAK,EAAE,0CAA0C;QACjDF,GAAG,EAAE,KAAK;QACVH,QAAQ,EAAE,CAAET,MAAM;MACpB,CAAC;IAEL,CAAC,EACD;MACEC,SAAS,EAAE,QAAQ;MACnBQ,QAAQ,EAAE,CAAEZ,IAAI,CAACqB,gBAAgB,CAAE;MACnChB,QAAQ,EAAE,CAAEL,IAAI,CAACsB,OAAO,CAACtB,IAAI,CAACuB,iBAAiB,EAAE;QAAEC,OAAO,EAAE;MAAK,CAAC,CAAC;IACrE,CAAC,EACDrB,MAAM;EAEV,CAAC;AACH;AAEAsB,MAAM,CAACC,OAAO,GAAG3B,GAAG","ignoreList":[]},"metadata":{},"sourceType":"script","externalDependencies":[]}
|