mode-perl-d3ec360f.js 7.7 KB

1
  1. import{g as y}from"./index-3157015c.js";function R(k,v){for(var o=0;o<v.length;o++){const c=v[o];if(typeof c!="string"&&!Array.isArray(c)){for(const u in c)if(u!=="default"&&!(u in k)){const h=Object.getOwnPropertyDescriptor(c,u);h&&Object.defineProperty(k,u,h.get?h:{enumerable:!0,get:()=>c[u]})}}}return Object.freeze(Object.defineProperty(k,Symbol.toStringTag,{value:"Module"}))}var x={exports:{}};(function(k,v){ace.define("ace/mode/perl_highlight_rules",["require","exports","module","ace/lib/oop","ace/mode/text_highlight_rules"],function(o,c,u){var h=o("../lib/oop"),m=o("./text_highlight_rules").TextHighlightRules,s=function(){var l="base|constant|continue|else|elsif|for|foreach|format|goto|if|last|local|my|next|no|package|parent|redo|require|scalar|sub|unless|until|while|use|vars",t="ARGV|ENV|INC|SIG",n="getprotobynumber|getprotobyname|getservbyname|gethostbyaddr|gethostbyname|getservbyport|getnetbyaddr|getnetbyname|getsockname|getpeername|setpriority|getprotoent|setprotoent|getpriority|endprotoent|getservent|setservent|endservent|sethostent|socketpair|getsockopt|gethostent|endhostent|setsockopt|setnetent|quotemeta|localtime|prototype|getnetent|endnetent|rewinddir|wantarray|getpwuid|closedir|getlogin|readlink|endgrent|getgrgid|getgrnam|shmwrite|shutdown|readline|endpwent|setgrent|readpipe|formline|truncate|dbmclose|syswrite|setpwent|getpwnam|getgrent|getpwent|ucfirst|sysread|setpgrp|shmread|sysseek|sysopen|telldir|defined|opendir|connect|lcfirst|getppid|binmode|syscall|sprintf|getpgrp|readdir|seekdir|waitpid|reverse|unshift|symlink|dbmopen|semget|msgrcv|rename|listen|chroot|msgsnd|shmctl|accept|unpack|exists|fileno|shmget|system|unlink|printf|gmtime|msgctl|semctl|values|rindex|substr|splice|length|msgget|select|socket|return|caller|delete|alarm|ioctl|index|undef|lstat|times|srand|chown|fcntl|close|write|umask|rmdir|study|sleep|chomp|untie|print|utime|mkdir|atan2|split|crypt|flock|chmod|BEGIN|bless|chdir|semop|shift|reset|link|stat|chop|grep|fork|dump|join|open|tell|pipe|exit|glob|warn|each|bind|sort|pack|eval|push|keys|getc|kill|seek|sqrt|send|wait|rand|tied|read|time|exec|recv|eof|chr|int|ord|exp|pos|pop|sin|log|abs|oct|hex|tie|cos|vec|END|ref|map|die|uc|lc|do",e=this.createKeywordMapper({keyword:l,"constant.language":t,"support.function":n},"identifier");this.$rules={start:[{token:"comment.doc",regex:"^=(?:begin|item)\\b",next:"block_comment"},{token:"string.regexp",regex:"[/](?:(?:\\[(?:\\\\]|[^\\]])+\\])|(?:\\\\/|[^\\]/]))*[/]\\w*\\s*(?=[).,;]|$)"},{token:"string",regex:'["](?:(?:\\\\.)|(?:[^"\\\\]))*?["]'},{token:"string",regex:'["].*\\\\$',next:"qqstring"},{token:"string",regex:"['](?:(?:\\\\.)|(?:[^'\\\\]))*?[']"},{token:"string",regex:"['].*\\\\$",next:"qstring"},{token:"constant.numeric",regex:"0x[0-9a-fA-F]+\\b"},{token:"constant.numeric",regex:"[+-]?\\d+(?:(?:\\.\\d*)?(?:[eE][+-]?\\d+)?)?\\b"},{token:e,regex:"[a-zA-Z_$][a-zA-Z0-9_$]*\\b"},{token:"keyword.operator",regex:"%#|\\$#|\\.\\.\\.|\\|\\|=|>>=|<<=|<=>|&&=|=>|!~|\\^=|&=|\\|=|\\.=|x=|%=|\\/=|\\*=|\\-=|\\+=|=~|\\*\\*|\\-\\-|\\.\\.|\\|\\||&&|\\+\\+|\\->|!=|==|>=|<=|>>|<<|,|=|\\?\\:|\\^|\\||x|%|\\/|\\*|<|&|\\\\|~|!|>|\\.|\\-|\\+|\\-C|\\-b|\\-S|\\-u|\\-t|\\-p|\\-l|\\-d|\\-f|\\-g|\\-s|\\-z|\\-k|\\-e|\\-O|\\-T|\\-B|\\-M|\\-A|\\-X|\\-W|\\-c|\\-R|\\-o|\\-x|\\-w|\\-r|\\b(?:and|cmp|eq|ge|gt|le|lt|ne|not|or|xor)"},{token:"comment",regex:"#.*$"},{token:"lparen",regex:"[[({]"},{token:"rparen",regex:"[\\])}]"},{token:"text",regex:"\\s+"}],qqstring:[{token:"string",regex:'(?:(?:\\\\.)|(?:[^"\\\\]))*?"',next:"start"},{token:"string",regex:".+"}],qstring:[{token:"string",regex:"(?:(?:\\\\.)|(?:[^'\\\\]))*?'",next:"start"},{token:"string",regex:".+"}],block_comment:[{token:"comment.doc",regex:"^=cut\\b",next:"start"},{defaultToken:"comment.doc"}]}};h.inherits(s,m),c.PerlHighlightRules=s}),ace.define("ace/mode/matching_brace_outdent",["require","exports","module","ace/range"],function(o,c,u){var h=o("../range").Range,m=function(){};(function(){this.checkOutdent=function(s,l){return/^\s+$/.test(s)?/^\s*\}/.test(l):!1},this.autoOutdent=function(s,l){var t=s.getLine(l),n=t.match(/^(\s*\})/);if(!n)return 0;var e=n[1].length,r=s.findMatchingBracket({row:l,column:e});if(!r||r.row==l)return 0;var a=this.$getIndent(s.getLine(r.row));s.replace(new h(l,0,l,e-1),a)},this.$getIndent=function(s){return s.match(/^\s*/)[0]}}).call(m.prototype),c.MatchingBraceOutdent=m}),ace.define("ace/mode/folding/cstyle",["require","exports","module","ace/lib/oop","ace/range","ace/mode/folding/fold_mode"],function(o,c,u){var h=o("../../lib/oop"),m=o("../../range").Range,s=o("./fold_mode").FoldMode,l=c.FoldMode=function(t){t&&(this.foldingStartMarker=new RegExp(this.foldingStartMarker.source.replace(/\|[^|]*?$/,"|"+t.start)),this.foldingStopMarker=new RegExp(this.foldingStopMarker.source.replace(/\|[^|]*?$/,"|"+t.end)))};h.inherits(l,s),function(){this.foldingStartMarker=/([\{\[\(])[^\}\]\)]*$|^\s*(\/\*)/,this.foldingStopMarker=/^[^\[\{\(]*([\}\]\)])|^[\s\*]*(\*\/)/,this.singleLineBlockCommentRe=/^\s*(\/\*).*\*\/\s*$/,this.tripleStarBlockCommentRe=/^\s*(\/\*\*\*).*\*\/\s*$/,this.startRegionRe=/^\s*(\/\*|\/\/)#?region\b/,this._getFoldWidgetBase=this.getFoldWidget,this.getFoldWidget=function(t,n,e){var r=t.getLine(e);if(this.singleLineBlockCommentRe.test(r)&&!this.startRegionRe.test(r)&&!this.tripleStarBlockCommentRe.test(r))return"";var a=this._getFoldWidgetBase(t,n,e);return!a&&this.startRegionRe.test(r)?"start":a},this.getFoldWidgetRange=function(t,n,e,r){var a=t.getLine(e);if(this.startRegionRe.test(a))return this.getCommentRegionBlock(t,a,e);var i=a.match(this.foldingStartMarker);if(i){var g=i.index;if(i[1])return this.openingBracketBlock(t,i[1],e,g);var d=t.getCommentFoldRange(e,g+i[0].length,1);return d&&!d.isMultiLine()&&(r?d=this.getSectionRange(t,e):n!="all"&&(d=null)),d}if(n!=="markbegin"){var i=a.match(this.foldingStopMarker);if(i){var g=i.index+i[0].length;return i[1]?this.closingBracketBlock(t,i[1],e,g):t.getCommentFoldRange(e,g,-1)}}},this.getSectionRange=function(t,n){var e=t.getLine(n),r=e.search(/\S/),a=n,g=e.length;n=n+1;for(var d=n,i=t.getLength();++n<i;){e=t.getLine(n);var p=e.search(/\S/);if(p!==-1){if(r>p)break;var f=this.getFoldWidgetRange(t,"all",n);if(f){if(f.start.row<=a)break;if(f.isMultiLine())n=f.end.row;else if(r==p)break}d=n}}return new m(a,g,d,t.getLine(d).length)},this.getCommentRegionBlock=function(t,n,e){for(var r=n.search(/\s*$/),a=t.getLength(),g=e,d=/^\s*(?:\/\*|\/\/|--)#?(end)?region\b/,i=1;++e<a;){n=t.getLine(e);var p=d.exec(n);if(p&&(p[1]?i--:i++,!i))break}var f=e;if(f>g)return new m(g,r,f,n.length)}}.call(l.prototype)}),ace.define("ace/mode/perl",["require","exports","module","ace/lib/oop","ace/mode/text","ace/mode/perl_highlight_rules","ace/mode/matching_brace_outdent","ace/mode/folding/cstyle"],function(o,c,u){var h=o("../lib/oop"),m=o("./text").Mode,s=o("./perl_highlight_rules").PerlHighlightRules,l=o("./matching_brace_outdent").MatchingBraceOutdent,t=o("./folding/cstyle").FoldMode,n=function(){this.HighlightRules=s,this.$outdent=new l,this.foldingRules=new t({start:"^=(begin|item)\\b",end:"^=(cut)\\b"}),this.$behaviour=this.$defaultBehaviour};h.inherits(n,m),function(){this.lineCommentStart="#",this.blockComment=[{start:"=begin",end:"=cut",lineStartOnly:!0},{start:"=item",end:"=cut",lineStartOnly:!0}],this.getNextLineIndent=function(e,r,a){var g=this.$getIndent(r),d=this.getTokenizer().getLineTokens(r,e),i=d.tokens;if(i.length&&i[i.length-1].type=="comment")return g;if(e=="start"){var p=r.match(/^.*[\{\(\[:]\s*$/);p&&(g+=a)}return g},this.checkOutdent=function(e,r,a){return this.$outdent.checkOutdent(r,a)},this.autoOutdent=function(e,r,a){this.$outdent.autoOutdent(r,a)},this.$id="ace/mode/perl",this.snippetFileId="ace/snippets/perl"}.call(n.prototype),c.Mode=n}),function(){ace.require(["ace/mode/perl"],function(o){k&&(k.exports=o)})}()})(x);var b=x.exports;const M=y(b),$=R({__proto__:null,default:M},[b]);export{$ as m};