import{A as S}from"./index.f4d41e67.entry.js";function O(c,x){return x.forEach(function(t){t&&typeof t!="string"&&!Array.isArray(t)&&Object.keys(t).forEach(function(l){if(l!=="default"&&!(l in c)){var f=Object.getOwnPropertyDescriptor(t,l);Object.defineProperty(c,l,f.get?f:{enumerable:!0,get:function(){return t[l]}})}})}),Object.freeze(Object.defineProperty(c,Symbol.toStringTag,{value:"Module"}))}var _={exports:{}};(function(c,x){(function(t){t(S.exports)})(function(t){t.registerHelper("wordChars","r",/[\w.]/),t.defineMode("r",function(l){function f(e){for(var n={},r=0;r<e.length;++r)n[e[r]]=!0;return n}var b=["NULL","NA","Inf","NaN","NA_integer_","NA_real_","NA_complex_","NA_character_","TRUE","FALSE"],y=["list","quote","bquote","eval","return","call","parse","deparse"],g=["if","else","repeat","while","function","for","in","next","break"],A=["if","else","repeat","while","function","for"];t.registerHelper("hintWords","r",b.concat(y,g));var E=f(b),w=f(y),N=f(g),I=f(A),k=/[+\-*\/^<>=!&|~$:]/,o;function p(e,n){o=null;var r=e.next();if(r=="#")return e.skipToEnd(),"comment";if(r=="0"&&e.eat("x"))return e.eatWhile(/[\da-f]/i),"number";if(r=="."&&e.eat(/\d/))return e.match(/\d*(?:e[+\-]?\d+)?/),"number";if(/\d/.test(r))return e.match(/\d*(?:\.\d+)?(?:e[+\-]\d+)?L?/),"number";if(r=="'"||r=='"')return n.tokenize=L(r),"string";if(r=="`")return e.match(/[^`]+`/),"variable-3";if(r=="."&&e.match(/.(?:[.]|\d+)/))return"keyword";if(/[a-zA-Z\.]/.test(r)){e.eatWhile(/[\w\.]/);var i=e.current();return E.propertyIsEnumerable(i)?"atom":N.propertyIsEnumerable(i)?(I.propertyIsEnumerable(i)&&!e.match(/\s*if(\s+|$)/,!1)&&(o="block"),"keyword"):w.propertyIsEnumerable(i)?"builtin":"variable"}else return r=="%"?(e.skipTo("%")&&e.next(),"operator variable-2"):r=="<"&&e.eat("-")||r=="<"&&e.match("<-")||r=="-"&&e.match(/>>?/)?"operator arrow":r=="="&&n.ctx.argList?"arg-is":k.test(r)?r=="$"?"operator dollar":(e.eatWhile(k),"operator"):/[\(\){}\[\];]/.test(r)?(o=r,r==";"?"semi":null):null}function L(e){return function(n,r){if(n.eat("\\")){var i=n.next();return i=="x"?n.match(/^[a-f0-9]{2}/i):(i=="u"||i=="U")&&n.eat("{")&&n.skipTo("}")?n.next():i=="u"?n.match(/^[a-f0-9]{4}/i):i=="U"?n.match(/^[a-f0-9]{8}/i):/[0-7]/.test(i)&&n.match(/^[0-7]{1,2}/),"string-2"}else{for(var u;(u=n.next())!=null;){if(u==e){r.tokenize=p;break}if(u=="\\"){n.backUp(1);break}}return"string"}}}var h=1,d=2,s=4;function a(e,n,r){e.ctx={type:n,indent:e.indent,flags:0,column:r.column(),prev:e.ctx}}function m(e,n){var r=e.ctx;e.ctx={type:r.type,indent:r.indent,flags:r.flags|n,column:r.column,prev:r.prev}}function v(e){e.indent=e.ctx.indent,e.ctx=e.ctx.prev}return{startState:function(){return{tokenize:p,ctx:{type:"top",indent:-l.indentUnit,flags:d},indent:0,afterIdent:!1}},token:function(e,n){if(e.sol()&&((n.ctx.flags&3)==0&&(n.ctx.flags|=d),n.ctx.flags&s&&v(n),n.indent=e.indentation()),e.eatSpace())return null;var r=n.tokenize(e,n);return r!="comment"&&(n.ctx.flags&d)==0&&m(n,h),(o==";"||o=="{"||o=="}")&&n.ctx.type=="block"&&v(n),o=="{"?a(n,"}",e):o=="("?(a(n,")",e),n.afterIdent&&(n.ctx.argList=!0)):o=="["?a(n,"]",e):o=="block"?a(n,"block",e):o==n.ctx.type?v(n):n.ctx.type=="block"&&r!="comment"&&m(n,s),n.afterIdent=r=="variable"||r=="keyword",r},indent:function(e,n){if(e.tokenize!=p)return 0;var r=n&&n.charAt(0),i=e.ctx,u=r==i.type;return i.flags&s&&(i=i.prev),i.type=="block"?i.indent+(r=="{"?0:l.indentUnit):i.flags&h?i.column+(u?0:1):i.indent+(u?0:l.indentUnit)},lineComment:"#"}}),t.defineMIME("text/x-rsrc","r")})})();var U=_.exports,j=O({__proto__:null,default:U},[_.exports]);export{j as r};
