qistd.c 188 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751752753754755756757758759760761762763764765766767768769770771772773774775776777778779780781782783784785786787788789790791792793794795796797798799800801802803804805806807808809810811812813814815816817818819820821822823824825826827828829830831832833834835836837838839840841842843844845846847848849850851852853854855856857858859860861862863864865866867868869870871872873874875876877878879880881882883884885886887888889890891892893894895896897898899900901902903904905906907908909910911912913914915916917918919920921922923924925926927928929930931932933934935936937938939940941942943944945946947948949950951952953954955956957958959960961962963964965966967968969970971972973974975976977978979980981982983984985986987988989990991992993994995996997998999100010011002100310041005100610071008100910101011101210131014101510161017101810191020102110221023102410251026102710281029103010311032103310341035103610371038103910401041104210431044104510461047104810491050105110521053105410551056105710581059106010611062106310641065106610671068106910701071107210731074107510761077107810791080108110821083108410851086108710881089109010911092109310941095109610971098109911001101110211031104110511061107110811091110111111121113111411151116111711181119112011211122112311241125112611271128112911301131113211331134113511361137113811391140114111421143114411451146114711481149115011511152115311541155115611571158115911601161116211631164116511661167116811691170117111721173117411751176117711781179118011811182118311841185118611871188118911901191119211931194119511961197119811991200120112021203120412051206120712081209121012111212121312141215121612171218121912201221122212231224122512261227122812291230123112321233123412351236123712381239124012411242124312441245124612471248124912501251125212531254125512561257125812591260126112621263126412651266126712681269127012711272127312741275127612771278127912801281128212831284128512861287128812891290129112921293129412951296129712981299130013011302130313041305130613071308130913101311131213131314131513161317131813191320132113221323132413251326132713281329133013311332133313341335133613371338133913401341134213431344134513461347134813491350135113521353135413551356135713581359136013611362136313641365136613671368136913701371137213731374137513761377137813791380138113821383138413851386138713881389139013911392139313941395139613971398139914001401140214031404140514061407140814091410141114121413141414151416141714181419142014211422142314241425142614271428142914301431143214331434143514361437143814391440144114421443144414451446144714481449145014511452145314541455145614571458145914601461146214631464146514661467146814691470147114721473147414751476147714781479148014811482148314841485148614871488148914901491149214931494149514961497149814991500150115021503150415051506150715081509151015111512151315141515151615171518151915201521152215231524152515261527152815291530153115321533153415351536153715381539154015411542154315441545154615471548154915501551155215531554155515561557155815591560156115621563156415651566156715681569157015711572157315741575157615771578157915801581158215831584158515861587158815891590159115921593159415951596159715981599160016011602160316041605160616071608160916101611161216131614161516161617161816191620162116221623162416251626162716281629163016311632163316341635163616371638163916401641164216431644164516461647164816491650165116521653165416551656165716581659166016611662166316641665166616671668166916701671167216731674167516761677167816791680168116821683168416851686168716881689169016911692169316941695169616971698169917001701170217031704170517061707170817091710171117121713171417151716171717181719172017211722172317241725172617271728172917301731173217331734173517361737173817391740174117421743174417451746174717481749175017511752175317541755175617571758175917601761176217631764176517661767176817691770177117721773177417751776177717781779178017811782178317841785178617871788178917901791179217931794179517961797179817991800180118021803180418051806180718081809181018111812181318141815181618171818181918201821182218231824182518261827182818291830183118321833183418351836183718381839184018411842184318441845184618471848184918501851185218531854185518561857185818591860186118621863186418651866186718681869187018711872187318741875187618771878187918801881188218831884188518861887188818891890189118921893189418951896189718981899190019011902190319041905190619071908190919101911191219131914191519161917191819191920192119221923192419251926192719281929193019311932193319341935193619371938193919401941194219431944194519461947194819491950195119521953195419551956195719581959196019611962196319641965196619671968196919701971197219731974197519761977197819791980198119821983198419851986198719881989199019911992199319941995199619971998199920002001200220032004200520062007200820092010201120122013201420152016201720182019202020212022202320242025202620272028202920302031203220332034203520362037203820392040204120422043204420452046204720482049205020512052205320542055205620572058205920602061206220632064206520662067206820692070207120722073207420752076207720782079208020812082208320842085208620872088208920902091209220932094209520962097209820992100210121022103210421052106210721082109211021112112211321142115211621172118211921202121212221232124212521262127212821292130213121322133213421352136213721382139214021412142214321442145214621472148214921502151215221532154215521562157215821592160216121622163216421652166216721682169217021712172217321742175217621772178217921802181218221832184218521862187218821892190219121922193219421952196219721982199220022012202220322042205220622072208220922102211221222132214221522162217221822192220222122222223222422252226222722282229223022312232223322342235223622372238223922402241224222432244224522462247224822492250225122522253225422552256225722582259226022612262226322642265226622672268226922702271227222732274227522762277227822792280228122822283228422852286228722882289229022912292229322942295229622972298229923002301230223032304230523062307230823092310231123122313231423152316231723182319232023212322232323242325232623272328232923302331233223332334233523362337233823392340234123422343234423452346234723482349235023512352235323542355235623572358235923602361236223632364236523662367236823692370237123722373237423752376237723782379238023812382238323842385238623872388238923902391239223932394239523962397239823992400240124022403240424052406240724082409241024112412241324142415241624172418241924202421242224232424242524262427242824292430243124322433243424352436243724382439244024412442244324442445244624472448244924502451245224532454245524562457245824592460246124622463246424652466246724682469247024712472247324742475247624772478247924802481248224832484248524862487248824892490249124922493249424952496249724982499250025012502250325042505250625072508250925102511251225132514251525162517251825192520252125222523252425252526252725282529253025312532253325342535253625372538253925402541254225432544254525462547254825492550255125522553255425552556255725582559256025612562256325642565256625672568256925702571257225732574257525762577257825792580258125822583258425852586258725882589259025912592259325942595259625972598259926002601260226032604260526062607260826092610261126122613261426152616261726182619262026212622262326242625262626272628262926302631263226332634263526362637263826392640264126422643264426452646264726482649265026512652265326542655265626572658265926602661266226632664266526662667266826692670267126722673267426752676267726782679268026812682268326842685268626872688268926902691269226932694269526962697269826992700270127022703270427052706270727082709271027112712271327142715271627172718271927202721272227232724272527262727272827292730273127322733273427352736273727382739274027412742274327442745274627472748274927502751275227532754275527562757275827592760276127622763276427652766276727682769277027712772277327742775277627772778277927802781278227832784278527862787278827892790279127922793279427952796279727982799280028012802280328042805280628072808280928102811281228132814281528162817281828192820282128222823282428252826282728282829283028312832283328342835283628372838283928402841284228432844284528462847284828492850285128522853285428552856285728582859286028612862286328642865286628672868286928702871287228732874287528762877287828792880288128822883288428852886288728882889289028912892289328942895289628972898289929002901290229032904290529062907290829092910291129122913291429152916291729182919292029212922292329242925292629272928292929302931293229332934293529362937293829392940294129422943294429452946294729482949295029512952295329542955295629572958295929602961296229632964296529662967296829692970297129722973297429752976297729782979298029812982298329842985298629872988298929902991299229932994299529962997299829993000300130023003300430053006300730083009301030113012301330143015301630173018301930203021302230233024302530263027302830293030303130323033303430353036303730383039304030413042304330443045304630473048304930503051305230533054305530563057305830593060306130623063306430653066306730683069307030713072307330743075307630773078307930803081308230833084308530863087308830893090309130923093309430953096309730983099310031013102310331043105310631073108310931103111311231133114311531163117311831193120312131223123312431253126312731283129313031313132313331343135313631373138313931403141314231433144314531463147314831493150315131523153315431553156315731583159316031613162316331643165316631673168316931703171317231733174317531763177317831793180318131823183318431853186318731883189319031913192319331943195319631973198319932003201320232033204320532063207320832093210321132123213321432153216321732183219322032213222322332243225322632273228322932303231323232333234323532363237323832393240324132423243324432453246324732483249325032513252325332543255325632573258325932603261326232633264326532663267326832693270327132723273327432753276327732783279328032813282328332843285328632873288328932903291329232933294329532963297329832993300330133023303330433053306330733083309331033113312331333143315331633173318331933203321332233233324332533263327332833293330333133323333333433353336333733383339334033413342334333443345334633473348334933503351335233533354335533563357335833593360336133623363336433653366336733683369337033713372337333743375337633773378337933803381338233833384338533863387338833893390339133923393339433953396339733983399340034013402340334043405340634073408340934103411341234133414341534163417341834193420342134223423342434253426342734283429343034313432343334343435343634373438343934403441344234433444344534463447344834493450345134523453345434553456345734583459346034613462346334643465346634673468346934703471347234733474347534763477347834793480348134823483348434853486348734883489349034913492349334943495349634973498349935003501350235033504350535063507350835093510351135123513351435153516351735183519352035213522352335243525352635273528352935303531353235333534353535363537353835393540354135423543354435453546354735483549355035513552355335543555355635573558355935603561356235633564356535663567356835693570357135723573357435753576357735783579358035813582358335843585358635873588358935903591359235933594359535963597359835993600360136023603360436053606360736083609361036113612361336143615361636173618361936203621362236233624362536263627362836293630363136323633363436353636363736383639364036413642364336443645364636473648364936503651365236533654365536563657365836593660366136623663366436653666366736683669367036713672367336743675367636773678367936803681368236833684368536863687368836893690369136923693369436953696369736983699370037013702370337043705370637073708370937103711371237133714371537163717371837193720372137223723372437253726372737283729373037313732373337343735373637373738373937403741374237433744374537463747374837493750375137523753375437553756375737583759376037613762376337643765376637673768376937703771377237733774377537763777377837793780378137823783378437853786378737883789379037913792379337943795379637973798379938003801380238033804380538063807380838093810381138123813381438153816381738183819382038213822382338243825382638273828382938303831383238333834383538363837383838393840384138423843384438453846384738483849385038513852385338543855385638573858385938603861386238633864386538663867386838693870387138723873387438753876387738783879388038813882388338843885388638873888388938903891389238933894389538963897389838993900390139023903390439053906390739083909391039113912391339143915391639173918391939203921392239233924392539263927392839293930393139323933393439353936393739383939394039413942394339443945394639473948394939503951395239533954395539563957395839593960396139623963396439653966396739683969397039713972397339743975397639773978397939803981398239833984398539863987398839893990399139923993399439953996399739983999400040014002400340044005400640074008400940104011401240134014401540164017401840194020402140224023402440254026402740284029403040314032403340344035403640374038403940404041404240434044404540464047404840494050405140524053405440554056405740584059406040614062406340644065406640674068406940704071407240734074407540764077407840794080408140824083408440854086408740884089409040914092409340944095409640974098409941004101410241034104410541064107410841094110411141124113411441154116411741184119412041214122412341244125412641274128412941304131413241334134413541364137413841394140414141424143414441454146414741484149415041514152415341544155415641574158415941604161416241634164416541664167416841694170417141724173417441754176417741784179418041814182418341844185418641874188418941904191419241934194419541964197419841994200420142024203420442054206420742084209421042114212421342144215421642174218421942204221422242234224422542264227422842294230423142324233423442354236423742384239424042414242424342444245424642474248424942504251425242534254425542564257425842594260426142624263426442654266426742684269427042714272427342744275427642774278427942804281428242834284428542864287428842894290429142924293429442954296429742984299430043014302430343044305430643074308430943104311431243134314431543164317431843194320432143224323432443254326432743284329433043314332433343344335433643374338433943404341434243434344434543464347434843494350435143524353435443554356435743584359436043614362436343644365436643674368436943704371437243734374437543764377437843794380438143824383438443854386438743884389439043914392439343944395439643974398439944004401440244034404440544064407440844094410441144124413441444154416441744184419442044214422442344244425442644274428442944304431443244334434443544364437443844394440444144424443444444454446444744484449445044514452
  1. inline static qi_list_t *__qistd3(qi_state_t *state) {
  2. qi_list_t *list = qi_list_make_n(1);
  3. qi_list_data(list, 0) = qi_get(state, "p");
  4. return list;
  5. }
  6. inline static qi_list_t *__qistd2(qi_state_t *state) {
  7. qi_list_t *list = qi_list_make_n(2);
  8. qi_list_data(list, 0) = qi_get(state, "p");
  9. qi_list_data(list, 1) = qi_add(state, qi_call(state, qi_get(state, "get_meta_table"), __qistd3(state)), qi_get(state, "t"));
  10. return list;
  11. }
  12. inline static qi_list_t *__qistd4(qi_state_t *state) {
  13. qi_list_t *list = qi_list_make_n(2);
  14. qi_list_data(list, 0) = qi_get(state, "o");
  15. qi_list_data(list, 1) = qi_get(state, "t");
  16. return list;
  17. }
  18. qi_value_t *__qistd0(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
  19. qi_decl(state, "o", pargc >= 3? qi_list_index(pargs, 2): qi_make_table(state, NULL));
  20. qi_decl(state, "p", pargc >= 2? qi_list_index(pargs, 1): state->nil);
  21. qi_decl(state, "t", qi_list_index(pargs, 0));
  22. qi_value_t *__qistd1 = (_qi_truthy(state, qi_not_is(state, qi_get(state, "p"), state->nil))? qi_call(state, qi_get(state, "set_meta_table"), __qistd2(state)): qi_call(state, qi_get(state, "set_meta_table"), __qistd4(state)));
  23. return __qistd1;return state->nil;
  24. }
  25. inline static qi_list_t *__qistd7(qi_state_t *state) {
  26. qi_list_t *list = qi_list_make_n(1);
  27. qi_list_data(list, 0) = qi_get(state, "o");
  28. return list;
  29. }
  30. qi_value_t *__qistd5(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
  31. qi_decl(state, "o", qi_list_index(pargs, 0));
  32. qi_value_t *__qistd6 = qi_call(state, qi_get(state, "has_meta_table"), __qistd7(state));
  33. return __qistd6;return state->nil;
  34. }
  35. qi_value_t *__qistd12(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
  36. qi_decl(state, "this", qi_list_index(pargs, 0));
  37. qi_value_t *__qistd13 = qi_get(state, "n");
  38. return __qistd13;return state->nil;
  39. }
  40. inline static qi_table_t *__qistd14(qi_state_t *state) {
  41. qi_table_t *table = qi_table_make();
  42. qi_table_set(table, "n", qi_get(state, "n"));
  43. return table;
  44. }
  45. qi_value_t *__qistd15(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
  46. qi_decl(state, "this", qi_list_index(pargs, 0));
  47. qi_value_t *__qistd16 = qi_add(state, qi_add(state, qi_make_string(state, "<class "), qi_get(state, "n")), qi_make_string(state, ">"));
  48. return __qistd16;return state->nil;
  49. }
  50. inline static qi_table_t *__qistd17(qi_state_t *state) {
  51. qi_table_t *table = qi_table_make();
  52. qi_table_set(table, "n", qi_get(state, "n"));
  53. return table;
  54. }
  55. qi_value_t *__qistd20(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
  56. qi_decl(state, "this", qi_list_index(pargs, 0));
  57. qi_value_t *__qistd21 = qi_get(state, "n");
  58. return __qistd21;return state->nil;
  59. }
  60. inline static qi_table_t *__qistd22(qi_state_t *state) {
  61. qi_table_t *table = qi_table_make();
  62. qi_table_set(table, "n", qi_get(state, "n"));
  63. return table;
  64. }
  65. inline static qi_table_t *__qistd19(qi_state_t *state) {
  66. qi_table_t *table = qi_table_make();
  67. qi_table_set(table, qi_to_string(state, qi_make_string(state, "__type"))->value.string, qi_make_function(state, "<anon>", 1, __qistd20, __qistd22(state)));
  68. return table;
  69. }
  70. inline static qi_list_t *__qistd24(qi_state_t *state) {
  71. qi_list_t *list = qi_list_make_n(1);
  72. qi_list_data(list, 0) = qi_get(state, "p");
  73. return list;
  74. }
  75. inline static qi_list_t *__qistd25(qi_state_t *state) {
  76. qi_list_t *list = qi_list_make_n(2);
  77. qi_list_data(list, 0) = qi_get(state, "t");
  78. qi_list_data(list, 1) = qi_get(state, "mt");
  79. return list;
  80. }
  81. inline static qi_list_t *__qistd27(qi_state_t *state) {
  82. qi_list_t *list = qi_list_make_n(1);
  83. qi_list_data(list, 0) = qi_get(state, "obj");
  84. return list;
  85. }
  86. inline static qi_list_t *__qistd26(qi_state_t *state) {
  87. qi_list_t *list = qi_list_make_n(2);
  88. qi_list_data(list, 0) = qi_index(state, qi_get(state, "mt"), qi_make_string(state, "constructor"));
  89. qi_list_data(list, 1) = qi_add(state, qi_make_list(state, __qistd27(state)), qi_get(state, "pargs"));
  90. return list;
  91. }
  92. qi_value_t *__qistd18(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
  93. qi_decl(state, "pargs", qi_list_index(pargs, 1));
  94. qi_decl(state, "this", qi_list_index(pargs, 0));
  95. qi_decl(state, "t", qi_make_table(state, NULL));
  96. qi_decl(state, "mt", qi_make_table(state, __qistd19(state)));
  97. qi_new_scope(state);
  98. if (_qi_truthy(state, qi_get(state, "p"))) {
  99. qi_decl(state, "i", qi_make_number(state, 0));
  100. qi_new_scope(state);
  101. while (_qi_truthy(state, qi_lt(state, qi_get(state, "i"), qi_call(state, qi_get(state, "len"), __qistd24(state))))) {
  102. qi_new_scope(state);
  103. (void)(qi_set(state, false, "t", qi_add(state, qi_get(state, "t"), qi_index(state, qi_index(state, qi_get(state, "p"), qi_get(state, "i")), qi_make_string(state, "t")))));
  104. (void)(qi_set(state, false, "mt", qi_add(state, qi_get(state, "mt"), qi_index(state, qi_index(state, qi_get(state, "p"), qi_get(state, "i")), qi_make_string(state, "mt")))));
  105. (void)(qi_set(state, false, "i", qi_add(state, qi_get(state, "i"), qi_make_number(state, 1))));
  106. __continue23:;
  107. qi_old_scope(state);
  108. }
  109. goto __exit23;
  110. __break23:;
  111. qi_old_scope(state);
  112. __exit23:;
  113. qi_old_scope(state);
  114. }
  115. qi_old_scope(state);
  116. (void)(qi_set(state, false, "t", qi_add(state, qi_get(state, "t"), qi_index(state, qi_get(state, "this"), qi_make_string(state, "t")))));
  117. (void)(qi_set(state, false, "mt", qi_add(state, qi_get(state, "mt"), qi_index(state, qi_get(state, "this"), qi_make_string(state, "mt")))));
  118. (void)(qi_index_set(state, false, qi_get(state, "mt"), qi_make_string(state, "super"), qi_index(state, qi_get(state, "this"), qi_make_string(state, "super"))));
  119. qi_decl(state, "obj", qi_call(state, qi_get(state, "set_meta_table"), __qistd25(state)));
  120. qi_new_scope(state);
  121. if (_qi_truthy(state, qi_in(state, qi_make_string(state, "constructor"), qi_get(state, "mt")))) {
  122. (void)(qi_call(state, qi_get(state, "func_call"), __qistd26(state)));}
  123. qi_old_scope(state);
  124. qi_value_t *__qistd28 = qi_get(state, "obj");
  125. return __qistd28;
  126. return state->nil;
  127. }
  128. inline static qi_table_t *__qistd29(qi_state_t *state) {
  129. qi_table_t *table = qi_table_make();
  130. qi_table_set(table, "n", qi_get(state, "n"));
  131. qi_table_set(table, "p", qi_get(state, "p"));
  132. return table;
  133. }
  134. inline static qi_table_t *__qistd11(qi_state_t *state) {
  135. qi_table_t *table = qi_table_make();
  136. qi_table_set(table, qi_to_string(state, qi_make_string(state, "t"))->value.string, qi_get(state, "t"));
  137. qi_table_set(table, qi_to_string(state, qi_make_string(state, "mt"))->value.string, qi_get(state, "mt"));
  138. qi_table_set(table, qi_to_string(state, qi_make_string(state, "super"))->value.string, qi_get(state, "p"));
  139. qi_table_set(table, qi_to_string(state, qi_make_string(state, "__type"))->value.string, qi_make_function(state, "<anon>", 1, __qistd12, __qistd14(state)));
  140. qi_table_set(table, qi_to_string(state, qi_make_string(state, "__str"))->value.string, qi_make_function(state, "<anon>", 1, __qistd15, __qistd17(state)));
  141. qi_table_set(table, qi_to_string(state, qi_make_string(state, "__call"))->value.string, qi_make_function(state, "<anon>", 2, __qistd18, __qistd29(state)));
  142. return table;
  143. }
  144. inline static qi_list_t *__qistd10(qi_state_t *state) {
  145. qi_list_t *list = qi_list_make_n(3);
  146. qi_list_data(list, 0) = qi_make_table(state, __qistd11(state));
  147. qi_list_data(list, 1) = state->nil;
  148. qi_list_data(list, 2) = qi_get(state, "st");
  149. return list;
  150. }
  151. qi_value_t *__qistd8(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
  152. qi_decl(state, "mt", qi_list_index(pargs, 3));
  153. qi_decl(state, "st", qi_list_index(pargs, 4));
  154. qi_decl(state, "n", qi_list_index(pargs, 0));
  155. qi_decl(state, "p", qi_list_index(pargs, 1));
  156. qi_decl(state, "t", qi_list_index(pargs, 2));
  157. qi_value_t *__qistd9 = qi_call(state, qi_get(state, "Object"), __qistd10(state));
  158. return __qistd9;return state->nil;
  159. }
  160. qi_value_t *__qistd31(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
  161. qi_decl(state, "msg", pargc >= 2? qi_list_index(pargs, 1): state->nil);
  162. qi_decl(state, "this", qi_list_index(pargs, 0));
  163. (void)(qi_index_set(state, false, qi_get(state, "this"), qi_make_string(state, "msg"), qi_get(state, "msg")));
  164. return state->nil;
  165. }
  166. inline static qi_list_t *__qistd34(qi_state_t *state) {
  167. qi_list_t *list = qi_list_make_n(1);
  168. qi_list_data(list, 0) = qi_get(state, "this");
  169. return list;
  170. }
  171. inline static qi_list_t *__qistd35(qi_state_t *state) {
  172. qi_list_t *list = qi_list_make_n(1);
  173. qi_list_data(list, 0) = qi_get(state, "this");
  174. return list;
  175. }
  176. qi_value_t *__qistd32(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
  177. qi_decl(state, "this", qi_list_index(pargs, 0));
  178. qi_value_t *__qistd33 = (_qi_truthy(state, qi_is(state, qi_index(state, qi_get(state, "this"), qi_make_string(state, "msg")), state->nil))? qi_call(state, qi_get(state, "type"), __qistd34(state)): qi_add(state, qi_add(state, qi_call(state, qi_get(state, "type"), __qistd35(state)), qi_make_string(state, ": ")), qi_index(state, qi_get(state, "this"), qi_make_string(state, "msg"))));
  179. return __qistd33;return state->nil;
  180. }
  181. qi_value_t *__qistd30(qi_state_t *state) {
  182. qi_list_t *supers = qi_list_make_n(0);
  183. qi_table_t *table = qi_table_make();
  184. qi_table_t *metatable = qi_table_make();
  185. qi_table_t *statictable = qi_table_make();
  186. qi_table_set(metatable, "msg", state->nil);
  187. qi_table_set(metatable, "constructor", qi_make_function(state, "Error.constructor", 1, __qistd31, NULL));
  188. qi_table_set(metatable, "__str", qi_make_function(state, "Error.__str", 1, __qistd32, NULL));
  189. qi_list_t *pargs = qi_list_make_n(5);
  190. qi_list_data(pargs, 0) = qi_make_string(state, "Error");
  191. qi_list_data(pargs, 1) = qi_make_list(state, supers);
  192. qi_list_data(pargs, 2) = qi_make_table(state, table);
  193. qi_list_data(pargs, 3) = qi_make_table(state, metatable);
  194. qi_list_data(pargs, 4) = qi_make_table(state, statictable);
  195. return qi_call(state, qi_get(state, "__class_wrapper"), pargs);
  196. }
  197. qi_value_t *__qistd36(qi_state_t *state) {
  198. qi_list_t *supers = qi_list_make_n(1);
  199. qi_list_data(supers, 0) = qi_get(state, "Error");
  200. qi_table_t *table = qi_table_make();
  201. qi_table_t *metatable = qi_table_make();
  202. qi_table_t *statictable = qi_table_make();
  203. qi_list_t *pargs = qi_list_make_n(5);
  204. qi_list_data(pargs, 0) = qi_make_string(state, "AssertionError");
  205. qi_list_data(pargs, 1) = qi_make_list(state, supers);
  206. qi_list_data(pargs, 2) = qi_make_table(state, table);
  207. qi_list_data(pargs, 3) = qi_make_table(state, metatable);
  208. qi_list_data(pargs, 4) = qi_make_table(state, statictable);
  209. return qi_call(state, qi_get(state, "__class_wrapper"), pargs);
  210. }
  211. qi_value_t *__qistd37(qi_state_t *state) {
  212. qi_list_t *supers = qi_list_make_n(1);
  213. qi_list_data(supers, 0) = qi_get(state, "Error");
  214. qi_table_t *table = qi_table_make();
  215. qi_table_t *metatable = qi_table_make();
  216. qi_table_t *statictable = qi_table_make();
  217. qi_list_t *pargs = qi_list_make_n(5);
  218. qi_list_data(pargs, 0) = qi_make_string(state, "TypeError");
  219. qi_list_data(pargs, 1) = qi_make_list(state, supers);
  220. qi_list_data(pargs, 2) = qi_make_table(state, table);
  221. qi_list_data(pargs, 3) = qi_make_table(state, metatable);
  222. qi_list_data(pargs, 4) = qi_make_table(state, statictable);
  223. return qi_call(state, qi_get(state, "__class_wrapper"), pargs);
  224. }
  225. qi_value_t *__qistd38(qi_state_t *state) {
  226. qi_list_t *supers = qi_list_make_n(1);
  227. qi_list_data(supers, 0) = qi_get(state, "Error");
  228. qi_table_t *table = qi_table_make();
  229. qi_table_t *metatable = qi_table_make();
  230. qi_table_t *statictable = qi_table_make();
  231. qi_list_t *pargs = qi_list_make_n(5);
  232. qi_list_data(pargs, 0) = qi_make_string(state, "ValueError");
  233. qi_list_data(pargs, 1) = qi_make_list(state, supers);
  234. qi_list_data(pargs, 2) = qi_make_table(state, table);
  235. qi_list_data(pargs, 3) = qi_make_table(state, metatable);
  236. qi_list_data(pargs, 4) = qi_make_table(state, statictable);
  237. return qi_call(state, qi_get(state, "__class_wrapper"), pargs);
  238. }
  239. qi_value_t *__qistd39(qi_state_t *state) {
  240. qi_list_t *supers = qi_list_make_n(1);
  241. qi_list_data(supers, 0) = qi_get(state, "Error");
  242. qi_table_t *table = qi_table_make();
  243. qi_table_t *metatable = qi_table_make();
  244. qi_table_t *statictable = qi_table_make();
  245. qi_list_t *pargs = qi_list_make_n(5);
  246. qi_list_data(pargs, 0) = qi_make_string(state, "IndexError");
  247. qi_list_data(pargs, 1) = qi_make_list(state, supers);
  248. qi_list_data(pargs, 2) = qi_make_table(state, table);
  249. qi_list_data(pargs, 3) = qi_make_table(state, metatable);
  250. qi_list_data(pargs, 4) = qi_make_table(state, statictable);
  251. return qi_call(state, qi_get(state, "__class_wrapper"), pargs);
  252. }
  253. qi_value_t *__qistd40(qi_state_t *state) {
  254. qi_list_t *supers = qi_list_make_n(1);
  255. qi_list_data(supers, 0) = qi_get(state, "Error");
  256. qi_table_t *table = qi_table_make();
  257. qi_table_t *metatable = qi_table_make();
  258. qi_table_t *statictable = qi_table_make();
  259. qi_list_t *pargs = qi_list_make_n(5);
  260. qi_list_data(pargs, 0) = qi_make_string(state, "KeyError");
  261. qi_list_data(pargs, 1) = qi_make_list(state, supers);
  262. qi_list_data(pargs, 2) = qi_make_table(state, table);
  263. qi_list_data(pargs, 3) = qi_make_table(state, metatable);
  264. qi_list_data(pargs, 4) = qi_make_table(state, statictable);
  265. return qi_call(state, qi_get(state, "__class_wrapper"), pargs);
  266. }
  267. qi_value_t *__qistd41(qi_state_t *state) {
  268. qi_list_t *supers = qi_list_make_n(1);
  269. qi_list_data(supers, 0) = qi_get(state, "Error");
  270. qi_table_t *table = qi_table_make();
  271. qi_table_t *metatable = qi_table_make();
  272. qi_table_t *statictable = qi_table_make();
  273. qi_list_t *pargs = qi_list_make_n(5);
  274. qi_list_data(pargs, 0) = qi_make_string(state, "RecursionError");
  275. qi_list_data(pargs, 1) = qi_make_list(state, supers);
  276. qi_list_data(pargs, 2) = qi_make_table(state, table);
  277. qi_list_data(pargs, 3) = qi_make_table(state, metatable);
  278. qi_list_data(pargs, 4) = qi_make_table(state, statictable);
  279. return qi_call(state, qi_get(state, "__class_wrapper"), pargs);
  280. }
  281. qi_value_t *__qistd42(qi_state_t *state) {
  282. qi_list_t *supers = qi_list_make_n(1);
  283. qi_list_data(supers, 0) = qi_get(state, "Error");
  284. qi_table_t *table = qi_table_make();
  285. qi_table_t *metatable = qi_table_make();
  286. qi_table_t *statictable = qi_table_make();
  287. qi_list_t *pargs = qi_list_make_n(5);
  288. qi_list_data(pargs, 0) = qi_make_string(state, "NameError");
  289. qi_list_data(pargs, 1) = qi_make_list(state, supers);
  290. qi_list_data(pargs, 2) = qi_make_table(state, table);
  291. qi_list_data(pargs, 3) = qi_make_table(state, metatable);
  292. qi_list_data(pargs, 4) = qi_make_table(state, statictable);
  293. return qi_call(state, qi_get(state, "__class_wrapper"), pargs);
  294. }
  295. qi_value_t *__qistd43(qi_state_t *state) {
  296. qi_list_t *supers = qi_list_make_n(1);
  297. qi_list_data(supers, 0) = qi_get(state, "Error");
  298. qi_table_t *table = qi_table_make();
  299. qi_table_t *metatable = qi_table_make();
  300. qi_table_t *statictable = qi_table_make();
  301. qi_list_t *pargs = qi_list_make_n(5);
  302. qi_list_data(pargs, 0) = qi_make_string(state, "IOError");
  303. qi_list_data(pargs, 1) = qi_make_list(state, supers);
  304. qi_list_data(pargs, 2) = qi_make_table(state, table);
  305. qi_list_data(pargs, 3) = qi_make_table(state, metatable);
  306. qi_list_data(pargs, 4) = qi_make_table(state, statictable);
  307. return qi_call(state, qi_get(state, "__class_wrapper"), pargs);
  308. }
  309. inline static qi_list_t *__qistd46(qi_state_t *state) {
  310. qi_list_t *list = qi_list_make_n(1);
  311. qi_list_data(list, 0) = qi_get(state, "a");
  312. return list;
  313. }
  314. inline static qi_list_t *__qistd47(qi_state_t *state) {
  315. qi_list_t *list = qi_list_make_n(1);
  316. qi_list_data(list, 0) = qi_get(state, "b");
  317. return list;
  318. }
  319. qi_value_t *__qistd44(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
  320. qi_decl(state, "a", qi_list_index(pargs, 0));
  321. qi_decl(state, "b", qi_list_index(pargs, 1));
  322. qi_value_t *__qistd45 = qi_equals(state, qi_call(state, qi_get(state, "type"), __qistd46(state)), qi_call(state, qi_get(state, "type"), __qistd47(state)));
  323. return __qistd45;return state->nil;
  324. }
  325. qi_value_t *__qistd48(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
  326. qi_decl(state, "l", qi_list_index(pargs, 0));
  327. qi_value_t *__qistd49 = qi_index(state, qi_get(state, "l"), qi_make_number(state, 0));
  328. return __qistd49;return state->nil;
  329. }
  330. inline static qi_list_t *__qistd52(qi_state_t *state) {
  331. qi_list_t *list = qi_list_make_n(2);
  332. qi_list_data(list, 0) = qi_get(state, "l");
  333. qi_list_data(list, 1) = qi_make_number(state, 1);
  334. return list;
  335. }
  336. qi_value_t *__qistd50(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
  337. qi_decl(state, "l", qi_list_index(pargs, 0));
  338. qi_value_t *__qistd51 = qi_call(state, qi_get(state, "slice"), __qistd52(state));
  339. return __qistd51;return state->nil;
  340. }
  341. qi_value_t *__qistd53(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
  342. qi_decl(state, "x", qi_list_index(pargs, 0));
  343. qi_decl(state, "y", qi_list_index(pargs, 1));
  344. qi_value_t *__qistd54 = (_qi_truthy(state, qi_lt(state, qi_get(state, "x"), qi_get(state, "y")))? qi_get(state, "x"): qi_get(state, "y"));
  345. return __qistd54;return state->nil;
  346. }
  347. qi_value_t *__qistd55(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
  348. qi_decl(state, "x", qi_list_index(pargs, 0));
  349. qi_decl(state, "y", qi_list_index(pargs, 1));
  350. qi_value_t *__qistd56 = (_qi_truthy(state, qi_gt(state, qi_get(state, "x"), qi_get(state, "y")))? qi_get(state, "x"): qi_get(state, "y"));
  351. return __qistd56;return state->nil;
  352. }
  353. inline static qi_list_t *__qistd58(qi_state_t *state) {
  354. qi_list_t *list = qi_list_make_n(1);
  355. qi_list_data(list, 0) = qi_get(state, "x");
  356. return list;
  357. }
  358. inline static qi_list_t *__qistd59(qi_state_t *state) {
  359. qi_list_t *list = qi_list_make_n(3);
  360. qi_list_data(list, 0) = qi_make_string(state, "list");
  361. qi_list_data(list, 1) = qi_make_string(state, "string");
  362. qi_list_data(list, 2) = qi_make_string(state, "bytes");
  363. return list;
  364. }
  365. inline static qi_list_t *__qistd61(qi_state_t *state) {
  366. qi_list_t *list = qi_list_make_n(1);
  367. qi_list_data(list, 0) = qi_get(state, "x");
  368. return list;
  369. }
  370. inline static qi_list_t *__qistd60(qi_state_t *state) {
  371. qi_list_t *list = qi_list_make_n(1);
  372. qi_list_data(list, 0) = qi_add(state, qi_make_string(state, "expected first argument to be: list, string or bytes, but got: "), qi_call(state, qi_get(state, "type"), __qistd61(state)));
  373. return list;
  374. }
  375. inline static qi_list_t *__qistd63(qi_state_t *state) {
  376. qi_list_t *list = qi_list_make_n(1);
  377. qi_list_data(list, 0) = qi_get(state, "x");
  378. return list;
  379. }
  380. inline static qi_list_t *__qistd64(qi_state_t *state) {
  381. qi_list_t *list = qi_list_make_n(2);
  382. qi_list_data(list, 0) = qi_get(state, "r");
  383. qi_list_data(list, 1) = qi_index(state, qi_get(state, "x"), qi_get(state, "i"));
  384. return list;
  385. }
  386. inline static qi_list_t *__qistd65(qi_state_t *state) {
  387. qi_list_t *list = qi_list_make_n(1);
  388. qi_list_data(list, 0) = qi_get(state, "x");
  389. return list;
  390. }
  391. inline static qi_list_t *__qistd67(qi_state_t *state) {
  392. qi_list_t *list = qi_list_make_n(1);
  393. qi_list_data(list, 0) = qi_get(state, "r");
  394. return list;
  395. }
  396. inline static qi_list_t *__qistd68(qi_state_t *state) {
  397. qi_list_t *list = qi_list_make_n(1);
  398. qi_list_data(list, 0) = qi_get(state, "x");
  399. return list;
  400. }
  401. inline static qi_list_t *__qistd70(qi_state_t *state) {
  402. qi_list_t *list = qi_list_make_n(1);
  403. qi_list_data(list, 0) = qi_get(state, "r");
  404. return list;
  405. }
  406. qi_value_t *__qistd57(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
  407. qi_decl(state, "x", qi_list_index(pargs, 0));
  408. qi_new_scope(state);
  409. if (_qi_truthy(state, qi_not_in(state, qi_call(state, qi_get(state, "type"), __qistd58(state)), qi_make_tuple(state, __qistd59(state))))) {
  410. qi_throw(state, qi_call(state, qi_get(state, "TypeError"), __qistd60(state)));}
  411. qi_old_scope(state);
  412. qi_decl(state, "r", qi_make_list(state, NULL));
  413. qi_new_scope(state);
  414. qi_decl(state, "i", qi_sub(state, qi_call(state, qi_get(state, "len"), __qistd63(state)), qi_make_number(state, 1)));
  415. while (_qi_truthy(state, qi_ge(state, qi_get(state, "i"), qi_make_number(state, 0)))) {
  416. qi_new_scope(state);
  417. (void)(qi_call(state, qi_get(state, "list_push"), __qistd64(state)));__continue62:;
  418. qi_set(state, false, "i", qi_sub(state, qi_get(state, "i"), state->one));
  419. qi_old_scope(state);
  420. }
  421. goto __exit62;
  422. __break62:;
  423. qi_old_scope(state);
  424. __exit62:;
  425. qi_old_scope(state);
  426. qi_new_scope(state);
  427. if (_qi_truthy(state, qi_equals(state, qi_call(state, qi_get(state, "type"), __qistd65(state)), qi_make_string(state, "string")))) {
  428. qi_value_t *__qistd66 = qi_call(state, qi_get(state, "list_join"), __qistd67(state));
  429. qi_old_scope(state);
  430. return __qistd66;} else {
  431. qi_new_scope(state);
  432. if (_qi_truthy(state, qi_equals(state, qi_call(state, qi_get(state, "type"), __qistd68(state)), qi_make_string(state, "bytes")))) {
  433. qi_value_t *__qistd69 = qi_call(state, qi_get(state, "bytes"), __qistd70(state));
  434. qi_old_scope(state);
  435. qi_old_scope(state);
  436. return __qistd69;}
  437. qi_old_scope(state);
  438. }
  439. qi_old_scope(state);
  440. qi_value_t *__qistd71 = qi_get(state, "r");
  441. return __qistd71;
  442. return state->nil;
  443. }
  444. inline static qi_list_t *__qistd73(qi_state_t *state) {
  445. qi_list_t *list = qi_list_make_n(1);
  446. qi_list_data(list, 0) = qi_get(state, "arguments");
  447. return list;
  448. }
  449. inline static qi_list_t *__qistd74(qi_state_t *state) {
  450. qi_list_t *list = qi_list_make_n(1);
  451. qi_list_data(list, 0) = qi_get(state, "arguments");
  452. return list;
  453. }
  454. inline static qi_list_t *__qistd75(qi_state_t *state) {
  455. qi_list_t *list = qi_list_make_n(1);
  456. qi_list_data(list, 0) = qi_get(state, "f");
  457. return list;
  458. }
  459. inline static qi_list_t *__qistd77(qi_state_t *state) {
  460. qi_list_t *list = qi_list_make_n(1);
  461. qi_list_data(list, 0) = qi_get(state, "f");
  462. return list;
  463. }
  464. inline static qi_list_t *__qistd76(qi_state_t *state) {
  465. qi_list_t *list = qi_list_make_n(1);
  466. qi_list_data(list, 0) = qi_add(state, qi_make_string(state, "expected first argument to be: number, but got: "), qi_call(state, qi_get(state, "type"), __qistd77(state)));
  467. return list;
  468. }
  469. inline static qi_list_t *__qistd78(qi_state_t *state) {
  470. qi_list_t *list = qi_list_make_n(1);
  471. qi_list_data(list, 0) = qi_get(state, "t");
  472. return list;
  473. }
  474. inline static qi_list_t *__qistd80(qi_state_t *state) {
  475. qi_list_t *list = qi_list_make_n(1);
  476. qi_list_data(list, 0) = qi_get(state, "t");
  477. return list;
  478. }
  479. inline static qi_list_t *__qistd79(qi_state_t *state) {
  480. qi_list_t *list = qi_list_make_n(1);
  481. qi_list_data(list, 0) = qi_add(state, qi_make_string(state, "expected second argument to be: number, but got: "), qi_call(state, qi_get(state, "type"), __qistd80(state)));
  482. return list;
  483. }
  484. inline static qi_list_t *__qistd81(qi_state_t *state) {
  485. qi_list_t *list = qi_list_make_n(1);
  486. qi_list_data(list, 0) = qi_get(state, "s");
  487. return list;
  488. }
  489. inline static qi_list_t *__qistd83(qi_state_t *state) {
  490. qi_list_t *list = qi_list_make_n(1);
  491. qi_list_data(list, 0) = qi_get(state, "s");
  492. return list;
  493. }
  494. inline static qi_list_t *__qistd82(qi_state_t *state) {
  495. qi_list_t *list = qi_list_make_n(1);
  496. qi_list_data(list, 0) = qi_add(state, qi_make_string(state, "expected third argument to be: number, but got: "), qi_call(state, qi_get(state, "type"), __qistd83(state)));
  497. return list;
  498. }
  499. inline static qi_list_t *__qistd86(qi_state_t *state) {
  500. qi_list_t *list = qi_list_make_n(3);
  501. qi_list_data(list, 0) = qi_get(state, "t");
  502. qi_list_data(list, 1) = qi_get(state, "f");
  503. qi_list_data(list, 2) = qi_get(state, "s");
  504. return list;
  505. }
  506. inline static qi_list_t *__qistd85(qi_state_t *state) {
  507. qi_list_t *list = qi_list_make_n(1);
  508. qi_list_data(list, 0) = qi_call(state, qi_get(state, "range"), __qistd86(state));
  509. return list;
  510. }
  511. inline static qi_list_t *__qistd88(qi_state_t *state) {
  512. qi_list_t *list = qi_list_make_n(2);
  513. qi_list_data(list, 0) = qi_get(state, "r");
  514. qi_list_data(list, 1) = qi_get(state, "i");
  515. return list;
  516. }
  517. qi_value_t *__qistd72(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
  518. qi_decl(state, "f", qi_list_index(pargs, 0));
  519. qi_decl(state, "s", state->nil);
  520. qi_decl(state, "t", state->nil);
  521. qi_new_scope(state);
  522. if (_qi_truthy(state, qi_ge(state, qi_call(state, qi_get(state, "len"), __qistd73(state)), qi_make_number(state, 3)))) {
  523. (void)(qi_set(state, false, "t", qi_index(state, qi_get(state, "arguments"), qi_make_number(state, 1))));
  524. (void)(qi_set(state, false, "s", qi_index(state, qi_get(state, "arguments"), qi_make_number(state, 2))));
  525. } else {
  526. qi_new_scope(state);
  527. if (_qi_truthy(state, qi_ge(state, qi_call(state, qi_get(state, "len"), __qistd74(state)), qi_make_number(state, 2)))) {
  528. (void)(qi_set(state, false, "t", qi_index(state, qi_get(state, "arguments"), qi_make_number(state, 1))));
  529. (void)(qi_set(state, false, "s", qi_make_number(state, 1)));
  530. } else {
  531. (void)(qi_set(state, false, "t", qi_get(state, "f")));
  532. (void)(qi_set(state, false, "f", qi_make_number(state, 0)));
  533. (void)(qi_set(state, false, "s", qi_make_number(state, 1)));
  534. }
  535. qi_old_scope(state);
  536. }
  537. qi_old_scope(state);
  538. qi_new_scope(state);
  539. if (_qi_truthy(state, qi_not_equals(state, qi_call(state, qi_get(state, "type"), __qistd75(state)), qi_make_string(state, "number")))) {
  540. qi_throw(state, qi_call(state, qi_get(state, "TypeError"), __qistd76(state)));}
  541. qi_old_scope(state);
  542. qi_new_scope(state);
  543. if (_qi_truthy(state, qi_not_equals(state, qi_call(state, qi_get(state, "type"), __qistd78(state)), qi_make_string(state, "number")))) {
  544. qi_throw(state, qi_call(state, qi_get(state, "TypeError"), __qistd79(state)));}
  545. qi_old_scope(state);
  546. qi_new_scope(state);
  547. if (_qi_truthy(state, qi_not_equals(state, qi_call(state, qi_get(state, "type"), __qistd81(state)), qi_make_string(state, "number")))) {
  548. qi_throw(state, qi_call(state, qi_get(state, "TypeError"), __qistd82(state)));}
  549. qi_old_scope(state);
  550. qi_new_scope(state);
  551. if (_qi_truthy(state, qi_gt(state, qi_get(state, "f"), qi_get(state, "t")))) {
  552. qi_value_t *__qistd84 = qi_call(state, qi_get(state, "reverse"), __qistd85(state));
  553. qi_old_scope(state);
  554. return __qistd84;}
  555. qi_old_scope(state);
  556. qi_decl(state, "r", qi_make_list(state, NULL));
  557. qi_new_scope(state);
  558. qi_decl(state, "i", qi_get(state, "f"));
  559. while (_qi_truthy(state, qi_lt(state, qi_get(state, "i"), qi_get(state, "t")))) {
  560. qi_new_scope(state);
  561. (void)(qi_call(state, qi_get(state, "list_push"), __qistd88(state)));__continue87:;
  562. qi_set(state, false, "i", qi_add(state, qi_get(state, "i"), qi_get(state, "s")));
  563. qi_old_scope(state);
  564. }
  565. goto __exit87;
  566. __break87:;
  567. qi_old_scope(state);
  568. __exit87:;
  569. qi_old_scope(state);
  570. qi_value_t *__qistd89 = qi_get(state, "r");
  571. return __qistd89;
  572. return state->nil;
  573. }
  574. qi_value_t *__qistd90(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
  575. qi_decl(state, "file", qi_list_index(pargs, 0));
  576. qi_value_t *__qistd91 = qi_call(state, qi_index(state, qi_get(state, "file"), qi_make_string(state, "rewind")), NULL);
  577. return __qistd91;return state->nil;
  578. }
  579. inline static qi_list_t *__qistd95(qi_state_t *state) {
  580. qi_list_t *list = qi_list_make_n(2);
  581. qi_list_data(list, 0) = qi_get(state, "STDIN");
  582. qi_list_data(list, 1) = qi_negate(state, qi_make_number(state, 1));
  583. return list;
  584. }
  585. inline static qi_list_t *__qistd94(qi_state_t *state) {
  586. qi_list_t *list = qi_list_make_n(1);
  587. qi_list_data(list, 0) = qi_call(state, qi_get(state, "fread"), __qistd95(state));
  588. return list;
  589. }
  590. qi_value_t *__qistd92(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
  591. qi_value_t *__qistd93 = qi_call(state, qi_get(state, "str"), __qistd94(state));
  592. return __qistd93;
  593. return state->nil;
  594. }
  595. inline static qi_list_t *__qistd97(qi_state_t *state) {
  596. qi_list_t *list = qi_list_make_n(2);
  597. qi_list_data(list, 0) = qi_get(state, "filename");
  598. qi_list_data(list, 1) = qi_make_string(state, "r");
  599. return list;
  600. }
  601. inline static qi_list_t *__qistd99(qi_state_t *state) {
  602. qi_list_t *list = qi_list_make_n(1);
  603. qi_list_data(list, 0) = qi_get(state, "file");
  604. return list;
  605. }
  606. void __qistd98(qi_state_t *state) {
  607. (void)(qi_call(state, qi_get(state, "fclose"), __qistd99(state)));
  608. }
  609. inline static qi_list_t *__qistd102(qi_state_t *state) {
  610. qi_list_t *list = qi_list_make_n(2);
  611. qi_list_data(list, 0) = qi_get(state, "file");
  612. qi_list_data(list, 1) = qi_negate(state, qi_make_number(state, 1));
  613. return list;
  614. }
  615. inline static qi_list_t *__qistd101(qi_state_t *state) {
  616. qi_list_t *list = qi_list_make_n(1);
  617. qi_list_data(list, 0) = qi_call(state, qi_get(state, "fread"), __qistd102(state));
  618. return list;
  619. }
  620. qi_value_t *__qistd96(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
  621. qi_decl(state, "filename", qi_list_index(pargs, 0));
  622. qi_decl_const(state, "file", qi_call(state, qi_get(state, "fopen"), __qistd97(state)));
  623. qi_add_defer(state, -1, __qistd98);
  624. qi_value_t *__qistd100 = qi_call(state, qi_get(state, "str"), __qistd101(state));
  625. return __qistd100;
  626. return state->nil;
  627. }
  628. inline static qi_list_t *__qistd104(qi_state_t *state) {
  629. qi_list_t *list = qi_list_make_n(2);
  630. qi_list_data(list, 0) = qi_get(state, "filename");
  631. qi_list_data(list, 1) = qi_make_string(state, "w");
  632. return list;
  633. }
  634. inline static qi_list_t *__qistd106(qi_state_t *state) {
  635. qi_list_t *list = qi_list_make_n(1);
  636. qi_list_data(list, 0) = qi_get(state, "file");
  637. return list;
  638. }
  639. void __qistd105(qi_state_t *state) {
  640. (void)(qi_call(state, qi_get(state, "fclose"), __qistd106(state)));
  641. }
  642. inline static qi_list_t *__qistd108(qi_state_t *state) {
  643. qi_list_t *list = qi_list_make_n(1);
  644. qi_list_data(list, 0) = qi_get(state, "data");
  645. return list;
  646. }
  647. inline static qi_list_t *__qistd107(qi_state_t *state) {
  648. qi_list_t *list = qi_list_make_n(2);
  649. qi_list_data(list, 0) = qi_get(state, "file");
  650. qi_list_data(list, 1) = qi_call(state, qi_get(state, "bytes"), __qistd108(state));
  651. return list;
  652. }
  653. qi_value_t *__qistd103(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
  654. qi_decl(state, "filename", qi_list_index(pargs, 0));
  655. qi_decl(state, "data", qi_list_index(pargs, 1));
  656. qi_decl_const(state, "file", qi_call(state, qi_get(state, "fopen"), __qistd104(state)));
  657. qi_add_defer(state, -1, __qistd105);
  658. (void)(qi_call(state, qi_get(state, "fwrite"), __qistd107(state)));
  659. return state->nil;
  660. }
  661. inline static qi_list_t *__qistd110(qi_state_t *state) {
  662. qi_list_t *list = qi_list_make_n(1);
  663. qi_list_data(list, 0) = qi_get(state, "name");
  664. return list;
  665. }
  666. inline static qi_list_t *__qistd112(qi_state_t *state) {
  667. qi_list_t *list = qi_list_make_n(1);
  668. qi_list_data(list, 0) = qi_get(state, "name");
  669. return list;
  670. }
  671. inline static qi_list_t *__qistd111(qi_state_t *state) {
  672. qi_list_t *list = qi_list_make_n(1);
  673. qi_list_data(list, 0) = qi_add(state, qi_make_string(state, "expected first argument to be: string, but got: "), qi_call(state, qi_get(state, "type"), __qistd112(state)));
  674. return list;
  675. }
  676. qi_value_t *__qistd109(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
  677. qi_decl(state, "name", qi_list_index(pargs, 0));
  678. qi_new_scope(state);
  679. if (_qi_truthy(state, qi_not_equals(state, qi_call(state, qi_get(state, "type"), __qistd110(state)), qi_make_string(state, "string")))) {
  680. qi_throw(state, qi_call(state, qi_get(state, "TypeError"), __qistd111(state)));}
  681. qi_old_scope(state);
  682. qi_bool b = qi_find(state, qi_get(state, "name")->value.string) != NULL;
  683. return qi_make_boolean(state, b);
  684. return state->nil;
  685. }
  686. qi_value_t *__qistd113(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
  687. qi_decl(state, "a", qi_list_index(pargs, 0));
  688. return qi_make_boolean(state, qi_get(state, "a")->type == QI_TABLE);
  689. return state->nil;
  690. }
  691. inline static qi_list_t *__qistd116(qi_state_t *state) {
  692. qi_list_t *list = qi_list_make_n(1);
  693. qi_list_data(list, 0) = qi_get(state, "l");
  694. return list;
  695. }
  696. inline static qi_list_t *__qistd118(qi_state_t *state) {
  697. qi_list_t *list = qi_list_make_n(1);
  698. qi_list_data(list, 0) = qi_get(state, "l");
  699. return list;
  700. }
  701. inline static qi_list_t *__qistd117(qi_state_t *state) {
  702. qi_list_t *list = qi_list_make_n(1);
  703. qi_list_data(list, 0) = qi_add(state, qi_make_string(state, "expected first argument to be: list, but got: "), qi_call(state, qi_get(state, "type"), __qistd118(state)));
  704. return list;
  705. }
  706. inline static qi_list_t *__qistd120(qi_state_t *state) {
  707. qi_list_t *list = qi_list_make_n(1);
  708. qi_list_data(list, 0) = qi_get(state, "l");
  709. return list;
  710. }
  711. inline static qi_list_t *__qistd121(qi_state_t *state) {
  712. qi_list_t *list = qi_list_make_n(2);
  713. qi_list_data(list, 0) = qi_get(state, "l");
  714. qi_list_data(list, 1) = qi_get(state, "i");
  715. return list;
  716. }
  717. qi_value_t *__qistd114(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
  718. qi_decl(state, "first", pargc >= 3? qi_list_index(pargs, 2): state->_false);
  719. qi_decl(state, "l", qi_list_index(pargs, 0));
  720. qi_decl(state, "x", qi_list_index(pargs, 1));
  721. qi_new_scope(state);
  722. if (_qi_truthy(state, qi_not_equals(state, qi_call(state, qi_get(state, "type"), __qistd116(state)), qi_make_string(state, "list")))) {
  723. qi_throw(state, qi_call(state, qi_get(state, "TypeError"), __qistd117(state)));}
  724. qi_old_scope(state);
  725. __label115:;
  726. qi_new_scope(state);
  727. qi_decl(state, "i", qi_make_number(state, 0));
  728. while (_qi_truthy(state, qi_lt(state, qi_get(state, "i"), qi_call(state, qi_get(state, "len"), __qistd120(state))))) {
  729. qi_new_scope(state);
  730. qi_new_scope(state);
  731. if (_qi_truthy(state, qi_equals(state, qi_index(state, qi_get(state, "l"), qi_get(state, "i")), qi_get(state, "x")))) {
  732. (void)(qi_call(state, qi_get(state, "list_delete"), __qistd121(state)));
  733. qi_new_scope(state);
  734. if (_qi_truthy(state, qi_get(state, "first"))) {
  735. qi_old_scope(state);
  736. qi_old_scope(state);
  737. goto __break119;}
  738. qi_old_scope(state);
  739. qi_old_scope(state);
  740. qi_old_scope(state);
  741. qi_old_scope(state);
  742. goto __label115;
  743. }
  744. qi_old_scope(state);
  745. __continue119:;
  746. qi_set(state, false, "i", qi_add(state, qi_get(state, "i"), state->one));
  747. qi_old_scope(state);
  748. }
  749. goto __exit119;
  750. __break119:;
  751. qi_old_scope(state);
  752. __exit119:;
  753. qi_old_scope(state);
  754. return state->nil;
  755. }
  756. inline static qi_list_t *__qistd123(qi_state_t *state) {
  757. qi_list_t *list = qi_list_make_n(1);
  758. qi_list_data(list, 0) = qi_get(state, "l");
  759. return list;
  760. }
  761. inline static qi_list_t *__qistd125(qi_state_t *state) {
  762. qi_list_t *list = qi_list_make_n(1);
  763. qi_list_data(list, 0) = qi_get(state, "l");
  764. return list;
  765. }
  766. inline static qi_list_t *__qistd124(qi_state_t *state) {
  767. qi_list_t *list = qi_list_make_n(1);
  768. qi_list_data(list, 0) = qi_add(state, qi_make_string(state, "expected first argumient to be: list, but got: "), qi_call(state, qi_get(state, "type"), __qistd125(state)));
  769. return list;
  770. }
  771. inline static qi_list_t *__qistd126(qi_state_t *state) {
  772. qi_list_t *list = qi_list_make_n(1);
  773. qi_list_data(list, 0) = qi_get(state, "arguments");
  774. return list;
  775. }
  776. inline static qi_list_t *__qistd127(qi_state_t *state) {
  777. qi_list_t *list = qi_list_make_n(1);
  778. qi_list_data(list, 0) = qi_get(state, "s");
  779. return list;
  780. }
  781. inline static qi_list_t *__qistd129(qi_state_t *state) {
  782. qi_list_t *list = qi_list_make_n(1);
  783. qi_list_data(list, 0) = qi_get(state, "s");
  784. return list;
  785. }
  786. inline static qi_list_t *__qistd128(qi_state_t *state) {
  787. qi_list_t *list = qi_list_make_n(1);
  788. qi_list_data(list, 0) = qi_add(state, qi_make_string(state, "expected second argument to be: string, but got: "), qi_call(state, qi_get(state, "type"), __qistd129(state)));
  789. return list;
  790. }
  791. inline static qi_list_t *__qistd132(qi_state_t *state) {
  792. qi_list_t *list = qi_list_make_n(1);
  793. qi_list_data(list, 0) = qi_get(state, "x");
  794. return list;
  795. }
  796. inline static qi_list_t *__qistd134(qi_state_t *state) {
  797. qi_list_t *list = qi_list_make_n(1);
  798. qi_list_data(list, 0) = qi_get(state, "x");
  799. return list;
  800. }
  801. inline static qi_list_t *__qistd133(qi_state_t *state) {
  802. qi_list_t *list = qi_list_make_n(1);
  803. qi_list_data(list, 0) = qi_add(state, qi_make_string(state, "expected sequence item to be: string, but got: "), qi_call(state, qi_get(state, "type"), __qistd134(state)));
  804. return list;
  805. }
  806. qi_value_t *__qistd122(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
  807. qi_decl(state, "l", qi_list_index(pargs, 0));
  808. qi_new_scope(state);
  809. if (_qi_truthy(state, qi_not_equals(state, qi_call(state, qi_get(state, "type"), __qistd123(state)), qi_make_string(state, "list")))) {
  810. qi_throw(state, qi_call(state, qi_get(state, "TypeError"), __qistd124(state)));}
  811. qi_old_scope(state);
  812. qi_decl(state, "r", state->empty_string);
  813. qi_decl(state, "s", state->nil);
  814. qi_new_scope(state);
  815. if (_qi_truthy(state, qi_equals(state, qi_call(state, qi_get(state, "len"), __qistd126(state)), qi_make_number(state, 1)))) {
  816. (void)(qi_set(state, false, "s", state->empty_string));} else {
  817. (void)(qi_set(state, false, "s", qi_index(state, qi_get(state, "arguments"), qi_make_number(state, 1))));}
  818. qi_old_scope(state);
  819. qi_new_scope(state);
  820. if (_qi_truthy(state, qi_not_equals(state, qi_call(state, qi_get(state, "type"), __qistd127(state)), qi_make_string(state, "string")))) {
  821. qi_throw(state, qi_call(state, qi_get(state, "TypeError"), __qistd128(state)));}
  822. qi_old_scope(state);
  823. qi_decl(state, "first", state->_true);
  824. qi_new_scope(state);
  825. qi_value_t *__qistd131 = qi_iter(state, qi_get(state, "l"));
  826. qi_decl(state, "x", state->nil);
  827. while (!qi_iter_end(state, __qistd131)) {
  828. qi_value_t *el = qi_iter_next(state, __qistd131);
  829. qi_set(state, false, "x", el);
  830. qi_new_scope(state);
  831. qi_new_scope(state);
  832. if (_qi_truthy(state, qi_not_equals(state, qi_call(state, qi_get(state, "type"), __qistd132(state)), qi_make_string(state, "string")))) {
  833. qi_throw(state, qi_call(state, qi_get(state, "TypeError"), __qistd133(state)));}
  834. qi_old_scope(state);
  835. qi_new_scope(state);
  836. if (_qi_truthy(state, qi_and(state, qi_not_equals(state, qi_get(state, "s"), state->empty_string), qi_not(state, qi_get(state, "first"))))) {
  837. (void)(qi_set(state, false, "r", qi_add(state, qi_get(state, "r"), qi_get(state, "s"))));}
  838. qi_old_scope(state);
  839. (void)(qi_set(state, false, "r", qi_add(state, qi_get(state, "r"), qi_get(state, "x"))));
  840. (void)(qi_set(state, false, "first", state->_false));
  841. __continue130:;
  842. qi_old_scope(state);
  843. }
  844. goto __exit130;
  845. __break130:;
  846. qi_old_scope(state);
  847. __exit130:;
  848. qi_old_scope(state);
  849. qi_value_t *__qistd135 = qi_get(state, "r");
  850. return __qistd135;
  851. return state->nil;
  852. }
  853. inline static qi_list_t *__qistd137(qi_state_t *state) {
  854. qi_list_t *list = qi_list_make_n(1);
  855. qi_list_data(list, 0) = qi_get(state, "l");
  856. return list;
  857. }
  858. inline static qi_list_t *__qistd139(qi_state_t *state) {
  859. qi_list_t *list = qi_list_make_n(1);
  860. qi_list_data(list, 0) = qi_get(state, "l");
  861. return list;
  862. }
  863. inline static qi_list_t *__qistd138(qi_state_t *state) {
  864. qi_list_t *list = qi_list_make_n(1);
  865. qi_list_data(list, 0) = qi_add(state, qi_make_string(state, "expected first argument to be: list, but got: "), qi_call(state, qi_get(state, "type"), __qistd139(state)));
  866. return list;
  867. }
  868. inline static qi_list_t *__qistd140(qi_state_t *state) {
  869. qi_list_t *list = qi_list_make_n(1);
  870. qi_list_data(list, 0) = qi_get(state, "i");
  871. return list;
  872. }
  873. inline static qi_list_t *__qistd142(qi_state_t *state) {
  874. qi_list_t *list = qi_list_make_n(1);
  875. qi_list_data(list, 0) = qi_get(state, "i");
  876. return list;
  877. }
  878. inline static qi_list_t *__qistd141(qi_state_t *state) {
  879. qi_list_t *list = qi_list_make_n(1);
  880. qi_list_data(list, 0) = qi_add(state, qi_make_string(state, "expected second argument to be: number, but got: "), qi_call(state, qi_get(state, "type"), __qistd142(state)));
  881. return list;
  882. }
  883. inline static qi_list_t *__qistd143(qi_state_t *state) {
  884. qi_list_t *list = qi_list_make_n(2);
  885. qi_list_data(list, 0) = qi_get(state, "l");
  886. qi_list_data(list, 1) = qi_get(state, "i");
  887. return list;
  888. }
  889. qi_value_t *__qistd136(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
  890. qi_decl(state, "i", qi_list_index(pargs, 1));
  891. qi_decl(state, "l", qi_list_index(pargs, 0));
  892. qi_new_scope(state);
  893. if (_qi_truthy(state, qi_not_equals(state, qi_call(state, qi_get(state, "type"), __qistd137(state)), qi_make_string(state, "list")))) {
  894. qi_throw(state, qi_call(state, qi_get(state, "TypeError"), __qistd138(state)));}
  895. qi_old_scope(state);
  896. qi_new_scope(state);
  897. if (_qi_truthy(state, qi_not_equals(state, qi_call(state, qi_get(state, "type"), __qistd140(state)), qi_make_string(state, "number")))) {
  898. qi_throw(state, qi_call(state, qi_get(state, "TypeError"), __qistd141(state)));}
  899. qi_old_scope(state);
  900. qi_decl(state, "x", qi_index(state, qi_get(state, "l"), qi_get(state, "i")));
  901. (void)(qi_call(state, qi_get(state, "list_delete"), __qistd143(state)));
  902. qi_value_t *__qistd144 = qi_get(state, "x");
  903. return __qistd144;
  904. return state->nil;
  905. }
  906. qi_value_t *__qistd145(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
  907. qi_decl(state, "x", qi_list_index(pargs, 0));
  908. qi_decl(state, "y", qi_list_index(pargs, 1));
  909. qi_value_t *__qistd146 = (_qi_truthy(state, qi_gt(state, qi_get(state, "x"), qi_get(state, "y")))? qi_make_number(state, 1): (_qi_truthy(state, qi_lt(state, qi_get(state, "x"), qi_get(state, "y")))? qi_negate(state, qi_make_number(state, 1)): qi_make_number(state, 0)));
  910. return __qistd146;return state->nil;
  911. }
  912. inline static qi_list_t *__qistd148(qi_state_t *state) {
  913. qi_list_t *list = qi_list_make_n(1);
  914. qi_list_data(list, 0) = qi_get(state, "l");
  915. return list;
  916. }
  917. inline static qi_list_t *__qistd150(qi_state_t *state) {
  918. qi_list_t *list = qi_list_make_n(1);
  919. qi_list_data(list, 0) = qi_get(state, "l");
  920. return list;
  921. }
  922. inline static qi_list_t *__qistd149(qi_state_t *state) {
  923. qi_list_t *list = qi_list_make_n(1);
  924. qi_list_data(list, 0) = qi_add(state, qi_make_string(state, "expected first argument to be: list, but got: "), qi_call(state, qi_get(state, "type"), __qistd150(state)));
  925. return list;
  926. }
  927. inline static qi_list_t *__qistd151(qi_state_t *state) {
  928. qi_list_t *list = qi_list_make_n(1);
  929. qi_list_data(list, 0) = qi_get(state, "cmp");
  930. return list;
  931. }
  932. inline static qi_list_t *__qistd153(qi_state_t *state) {
  933. qi_list_t *list = qi_list_make_n(1);
  934. qi_list_data(list, 0) = qi_get(state, "cmp");
  935. return list;
  936. }
  937. inline static qi_list_t *__qistd152(qi_state_t *state) {
  938. qi_list_t *list = qi_list_make_n(1);
  939. qi_list_data(list, 0) = qi_add(state, qi_make_string(state, "expected second argument to be: function, but got: "), qi_call(state, qi_get(state, "type"), __qistd153(state)));
  940. return list;
  941. }
  942. inline static qi_list_t *__qistd154(qi_state_t *state) {
  943. qi_list_t *list = qi_list_make_n(1);
  944. qi_list_data(list, 0) = qi_get(state, "l");
  945. return list;
  946. }
  947. inline static qi_list_t *__qistd156(qi_state_t *state) {
  948. qi_list_t *list = qi_list_make_n(1);
  949. qi_list_data(list, 0) = qi_get(state, "l");
  950. return list;
  951. }
  952. inline static qi_list_t *__qistd159(qi_state_t *state) {
  953. qi_list_t *list = qi_list_make_n(2);
  954. qi_list_data(list, 0) = qi_index(state, qi_get(state, "l"), qi_get(state, "j"));
  955. qi_list_data(list, 1) = qi_index(state, qi_get(state, "l"), qi_add(state, qi_get(state, "j"), qi_make_number(state, 1)));
  956. return list;
  957. }
  958. qi_value_t *__qistd147(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
  959. qi_decl(state, "cmp", pargc >= 2? qi_list_index(pargs, 1): qi_get(state, "__cmp"));
  960. qi_decl(state, "l", qi_list_index(pargs, 0));
  961. qi_new_scope(state);
  962. if (_qi_truthy(state, qi_not_equals(state, qi_call(state, qi_get(state, "type"), __qistd148(state)), qi_make_string(state, "list")))) {
  963. qi_throw(state, qi_call(state, qi_get(state, "TypeError"), __qistd149(state)));}
  964. qi_old_scope(state);
  965. qi_new_scope(state);
  966. if (_qi_truthy(state, qi_not_equals(state, qi_call(state, qi_get(state, "type"), __qistd151(state)), qi_make_string(state, "function")))) {
  967. qi_throw(state, qi_call(state, qi_get(state, "TypeError"), __qistd152(state)));}
  968. qi_old_scope(state);
  969. qi_new_scope(state);
  970. if (_qi_truthy(state, qi_equals(state, qi_call(state, qi_get(state, "len"), __qistd154(state)), qi_make_number(state, 0)))) {
  971. qi_value_t *__qistd155 = qi_get(state, "l");
  972. qi_old_scope(state);
  973. return __qistd155;}
  974. qi_old_scope(state);
  975. qi_decl(state, "z", qi_call(state, qi_get(state, "len"), __qistd156(state)));
  976. qi_new_scope(state);
  977. qi_decl(state, "i", qi_make_number(state, 0));
  978. while (_qi_truthy(state, qi_lt(state, qi_get(state, "i"), qi_sub(state, qi_get(state, "z"), qi_make_number(state, 1))))) {
  979. qi_new_scope(state);
  980. qi_new_scope(state);
  981. qi_decl(state, "j", qi_make_number(state, 0));
  982. while (_qi_truthy(state, qi_lt(state, qi_get(state, "j"), qi_sub(state, qi_sub(state, qi_get(state, "z"), qi_make_number(state, 1)), qi_get(state, "i"))))) {
  983. qi_new_scope(state);
  984. qi_new_scope(state);
  985. if (_qi_truthy(state, qi_gt(state, qi_call(state, qi_get(state, "cmp"), __qistd159(state)), qi_make_number(state, 0)))) {
  986. qi_decl_const(state, "tmp", qi_index(state, qi_get(state, "l"), qi_get(state, "j")));
  987. (void)(qi_index_set(state, false, qi_get(state, "l"), qi_get(state, "j"), qi_index(state, qi_get(state, "l"), qi_add(state, qi_get(state, "j"), qi_make_number(state, 1)))));
  988. (void)(qi_index_set(state, false, qi_get(state, "l"), qi_add(state, qi_get(state, "j"), qi_make_number(state, 1)), qi_get(state, "tmp")));
  989. }
  990. qi_old_scope(state);
  991. __continue158:;
  992. qi_set(state, false, "j", qi_add(state, qi_get(state, "j"), state->one));
  993. qi_old_scope(state);
  994. }
  995. goto __exit158;
  996. __break158:;
  997. qi_old_scope(state);
  998. __exit158:;
  999. qi_old_scope(state);
  1000. __continue157:;
  1001. qi_set(state, false, "i", qi_add(state, qi_get(state, "i"), state->one));
  1002. qi_old_scope(state);
  1003. }
  1004. goto __exit157;
  1005. __break157:;
  1006. qi_old_scope(state);
  1007. __exit157:;
  1008. qi_old_scope(state);
  1009. qi_value_t *__qistd160 = qi_get(state, "l");
  1010. return __qistd160;
  1011. return state->nil;
  1012. }
  1013. inline static qi_list_t *__qistd162(qi_state_t *state) {
  1014. qi_list_t *list = qi_list_make_n(1);
  1015. qi_list_data(list, 0) = qi_get(state, "l");
  1016. return list;
  1017. }
  1018. inline static qi_list_t *__qistd164(qi_state_t *state) {
  1019. qi_list_t *list = qi_list_make_n(2);
  1020. qi_list_data(list, 0) = qi_get(state, "l");
  1021. qi_list_data(list, 1) = qi_get(state, "cmp");
  1022. return list;
  1023. }
  1024. qi_value_t *__qistd161(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
  1025. qi_decl(state, "cmp", pargc >= 2? qi_list_index(pargs, 1): qi_get(state, "__cmp"));
  1026. qi_decl(state, "l", qi_list_index(pargs, 0));
  1027. (void)(qi_set(state, false, "l", qi_call(state, qi_get(state, "list_copy"), __qistd162(state))));
  1028. qi_value_t *__qistd163 = qi_call(state, qi_get(state, "list_sort"), __qistd164(state));
  1029. return __qistd163;
  1030. return state->nil;
  1031. }
  1032. inline static qi_list_t *__qistd166(qi_state_t *state) {
  1033. qi_list_t *list = qi_list_make_n(1);
  1034. qi_list_data(list, 0) = qi_get(state, "l");
  1035. return list;
  1036. }
  1037. inline static qi_list_t *__qistd168(qi_state_t *state) {
  1038. qi_list_t *list = qi_list_make_n(1);
  1039. qi_list_data(list, 0) = qi_get(state, "l");
  1040. return list;
  1041. }
  1042. inline static qi_list_t *__qistd167(qi_state_t *state) {
  1043. qi_list_t *list = qi_list_make_n(1);
  1044. qi_list_data(list, 0) = qi_add(state, qi_make_string(state, "expected first argument to be: list, but got: "), qi_call(state, qi_get(state, "type"), __qistd168(state)));
  1045. return list;
  1046. }
  1047. inline static qi_list_t *__qistd169(qi_state_t *state) {
  1048. qi_list_t *list = qi_list_make_n(1);
  1049. qi_list_data(list, 0) = qi_get(state, "l");
  1050. return list;
  1051. }
  1052. inline static qi_list_t *__qistd170(qi_state_t *state) {
  1053. qi_list_t *list = qi_list_make_n(1);
  1054. qi_list_data(list, 0) = qi_make_string(state, "shift from empty list");
  1055. return list;
  1056. }
  1057. inline static qi_list_t *__qistd171(qi_state_t *state) {
  1058. qi_list_t *list = qi_list_make_n(2);
  1059. qi_list_data(list, 0) = qi_get(state, "l");
  1060. qi_list_data(list, 1) = qi_make_number(state, 0);
  1061. return list;
  1062. }
  1063. qi_value_t *__qistd165(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
  1064. qi_decl(state, "l", qi_list_index(pargs, 0));
  1065. qi_new_scope(state);
  1066. if (_qi_truthy(state, qi_not_equals(state, qi_call(state, qi_get(state, "type"), __qistd166(state)), qi_make_string(state, "list")))) {
  1067. qi_throw(state, qi_call(state, qi_get(state, "TypeError"), __qistd167(state)));}
  1068. qi_old_scope(state);
  1069. qi_new_scope(state);
  1070. if (_qi_truthy(state, qi_call(state, qi_get(state, "is_empty"), __qistd169(state)))) {
  1071. qi_throw(state, qi_call(state, qi_get(state, "IndexError"), __qistd170(state)));}
  1072. qi_old_scope(state);
  1073. qi_decl(state, "a", qi_index(state, qi_get(state, "l"), qi_make_number(state, 0)));
  1074. (void)(qi_call(state, qi_get(state, "list_delete"), __qistd171(state)));
  1075. qi_value_t *__qistd172 = qi_get(state, "a");
  1076. return __qistd172;
  1077. return state->nil;
  1078. }
  1079. inline static qi_list_t *__qistd174(qi_state_t *state) {
  1080. qi_list_t *list = qi_list_make_n(3);
  1081. qi_list_data(list, 0) = qi_get(state, "l");
  1082. qi_list_data(list, 1) = qi_make_number(state, 0);
  1083. qi_list_data(list, 2) = qi_get(state, "x");
  1084. return list;
  1085. }
  1086. qi_value_t *__qistd173(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
  1087. qi_decl(state, "l", qi_list_index(pargs, 0));
  1088. qi_decl(state, "x", qi_list_index(pargs, 1));
  1089. (void)(qi_call(state, qi_get(state, "list_insert"), __qistd174(state)));
  1090. return state->nil;
  1091. }
  1092. inline static qi_list_t *__qistd176(qi_state_t *state) {
  1093. qi_list_t *list = qi_list_make_n(1);
  1094. qi_list_data(list, 0) = qi_get(state, "l");
  1095. return list;
  1096. }
  1097. inline static qi_list_t *__qistd177(qi_state_t *state) {
  1098. qi_list_t *list = qi_list_make_n(4);
  1099. qi_list_data(list, 0) = qi_make_string(state, "list");
  1100. qi_list_data(list, 1) = qi_make_string(state, "string");
  1101. qi_list_data(list, 2) = qi_make_string(state, "bytes");
  1102. qi_list_data(list, 3) = qi_make_string(state, "ustr");
  1103. return list;
  1104. }
  1105. inline static qi_list_t *__qistd179(qi_state_t *state) {
  1106. qi_list_t *list = qi_list_make_n(1);
  1107. qi_list_data(list, 0) = qi_get(state, "l");
  1108. return list;
  1109. }
  1110. inline static qi_list_t *__qistd178(qi_state_t *state) {
  1111. qi_list_t *list = qi_list_make_n(1);
  1112. qi_list_data(list, 0) = qi_add(state, qi_make_string(state, "expected first argument to be: list, string, bytes or ustr, but got: "), qi_call(state, qi_get(state, "type"), __qistd179(state)));
  1113. return list;
  1114. }
  1115. inline static qi_list_t *__qistd180(qi_state_t *state) {
  1116. qi_list_t *list = qi_list_make_n(1);
  1117. qi_list_data(list, 0) = qi_get(state, "arguments");
  1118. return list;
  1119. }
  1120. inline static qi_list_t *__qistd181(qi_state_t *state) {
  1121. qi_list_t *list = qi_list_make_n(1);
  1122. qi_list_data(list, 0) = qi_get(state, "f");
  1123. return list;
  1124. }
  1125. inline static qi_list_t *__qistd183(qi_state_t *state) {
  1126. qi_list_t *list = qi_list_make_n(1);
  1127. qi_list_data(list, 0) = qi_get(state, "f");
  1128. return list;
  1129. }
  1130. inline static qi_list_t *__qistd182(qi_state_t *state) {
  1131. qi_list_t *list = qi_list_make_n(1);
  1132. qi_list_data(list, 0) = qi_add(state, qi_make_string(state, "expected second argument to be: number, but got: "), qi_call(state, qi_get(state, "type"), __qistd183(state)));
  1133. return list;
  1134. }
  1135. inline static qi_list_t *__qistd184(qi_state_t *state) {
  1136. qi_list_t *list = qi_list_make_n(1);
  1137. qi_list_data(list, 0) = qi_get(state, "l");
  1138. return list;
  1139. }
  1140. inline static qi_list_t *__qistd186(qi_state_t *state) {
  1141. qi_list_t *list = qi_list_make_n(1);
  1142. qi_list_data(list, 0) = qi_get(state, "l");
  1143. return list;
  1144. }
  1145. inline static qi_list_t *__qistd187(qi_state_t *state) {
  1146. qi_list_t *list = qi_list_make_n(2);
  1147. qi_list_data(list, 0) = qi_get(state, "r");
  1148. qi_list_data(list, 1) = qi_index(state, qi_get(state, "l"), qi_get(state, "i"));
  1149. return list;
  1150. }
  1151. inline static qi_list_t *__qistd188(qi_state_t *state) {
  1152. qi_list_t *list = qi_list_make_n(1);
  1153. qi_list_data(list, 0) = qi_get(state, "arguments");
  1154. return list;
  1155. }
  1156. inline static qi_list_t *__qistd189(qi_state_t *state) {
  1157. qi_list_t *list = qi_list_make_n(1);
  1158. qi_list_data(list, 0) = qi_get(state, "f");
  1159. return list;
  1160. }
  1161. inline static qi_list_t *__qistd191(qi_state_t *state) {
  1162. qi_list_t *list = qi_list_make_n(1);
  1163. qi_list_data(list, 0) = qi_get(state, "f");
  1164. return list;
  1165. }
  1166. inline static qi_list_t *__qistd190(qi_state_t *state) {
  1167. qi_list_t *list = qi_list_make_n(1);
  1168. qi_list_data(list, 0) = qi_add(state, qi_make_string(state, "expected second argument to be: number, but got: "), qi_call(state, qi_get(state, "type"), __qistd191(state)));
  1169. return list;
  1170. }
  1171. inline static qi_list_t *__qistd192(qi_state_t *state) {
  1172. qi_list_t *list = qi_list_make_n(1);
  1173. qi_list_data(list, 0) = qi_get(state, "t");
  1174. return list;
  1175. }
  1176. inline static qi_list_t *__qistd194(qi_state_t *state) {
  1177. qi_list_t *list = qi_list_make_n(1);
  1178. qi_list_data(list, 0) = qi_get(state, "t");
  1179. return list;
  1180. }
  1181. inline static qi_list_t *__qistd193(qi_state_t *state) {
  1182. qi_list_t *list = qi_list_make_n(1);
  1183. qi_list_data(list, 0) = qi_add(state, qi_make_string(state, "expected third argument to be: number, but got: "), qi_call(state, qi_get(state, "type"), __qistd194(state)));
  1184. return list;
  1185. }
  1186. inline static qi_list_t *__qistd195(qi_state_t *state) {
  1187. qi_list_t *list = qi_list_make_n(1);
  1188. qi_list_data(list, 0) = qi_get(state, "l");
  1189. return list;
  1190. }
  1191. inline static qi_list_t *__qistd196(qi_state_t *state) {
  1192. qi_list_t *list = qi_list_make_n(1);
  1193. qi_list_data(list, 0) = qi_get(state, "l");
  1194. return list;
  1195. }
  1196. inline static qi_list_t *__qistd198(qi_state_t *state) {
  1197. qi_list_t *list = qi_list_make_n(1);
  1198. qi_list_data(list, 0) = qi_get(state, "l");
  1199. return list;
  1200. }
  1201. inline static qi_list_t *__qistd199(qi_state_t *state) {
  1202. qi_list_t *list = qi_list_make_n(2);
  1203. qi_list_data(list, 0) = qi_get(state, "r");
  1204. qi_list_data(list, 1) = qi_index(state, qi_get(state, "l"), qi_get(state, "i"));
  1205. return list;
  1206. }
  1207. inline static qi_list_t *__qistd200(qi_state_t *state) {
  1208. qi_list_t *list = qi_list_make_n(1);
  1209. qi_list_data(list, 0) = qi_get(state, "l");
  1210. return list;
  1211. }
  1212. inline static qi_list_t *__qistd202(qi_state_t *state) {
  1213. qi_list_t *list = qi_list_make_n(1);
  1214. qi_list_data(list, 0) = qi_get(state, "r");
  1215. return list;
  1216. }
  1217. inline static qi_list_t *__qistd203(qi_state_t *state) {
  1218. qi_list_t *list = qi_list_make_n(1);
  1219. qi_list_data(list, 0) = qi_get(state, "l");
  1220. return list;
  1221. }
  1222. inline static qi_list_t *__qistd205(qi_state_t *state) {
  1223. qi_list_t *list = qi_list_make_n(1);
  1224. qi_list_data(list, 0) = qi_get(state, "r");
  1225. return list;
  1226. }
  1227. inline static qi_list_t *__qistd206(qi_state_t *state) {
  1228. qi_list_t *list = qi_list_make_n(1);
  1229. qi_list_data(list, 0) = qi_get(state, "l");
  1230. return list;
  1231. }
  1232. inline static qi_list_t *__qistd208(qi_state_t *state) {
  1233. qi_list_t *list = qi_list_make_n(1);
  1234. qi_list_data(list, 0) = qi_get(state, "r");
  1235. return list;
  1236. }
  1237. qi_value_t *__qistd175(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
  1238. qi_decl(state, "l", qi_list_index(pargs, 0));
  1239. qi_new_scope(state);
  1240. if (_qi_truthy(state, qi_not_in(state, qi_call(state, qi_get(state, "type"), __qistd176(state)), qi_make_tuple(state, __qistd177(state))))) {
  1241. qi_throw(state, qi_call(state, qi_get(state, "TypeError"), __qistd178(state)));}
  1242. qi_old_scope(state);
  1243. qi_decl(state, "r", qi_make_list(state, NULL));
  1244. qi_new_scope(state);
  1245. if (_qi_truthy(state, qi_equals(state, qi_call(state, qi_get(state, "len"), __qistd180(state)), qi_make_number(state, 2)))) {
  1246. qi_decl(state, "f", qi_index(state, qi_get(state, "arguments"), qi_make_number(state, 1)));
  1247. qi_new_scope(state);
  1248. if (_qi_truthy(state, qi_not_equals(state, qi_call(state, qi_get(state, "type"), __qistd181(state)), qi_make_string(state, "number")))) {
  1249. qi_throw(state, qi_call(state, qi_get(state, "TypeError"), __qistd182(state)));}
  1250. qi_old_scope(state);
  1251. qi_new_scope(state);
  1252. if (_qi_truthy(state, qi_lt(state, qi_get(state, "f"), qi_make_number(state, 0)))) {
  1253. (void)(qi_set(state, false, "f", qi_add(state, qi_get(state, "f"), qi_call(state, qi_get(state, "len"), __qistd184(state)))));}
  1254. qi_old_scope(state);
  1255. qi_new_scope(state);
  1256. qi_decl(state, "i", qi_get(state, "f"));
  1257. while (_qi_truthy(state, qi_lt(state, qi_get(state, "i"), qi_call(state, qi_get(state, "len"), __qistd186(state))))) {
  1258. qi_new_scope(state);
  1259. (void)(qi_call(state, qi_get(state, "list_push"), __qistd187(state)));__continue185:;
  1260. qi_set(state, false, "i", qi_add(state, qi_get(state, "i"), state->one));
  1261. qi_old_scope(state);
  1262. }
  1263. goto __exit185;
  1264. __break185:;
  1265. qi_old_scope(state);
  1266. __exit185:;
  1267. qi_old_scope(state);
  1268. } else {
  1269. qi_new_scope(state);
  1270. if (_qi_truthy(state, qi_equals(state, qi_call(state, qi_get(state, "len"), __qistd188(state)), qi_make_number(state, 3)))) {
  1271. qi_decl(state, "f", qi_index(state, qi_get(state, "arguments"), qi_make_number(state, 1)));
  1272. qi_decl(state, "t", qi_index(state, qi_get(state, "arguments"), qi_make_number(state, 2)));
  1273. qi_new_scope(state);
  1274. if (_qi_truthy(state, qi_not_equals(state, qi_call(state, qi_get(state, "type"), __qistd189(state)), qi_make_string(state, "number")))) {
  1275. qi_throw(state, qi_call(state, qi_get(state, "TypeError"), __qistd190(state)));}
  1276. qi_old_scope(state);
  1277. qi_new_scope(state);
  1278. if (_qi_truthy(state, qi_not_equals(state, qi_call(state, qi_get(state, "type"), __qistd192(state)), qi_make_string(state, "number")))) {
  1279. qi_throw(state, qi_call(state, qi_get(state, "TypeError"), __qistd193(state)));}
  1280. qi_old_scope(state);
  1281. qi_new_scope(state);
  1282. if (_qi_truthy(state, qi_lt(state, qi_get(state, "f"), qi_make_number(state, 0)))) {
  1283. (void)(qi_set(state, false, "f", qi_add(state, qi_get(state, "f"), qi_call(state, qi_get(state, "len"), __qistd195(state)))));}
  1284. qi_old_scope(state);
  1285. qi_new_scope(state);
  1286. if (_qi_truthy(state, qi_lt(state, qi_get(state, "t"), qi_make_number(state, 0)))) {
  1287. (void)(qi_set(state, false, "t", qi_add(state, qi_get(state, "t"), qi_call(state, qi_get(state, "len"), __qistd196(state)))));}
  1288. qi_old_scope(state);
  1289. qi_new_scope(state);
  1290. qi_decl(state, "i", qi_get(state, "f"));
  1291. while (_qi_truthy(state, qi_and(state, qi_lt(state, qi_get(state, "i"), qi_call(state, qi_get(state, "len"), __qistd198(state))), qi_le(state, qi_get(state, "i"), qi_get(state, "t"))))) {
  1292. qi_new_scope(state);
  1293. (void)(qi_call(state, qi_get(state, "list_push"), __qistd199(state)));__continue197:;
  1294. qi_set(state, false, "i", qi_add(state, qi_get(state, "i"), state->one));
  1295. qi_old_scope(state);
  1296. }
  1297. goto __exit197;
  1298. __break197:;
  1299. qi_old_scope(state);
  1300. __exit197:;
  1301. qi_old_scope(state);
  1302. }
  1303. qi_old_scope(state);
  1304. }
  1305. qi_old_scope(state);
  1306. qi_new_scope(state);
  1307. if (_qi_truthy(state, qi_equals(state, qi_call(state, qi_get(state, "type"), __qistd200(state)), qi_make_string(state, "string")))) {
  1308. qi_value_t *__qistd201 = qi_call(state, qi_get(state, "list_join"), __qistd202(state));
  1309. qi_old_scope(state);
  1310. return __qistd201;} else {
  1311. qi_new_scope(state);
  1312. if (_qi_truthy(state, qi_equals(state, qi_call(state, qi_get(state, "type"), __qistd203(state)), qi_make_string(state, "bytes")))) {
  1313. qi_value_t *__qistd204 = qi_call(state, qi_get(state, "bytes"), __qistd205(state));
  1314. qi_old_scope(state);
  1315. qi_old_scope(state);
  1316. return __qistd204;} else {
  1317. qi_new_scope(state);
  1318. if (_qi_truthy(state, qi_equals(state, qi_call(state, qi_get(state, "type"), __qistd206(state)), qi_make_string(state, "ustr")))) {
  1319. qi_value_t *__qistd207 = qi_call(state, qi_get(state, "ustr"), __qistd208(state));
  1320. qi_old_scope(state);
  1321. qi_old_scope(state);
  1322. qi_old_scope(state);
  1323. return __qistd207;}
  1324. qi_old_scope(state);
  1325. }
  1326. qi_old_scope(state);
  1327. }
  1328. qi_old_scope(state);
  1329. qi_value_t *__qistd209 = qi_get(state, "r");
  1330. return __qistd209;
  1331. return state->nil;
  1332. }
  1333. inline static qi_list_t *__qistd211(qi_state_t *state) {
  1334. qi_list_t *list = qi_list_make_n(1);
  1335. qi_list_data(list, 0) = qi_get(state, "s");
  1336. return list;
  1337. }
  1338. inline static qi_list_t *__qistd213(qi_state_t *state) {
  1339. qi_list_t *list = qi_list_make_n(1);
  1340. qi_list_data(list, 0) = qi_get(state, "s");
  1341. return list;
  1342. }
  1343. inline static qi_list_t *__qistd212(qi_state_t *state) {
  1344. qi_list_t *list = qi_list_make_n(1);
  1345. qi_list_data(list, 0) = qi_add(state, qi_make_string(state, "expected first argument to be: string, but got: "), qi_call(state, qi_get(state, "type"), __qistd213(state)));
  1346. return list;
  1347. }
  1348. inline static qi_list_t *__qistd214(qi_state_t *state) {
  1349. qi_list_t *list = qi_list_make_n(1);
  1350. qi_list_data(list, 0) = qi_get(state, "s");
  1351. return list;
  1352. }
  1353. inline static qi_list_t *__qistd215(qi_state_t *state) {
  1354. qi_list_t *list = qi_list_make_n(1);
  1355. qi_list_data(list, 0) = qi_get(state, "p");
  1356. return list;
  1357. }
  1358. inline static qi_list_t *__qistd219(qi_state_t *state) {
  1359. qi_list_t *list = qi_list_make_n(1);
  1360. qi_list_data(list, 0) = qi_get(state, "p");
  1361. return list;
  1362. }
  1363. inline static qi_list_t *__qistd218(qi_state_t *state) {
  1364. qi_list_t *list = qi_list_make_n(3);
  1365. qi_list_data(list, 0) = qi_get(state, "s");
  1366. qi_list_data(list, 1) = qi_make_number(state, 0);
  1367. qi_list_data(list, 2) = qi_sub(state, qi_call(state, qi_get(state, "len"), __qistd219(state)), qi_make_number(state, 1));
  1368. return list;
  1369. }
  1370. qi_value_t *__qistd210(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
  1371. qi_decl(state, "p", qi_list_index(pargs, 1));
  1372. qi_decl(state, "s", qi_list_index(pargs, 0));
  1373. qi_new_scope(state);
  1374. if (_qi_truthy(state, qi_not_equals(state, qi_call(state, qi_get(state, "type"), __qistd211(state)), qi_make_string(state, "string")))) {
  1375. qi_throw(state, qi_call(state, qi_get(state, "TypeError"), __qistd212(state)));}
  1376. qi_old_scope(state);
  1377. qi_new_scope(state);
  1378. if (_qi_truthy(state, qi_lt(state, qi_call(state, qi_get(state, "len"), __qistd214(state)), qi_call(state, qi_get(state, "len"), __qistd215(state))))) {
  1379. qi_value_t *__qistd216 = state->_false;
  1380. qi_old_scope(state);
  1381. return __qistd216;}
  1382. qi_old_scope(state);
  1383. qi_value_t *__qistd217 = qi_equals(state, qi_call(state, qi_get(state, "slice"), __qistd218(state)), qi_get(state, "p"));
  1384. return __qistd217;
  1385. return state->nil;
  1386. }
  1387. inline static qi_list_t *__qistd221(qi_state_t *state) {
  1388. qi_list_t *list = qi_list_make_n(1);
  1389. qi_list_data(list, 0) = qi_get(state, "s");
  1390. return list;
  1391. }
  1392. inline static qi_list_t *__qistd223(qi_state_t *state) {
  1393. qi_list_t *list = qi_list_make_n(1);
  1394. qi_list_data(list, 0) = qi_get(state, "s");
  1395. return list;
  1396. }
  1397. inline static qi_list_t *__qistd222(qi_state_t *state) {
  1398. qi_list_t *list = qi_list_make_n(1);
  1399. qi_list_data(list, 0) = qi_add(state, qi_make_string(state, "expected first argument to be: string, but got: "), qi_call(state, qi_get(state, "type"), __qistd223(state)));
  1400. return list;
  1401. }
  1402. inline static qi_list_t *__qistd224(qi_state_t *state) {
  1403. qi_list_t *list = qi_list_make_n(1);
  1404. qi_list_data(list, 0) = qi_get(state, "s");
  1405. return list;
  1406. }
  1407. inline static qi_list_t *__qistd225(qi_state_t *state) {
  1408. qi_list_t *list = qi_list_make_n(1);
  1409. qi_list_data(list, 0) = qi_get(state, "p");
  1410. return list;
  1411. }
  1412. inline static qi_list_t *__qistd229(qi_state_t *state) {
  1413. qi_list_t *list = qi_list_make_n(1);
  1414. qi_list_data(list, 0) = qi_get(state, "s");
  1415. return list;
  1416. }
  1417. inline static qi_list_t *__qistd230(qi_state_t *state) {
  1418. qi_list_t *list = qi_list_make_n(1);
  1419. qi_list_data(list, 0) = qi_get(state, "p");
  1420. return list;
  1421. }
  1422. inline static qi_list_t *__qistd228(qi_state_t *state) {
  1423. qi_list_t *list = qi_list_make_n(2);
  1424. qi_list_data(list, 0) = qi_get(state, "s");
  1425. qi_list_data(list, 1) = qi_sub(state, qi_call(state, qi_get(state, "len"), __qistd229(state)), qi_call(state, qi_get(state, "len"), __qistd230(state)));
  1426. return list;
  1427. }
  1428. qi_value_t *__qistd220(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
  1429. qi_decl(state, "p", qi_list_index(pargs, 1));
  1430. qi_decl(state, "s", qi_list_index(pargs, 0));
  1431. qi_new_scope(state);
  1432. if (_qi_truthy(state, qi_not_equals(state, qi_call(state, qi_get(state, "type"), __qistd221(state)), qi_make_string(state, "string")))) {
  1433. qi_throw(state, qi_call(state, qi_get(state, "TypeError"), __qistd222(state)));}
  1434. qi_old_scope(state);
  1435. qi_new_scope(state);
  1436. if (_qi_truthy(state, qi_lt(state, qi_call(state, qi_get(state, "len"), __qistd224(state)), qi_call(state, qi_get(state, "len"), __qistd225(state))))) {
  1437. qi_value_t *__qistd226 = state->_false;
  1438. qi_old_scope(state);
  1439. return __qistd226;}
  1440. qi_old_scope(state);
  1441. qi_value_t *__qistd227 = qi_equals(state, qi_call(state, qi_get(state, "slice"), __qistd228(state)), qi_get(state, "p"));
  1442. return __qistd227;
  1443. return state->nil;
  1444. }
  1445. inline static qi_list_t *__qistd232(qi_state_t *state) {
  1446. qi_list_t *list = qi_list_make_n(1);
  1447. qi_list_data(list, 0) = qi_get(state, "arguments");
  1448. return list;
  1449. }
  1450. inline static qi_list_t *__qistd234(qi_state_t *state) {
  1451. qi_list_t *list = qi_list_make_n(1);
  1452. qi_list_data(list, 0) = qi_get(state, "s");
  1453. return list;
  1454. }
  1455. inline static qi_list_t *__qistd235(qi_state_t *state) {
  1456. qi_list_t *list = qi_list_make_n(1);
  1457. qi_list_data(list, 0) = qi_get(state, "s");
  1458. return list;
  1459. }
  1460. inline static qi_list_t *__qistd237(qi_state_t *state) {
  1461. qi_list_t *list = qi_list_make_n(1);
  1462. qi_list_data(list, 0) = qi_get(state, "s");
  1463. return list;
  1464. }
  1465. inline static qi_list_t *__qistd236(qi_state_t *state) {
  1466. qi_list_t *list = qi_list_make_n(1);
  1467. qi_list_data(list, 0) = qi_add(state, qi_make_string(state, "expected first argument to be:!string, but got: "), qi_call(state, qi_get(state, "type"), __qistd237(state)));
  1468. return list;
  1469. }
  1470. inline static qi_list_t *__qistd238(qi_state_t *state) {
  1471. qi_list_t *list = qi_list_make_n(1);
  1472. qi_list_data(list, 0) = qi_get(state, "d");
  1473. return list;
  1474. }
  1475. inline static qi_list_t *__qistd240(qi_state_t *state) {
  1476. qi_list_t *list = qi_list_make_n(1);
  1477. qi_list_data(list, 0) = qi_get(state, "s");
  1478. return list;
  1479. }
  1480. inline static qi_list_t *__qistd239(qi_state_t *state) {
  1481. qi_list_t *list = qi_list_make_n(1);
  1482. qi_list_data(list, 0) = qi_add(state, qi_make_string(state, "expected second argument to be: string, but got: "), qi_call(state, qi_get(state, "type"), __qistd240(state)));
  1483. return list;
  1484. }
  1485. inline static qi_list_t *__qistd242(qi_state_t *state) {
  1486. qi_list_t *list = qi_list_make_n(1);
  1487. qi_list_data(list, 0) = qi_get(state, "s");
  1488. return list;
  1489. }
  1490. inline static qi_list_t *__qistd244(qi_state_t *state) {
  1491. qi_list_t *list = qi_list_make_n(1);
  1492. qi_list_data(list, 0) = qi_get(state, "d");
  1493. return list;
  1494. }
  1495. inline static qi_list_t *__qistd243(qi_state_t *state) {
  1496. qi_list_t *list = qi_list_make_n(3);
  1497. qi_list_data(list, 0) = qi_get(state, "s");
  1498. qi_list_data(list, 1) = qi_get(state, "i");
  1499. qi_list_data(list, 2) = qi_sub(state, qi_add(state, qi_get(state, "i"), qi_call(state, qi_get(state, "len"), __qistd244(state))), qi_make_number(state, 1));
  1500. return list;
  1501. }
  1502. inline static qi_list_t *__qistd245(qi_state_t *state) {
  1503. qi_list_t *list = qi_list_make_n(2);
  1504. qi_list_data(list, 0) = qi_get(state, "r");
  1505. qi_list_data(list, 1) = qi_get(state, "t");
  1506. return list;
  1507. }
  1508. inline static qi_list_t *__qistd246(qi_state_t *state) {
  1509. qi_list_t *list = qi_list_make_n(1);
  1510. qi_list_data(list, 0) = qi_get(state, "d");
  1511. return list;
  1512. }
  1513. inline static qi_list_t *__qistd247(qi_state_t *state) {
  1514. qi_list_t *list = qi_list_make_n(2);
  1515. qi_list_data(list, 0) = qi_get(state, "r");
  1516. qi_list_data(list, 1) = qi_get(state, "t");
  1517. return list;
  1518. }
  1519. qi_value_t *__qistd231(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
  1520. qi_decl(state, "s", qi_list_index(pargs, 0));
  1521. qi_new_scope(state);
  1522. if (_qi_truthy(state, qi_or(state, qi_equals(state, qi_call(state, qi_get(state, "len"), __qistd232(state)), qi_make_number(state, 1)), qi_equals(state, qi_index(state, qi_get(state, "arguments"), qi_make_number(state, 1)), state->empty_string)))) {
  1523. qi_value_t *__qistd233 = qi_call(state, qi_get(state, "list"), __qistd234(state));
  1524. qi_old_scope(state);
  1525. return __qistd233;}
  1526. qi_old_scope(state);
  1527. qi_new_scope(state);
  1528. if (_qi_truthy(state, qi_not_equals(state, qi_call(state, qi_get(state, "type"), __qistd235(state)), qi_make_string(state, "string")))) {
  1529. qi_throw(state, qi_call(state, qi_get(state, "TypeError"), __qistd236(state)));}
  1530. qi_old_scope(state);
  1531. qi_decl(state, "r", qi_make_list(state, NULL));
  1532. qi_decl(state, "d", qi_index(state, qi_get(state, "arguments"), qi_make_number(state, 1)));
  1533. qi_new_scope(state);
  1534. if (_qi_truthy(state, qi_not_equals(state, qi_call(state, qi_get(state, "type"), __qistd238(state)), qi_make_string(state, "string")))) {
  1535. qi_throw(state, qi_call(state, qi_get(state, "TypeError"), __qistd239(state)));}
  1536. qi_old_scope(state);
  1537. qi_decl(state, "t", state->empty_string);
  1538. qi_new_scope(state);
  1539. qi_decl(state, "i", qi_make_number(state, 0));
  1540. while (_qi_truthy(state, qi_lt(state, qi_get(state, "i"), qi_call(state, qi_get(state, "len"), __qistd242(state))))) {
  1541. qi_new_scope(state);
  1542. qi_new_scope(state);
  1543. if (_qi_truthy(state, qi_equals(state, qi_call(state, qi_get(state, "slice"), __qistd243(state)), qi_get(state, "d")))) {
  1544. (void)(qi_call(state, qi_get(state, "list_push"), __qistd245(state)));
  1545. (void)(qi_set(state, false, "t", state->empty_string));
  1546. (void)(qi_set(state, false, "i", qi_add(state, qi_get(state, "i"), qi_sub(state, qi_call(state, qi_get(state, "len"), __qistd246(state)), qi_make_number(state, 1)))));
  1547. qi_old_scope(state);
  1548. goto __continue241;
  1549. }
  1550. qi_old_scope(state);
  1551. (void)(qi_set(state, false, "t", qi_add(state, qi_get(state, "t"), qi_index(state, qi_get(state, "s"), qi_get(state, "i")))));
  1552. __continue241:;
  1553. qi_set(state, false, "i", qi_add(state, qi_get(state, "i"), state->one));
  1554. qi_old_scope(state);
  1555. }
  1556. goto __exit241;
  1557. __break241:;
  1558. qi_old_scope(state);
  1559. __exit241:;
  1560. qi_old_scope(state);
  1561. qi_new_scope(state);
  1562. if (_qi_truthy(state, qi_not_equals(state, qi_get(state, "t"), state->empty_string))) {
  1563. (void)(qi_call(state, qi_get(state, "list_push"), __qistd247(state)));}
  1564. qi_old_scope(state);
  1565. qi_value_t *__qistd248 = qi_get(state, "r");
  1566. return __qistd248;
  1567. return state->nil;
  1568. }
  1569. inline static qi_list_t *__qistd250(qi_state_t *state) {
  1570. qi_list_t *list = qi_list_make_n(1);
  1571. qi_list_data(list, 0) = qi_get(state, "s");
  1572. return list;
  1573. }
  1574. inline static qi_list_t *__qistd252(qi_state_t *state) {
  1575. qi_list_t *list = qi_list_make_n(1);
  1576. qi_list_data(list, 0) = qi_get(state, "s");
  1577. return list;
  1578. }
  1579. inline static qi_list_t *__qistd251(qi_state_t *state) {
  1580. qi_list_t *list = qi_list_make_n(1);
  1581. qi_list_data(list, 0) = qi_add(state, qi_make_string(state, "expected first argument to be: string, but got: "), qi_call(state, qi_get(state, "type"), __qistd252(state)));
  1582. return list;
  1583. }
  1584. inline static qi_list_t *__qistd253(qi_state_t *state) {
  1585. qi_list_t *list = qi_list_make_n(1);
  1586. qi_list_data(list, 0) = qi_get(state, "w");
  1587. return list;
  1588. }
  1589. inline static qi_list_t *__qistd255(qi_state_t *state) {
  1590. qi_list_t *list = qi_list_make_n(1);
  1591. qi_list_data(list, 0) = qi_get(state, "w");
  1592. return list;
  1593. }
  1594. inline static qi_list_t *__qistd254(qi_state_t *state) {
  1595. qi_list_t *list = qi_list_make_n(1);
  1596. qi_list_data(list, 0) = qi_add(state, qi_make_string(state, "expected second argument to be: string, but got: "), qi_call(state, qi_get(state, "type"), __qistd255(state)));
  1597. return list;
  1598. }
  1599. inline static qi_list_t *__qistd256(qi_state_t *state) {
  1600. qi_list_t *list = qi_list_make_n(1);
  1601. qi_list_data(list, 0) = qi_get(state, "b");
  1602. return list;
  1603. }
  1604. inline static qi_list_t *__qistd258(qi_state_t *state) {
  1605. qi_list_t *list = qi_list_make_n(1);
  1606. qi_list_data(list, 0) = qi_get(state, "b");
  1607. return list;
  1608. }
  1609. inline static qi_list_t *__qistd257(qi_state_t *state) {
  1610. qi_list_t *list = qi_list_make_n(1);
  1611. qi_list_data(list, 0) = qi_add(state, qi_make_string(state, "expected third argument to be: string, but got: "), qi_call(state, qi_get(state, "type"), __qistd258(state)));
  1612. return list;
  1613. }
  1614. inline static qi_list_t *__qistd260(qi_state_t *state) {
  1615. qi_list_t *list = qi_list_make_n(1);
  1616. qi_list_data(list, 0) = qi_get(state, "s");
  1617. return list;
  1618. }
  1619. inline static qi_list_t *__qistd262(qi_state_t *state) {
  1620. qi_list_t *list = qi_list_make_n(1);
  1621. qi_list_data(list, 0) = qi_get(state, "w");
  1622. return list;
  1623. }
  1624. inline static qi_list_t *__qistd261(qi_state_t *state) {
  1625. qi_list_t *list = qi_list_make_n(3);
  1626. qi_list_data(list, 0) = qi_get(state, "s");
  1627. qi_list_data(list, 1) = qi_get(state, "i");
  1628. qi_list_data(list, 2) = qi_sub(state, qi_add(state, qi_get(state, "i"), qi_call(state, qi_get(state, "len"), __qistd262(state))), qi_make_number(state, 1));
  1629. return list;
  1630. }
  1631. inline static qi_list_t *__qistd263(qi_state_t *state) {
  1632. qi_list_t *list = qi_list_make_n(1);
  1633. qi_list_data(list, 0) = qi_get(state, "w");
  1634. return list;
  1635. }
  1636. qi_value_t *__qistd249(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
  1637. qi_decl(state, "b", qi_list_index(pargs, 2));
  1638. qi_decl(state, "s", qi_list_index(pargs, 0));
  1639. qi_decl(state, "w", qi_list_index(pargs, 1));
  1640. qi_new_scope(state);
  1641. if (_qi_truthy(state, qi_not_equals(state, qi_call(state, qi_get(state, "type"), __qistd250(state)), qi_make_string(state, "string")))) {
  1642. qi_throw(state, qi_call(state, qi_get(state, "TypeError"), __qistd251(state)));}
  1643. qi_old_scope(state);
  1644. qi_new_scope(state);
  1645. if (_qi_truthy(state, qi_not_equals(state, qi_call(state, qi_get(state, "type"), __qistd253(state)), qi_make_string(state, "string")))) {
  1646. qi_throw(state, qi_call(state, qi_get(state, "TypeError"), __qistd254(state)));}
  1647. qi_old_scope(state);
  1648. qi_new_scope(state);
  1649. if (_qi_truthy(state, qi_not_equals(state, qi_call(state, qi_get(state, "type"), __qistd256(state)), qi_make_string(state, "string")))) {
  1650. qi_throw(state, qi_call(state, qi_get(state, "TypeError"), __qistd257(state)));}
  1651. qi_old_scope(state);
  1652. qi_decl(state, "r", state->empty_string);
  1653. qi_new_scope(state);
  1654. qi_decl(state, "i", qi_make_number(state, 0));
  1655. while (_qi_truthy(state, qi_lt(state, qi_get(state, "i"), qi_call(state, qi_get(state, "len"), __qistd260(state))))) {
  1656. qi_new_scope(state);
  1657. qi_new_scope(state);
  1658. if (_qi_truthy(state, qi_equals(state, qi_call(state, qi_get(state, "slice"), __qistd261(state)), qi_get(state, "w")))) {
  1659. (void)(qi_set(state, false, "r", qi_add(state, qi_get(state, "r"), qi_get(state, "b"))));
  1660. (void)(qi_set(state, false, "i", qi_add(state, qi_get(state, "i"), qi_sub(state, qi_call(state, qi_get(state, "len"), __qistd263(state)), qi_make_number(state, 1)))));
  1661. qi_old_scope(state);
  1662. goto __continue259;
  1663. }
  1664. qi_old_scope(state);
  1665. (void)(qi_set(state, false, "r", qi_add(state, qi_get(state, "r"), qi_index(state, qi_get(state, "s"), qi_get(state, "i")))));
  1666. __continue259:;
  1667. qi_set(state, false, "i", qi_add(state, qi_get(state, "i"), state->one));
  1668. qi_old_scope(state);
  1669. }
  1670. goto __exit259;
  1671. __break259:;
  1672. qi_old_scope(state);
  1673. __exit259:;
  1674. qi_old_scope(state);
  1675. qi_value_t *__qistd264 = qi_get(state, "r");
  1676. return __qistd264;
  1677. return state->nil;
  1678. }
  1679. inline static qi_list_t *__qistd266(qi_state_t *state) {
  1680. qi_list_t *list = qi_list_make_n(1);
  1681. qi_list_data(list, 0) = qi_get(state, "t");
  1682. return list;
  1683. }
  1684. inline static qi_list_t *__qistd268(qi_state_t *state) {
  1685. qi_list_t *list = qi_list_make_n(1);
  1686. qi_list_data(list, 0) = qi_get(state, "t");
  1687. return list;
  1688. }
  1689. inline static qi_list_t *__qistd267(qi_state_t *state) {
  1690. qi_list_t *list = qi_list_make_n(1);
  1691. qi_list_data(list, 0) = qi_add(state, qi_make_string(state, "expected first argument to be: table, but got: "), qi_call(state, qi_get(state, "type"), __qistd268(state)));
  1692. return list;
  1693. }
  1694. inline static qi_list_t *__qistd271(qi_state_t *state) {
  1695. qi_list_t *list = qi_list_make_n(2);
  1696. qi_list_data(list, 0) = qi_get(state, "r");
  1697. qi_list_data(list, 1) = qi_get(state, "k");
  1698. return list;
  1699. }
  1700. qi_value_t *__qistd265(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
  1701. qi_decl(state, "t", qi_list_index(pargs, 0));
  1702. qi_new_scope(state);
  1703. if (_qi_truthy(state, qi_not_equals(state, qi_call(state, qi_get(state, "type"), __qistd266(state)), qi_make_string(state, "table")))) {
  1704. qi_throw(state, qi_call(state, qi_get(state, "TypeError"), __qistd267(state)));}
  1705. qi_old_scope(state);
  1706. qi_decl(state, "r", qi_make_list(state, NULL));
  1707. qi_new_scope(state);
  1708. qi_value_t *__qistd270 = qi_iter(state, qi_get(state, "t"));
  1709. qi_decl(state, "k", state->nil);
  1710. while (!qi_iter_end(state, __qistd270)) {
  1711. qi_value_t *el = qi_iter_next(state, __qistd270);
  1712. qi_set(state, false, "k", el);
  1713. qi_new_scope(state);
  1714. (void)(qi_call(state, qi_get(state, "list_push"), __qistd271(state)));__continue269:;
  1715. qi_old_scope(state);
  1716. }
  1717. goto __exit269;
  1718. __break269:;
  1719. qi_old_scope(state);
  1720. __exit269:;
  1721. qi_old_scope(state);
  1722. qi_value_t *__qistd272 = qi_get(state, "r");
  1723. return __qistd272;
  1724. return state->nil;
  1725. }
  1726. inline static qi_list_t *__qistd274(qi_state_t *state) {
  1727. qi_list_t *list = qi_list_make_n(1);
  1728. qi_list_data(list, 0) = qi_get(state, "t");
  1729. return list;
  1730. }
  1731. inline static qi_list_t *__qistd276(qi_state_t *state) {
  1732. qi_list_t *list = qi_list_make_n(1);
  1733. qi_list_data(list, 0) = qi_get(state, "t");
  1734. return list;
  1735. }
  1736. inline static qi_list_t *__qistd275(qi_state_t *state) {
  1737. qi_list_t *list = qi_list_make_n(1);
  1738. qi_list_data(list, 0) = qi_add(state, qi_make_string(state, "expected first argument to be: table, but got: "), qi_call(state, qi_get(state, "type"), __qistd276(state)));
  1739. return list;
  1740. }
  1741. inline static qi_list_t *__qistd279(qi_state_t *state) {
  1742. qi_list_t *list = qi_list_make_n(2);
  1743. qi_list_data(list, 0) = qi_get(state, "r");
  1744. qi_list_data(list, 1) = qi_index(state, qi_get(state, "t"), qi_get(state, "k"));
  1745. return list;
  1746. }
  1747. qi_value_t *__qistd273(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
  1748. qi_decl(state, "t", qi_list_index(pargs, 0));
  1749. qi_new_scope(state);
  1750. if (_qi_truthy(state, qi_not_equals(state, qi_call(state, qi_get(state, "type"), __qistd274(state)), qi_make_string(state, "table")))) {
  1751. qi_throw(state, qi_call(state, qi_get(state, "TypeError"), __qistd275(state)));}
  1752. qi_old_scope(state);
  1753. qi_decl(state, "r", qi_make_list(state, NULL));
  1754. qi_new_scope(state);
  1755. qi_value_t *__qistd278 = qi_iter(state, qi_get(state, "t"));
  1756. qi_decl(state, "k", state->nil);
  1757. while (!qi_iter_end(state, __qistd278)) {
  1758. qi_value_t *el = qi_iter_next(state, __qistd278);
  1759. qi_set(state, false, "k", el);
  1760. qi_new_scope(state);
  1761. (void)(qi_call(state, qi_get(state, "list_push"), __qistd279(state)));__continue277:;
  1762. qi_old_scope(state);
  1763. }
  1764. goto __exit277;
  1765. __break277:;
  1766. qi_old_scope(state);
  1767. __exit277:;
  1768. qi_old_scope(state);
  1769. qi_value_t *__qistd280 = qi_get(state, "r");
  1770. return __qistd280;
  1771. return state->nil;
  1772. }
  1773. inline static qi_list_t *__qistd282(qi_state_t *state) {
  1774. qi_list_t *list = qi_list_make_n(1);
  1775. qi_list_data(list, 0) = qi_get(state, "f");
  1776. return list;
  1777. }
  1778. inline static qi_list_t *__qistd284(qi_state_t *state) {
  1779. qi_list_t *list = qi_list_make_n(1);
  1780. qi_list_data(list, 0) = qi_get(state, "f");
  1781. return list;
  1782. }
  1783. inline static qi_list_t *__qistd283(qi_state_t *state) {
  1784. qi_list_t *list = qi_list_make_n(1);
  1785. qi_list_data(list, 0) = qi_add(state, qi_make_string(state, "expected first argument to be: function, but got: "), qi_call(state, qi_get(state, "type"), __qistd284(state)));
  1786. return list;
  1787. }
  1788. inline static qi_list_t *__qistd285(qi_state_t *state) {
  1789. qi_list_t *list = qi_list_make_n(1);
  1790. qi_list_data(list, 0) = qi_get(state, "xs");
  1791. return list;
  1792. }
  1793. inline static qi_list_t *__qistd286(qi_state_t *state) {
  1794. qi_list_t *list = qi_list_make_n(4);
  1795. qi_list_data(list, 0) = qi_make_string(state, "list");
  1796. qi_list_data(list, 1) = qi_make_string(state, "tuple");
  1797. qi_list_data(list, 2) = qi_make_string(state, "string");
  1798. qi_list_data(list, 3) = qi_make_string(state, "bytes");
  1799. return list;
  1800. }
  1801. inline static qi_list_t *__qistd288(qi_state_t *state) {
  1802. qi_list_t *list = qi_list_make_n(1);
  1803. qi_list_data(list, 0) = qi_get(state, "xs");
  1804. return list;
  1805. }
  1806. inline static qi_list_t *__qistd287(qi_state_t *state) {
  1807. qi_list_t *list = qi_list_make_n(1);
  1808. qi_list_data(list, 0) = qi_add(state, qi_make_string(state, "expected second argument to be: list, tuple, string or bytes, but got: "), qi_call(state, qi_get(state, "type"), __qistd288(state)));
  1809. return list;
  1810. }
  1811. inline static qi_list_t *__qistd289(qi_state_t *state) {
  1812. qi_list_t *list = qi_list_make_n(1);
  1813. qi_list_data(list, 0) = qi_get(state, "xs");
  1814. return list;
  1815. }
  1816. inline static qi_list_t *__qistd290(qi_state_t *state) {
  1817. qi_list_t *list = qi_list_make_n(1);
  1818. qi_list_data(list, 0) = qi_make_string(state, "cannot reduce empty list");
  1819. return list;
  1820. }
  1821. inline static qi_list_t *__qistd293(qi_state_t *state) {
  1822. qi_list_t *list = qi_list_make_n(2);
  1823. qi_list_data(list, 0) = qi_get(state, "xs");
  1824. qi_list_data(list, 1) = qi_make_number(state, 1);
  1825. return list;
  1826. }
  1827. inline static qi_list_t *__qistd294(qi_state_t *state) {
  1828. qi_list_t *list = qi_list_make_n(2);
  1829. qi_list_data(list, 0) = qi_get(state, "r");
  1830. qi_list_data(list, 1) = qi_get(state, "x");
  1831. return list;
  1832. }
  1833. inline static qi_list_t *__qistd295(qi_state_t *state) {
  1834. qi_list_t *list = qi_list_make_n(1);
  1835. qi_list_data(list, 0) = qi_get(state, "xs");
  1836. return list;
  1837. }
  1838. inline static qi_list_t *__qistd297(qi_state_t *state) {
  1839. qi_list_t *list = qi_list_make_n(1);
  1840. qi_list_data(list, 0) = qi_get(state, "r");
  1841. return list;
  1842. }
  1843. inline static qi_list_t *__qistd298(qi_state_t *state) {
  1844. qi_list_t *list = qi_list_make_n(1);
  1845. qi_list_data(list, 0) = qi_get(state, "xs");
  1846. return list;
  1847. }
  1848. inline static qi_list_t *__qistd300(qi_state_t *state) {
  1849. qi_list_t *list = qi_list_make_n(1);
  1850. qi_list_data(list, 0) = qi_get(state, "r");
  1851. return list;
  1852. }
  1853. inline static qi_list_t *__qistd301(qi_state_t *state) {
  1854. qi_list_t *list = qi_list_make_n(1);
  1855. qi_list_data(list, 0) = qi_get(state, "xs");
  1856. return list;
  1857. }
  1858. inline static qi_list_t *__qistd303(qi_state_t *state) {
  1859. qi_list_t *list = qi_list_make_n(1);
  1860. qi_list_data(list, 0) = qi_get(state, "r");
  1861. return list;
  1862. }
  1863. qi_value_t *__qistd281(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
  1864. qi_decl(state, "f", qi_list_index(pargs, 0));
  1865. qi_decl(state, "xs", qi_list_index(pargs, 1));
  1866. qi_new_scope(state);
  1867. if (_qi_truthy(state, qi_not_equals(state, qi_call(state, qi_get(state, "type"), __qistd282(state)), qi_make_string(state, "function")))) {
  1868. qi_throw(state, qi_call(state, qi_get(state, "TypeError"), __qistd283(state)));}
  1869. qi_old_scope(state);
  1870. qi_new_scope(state);
  1871. if (_qi_truthy(state, qi_not_in(state, qi_call(state, qi_get(state, "type"), __qistd285(state)), qi_make_tuple(state, __qistd286(state))))) {
  1872. qi_throw(state, qi_call(state, qi_get(state, "TypeError"), __qistd287(state)));}
  1873. qi_old_scope(state);
  1874. qi_new_scope(state);
  1875. if (_qi_truthy(state, qi_equals(state, qi_call(state, qi_get(state, "len"), __qistd289(state)), qi_make_number(state, 0)))) {
  1876. qi_throw(state, qi_call(state, qi_get(state, "ValueError"), __qistd290(state)));}
  1877. qi_old_scope(state);
  1878. (void)(qi_set(state, false, "r", qi_index(state, qi_get(state, "xs"), qi_make_number(state, 0))));
  1879. qi_new_scope(state);
  1880. qi_value_t *__qistd292 = qi_iter(state, qi_call(state, qi_get(state, "slice"), __qistd293(state)));
  1881. qi_decl(state, "x", state->nil);
  1882. while (!qi_iter_end(state, __qistd292)) {
  1883. qi_value_t *el = qi_iter_next(state, __qistd292);
  1884. qi_set(state, false, "x", el);
  1885. qi_new_scope(state);
  1886. (void)(qi_set(state, false, "r", qi_call(state, qi_get(state, "f"), __qistd294(state))));__continue291:;
  1887. qi_old_scope(state);
  1888. }
  1889. goto __exit291;
  1890. __break291:;
  1891. qi_old_scope(state);
  1892. __exit291:;
  1893. qi_old_scope(state);
  1894. qi_new_scope(state);
  1895. if (_qi_truthy(state, qi_equals(state, qi_call(state, qi_get(state, "type"), __qistd295(state)), qi_make_string(state, "tuple")))) {
  1896. qi_value_t *__qistd296 = qi_call(state, qi_get(state, "tuple"), __qistd297(state));
  1897. qi_old_scope(state);
  1898. return __qistd296;} else {
  1899. qi_new_scope(state);
  1900. if (_qi_truthy(state, qi_equals(state, qi_call(state, qi_get(state, "type"), __qistd298(state)), qi_make_string(state, "string")))) {
  1901. qi_value_t *__qistd299 = qi_call(state, qi_get(state, "list_join"), __qistd300(state));
  1902. qi_old_scope(state);
  1903. qi_old_scope(state);
  1904. return __qistd299;} else {
  1905. qi_new_scope(state);
  1906. if (_qi_truthy(state, qi_equals(state, qi_call(state, qi_get(state, "type"), __qistd301(state)), qi_make_string(state, "bytes")))) {
  1907. qi_value_t *__qistd302 = qi_call(state, qi_get(state, "bytes"), __qistd303(state));
  1908. qi_old_scope(state);
  1909. qi_old_scope(state);
  1910. qi_old_scope(state);
  1911. return __qistd302;}
  1912. qi_old_scope(state);
  1913. }
  1914. qi_old_scope(state);
  1915. }
  1916. qi_old_scope(state);
  1917. qi_value_t *__qistd304 = qi_get(state, "r");
  1918. return __qistd304;
  1919. return state->nil;
  1920. }
  1921. qi_value_t *__qistd308(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
  1922. qi_decl(state, "x", qi_list_index(pargs, 0));
  1923. qi_decl(state, "y", qi_list_index(pargs, 1));
  1924. qi_value_t *__qistd309 = qi_add(state, qi_get(state, "x"), qi_get(state, "y"));
  1925. return __qistd309;return state->nil;
  1926. }
  1927. inline static qi_list_t *__qistd307(qi_state_t *state) {
  1928. qi_list_t *list = qi_list_make_n(2);
  1929. qi_list_data(list, 0) = qi_make_function(state, "<anon>", 2, __qistd308, NULL);
  1930. qi_list_data(list, 1) = qi_get(state, "xs");
  1931. return list;
  1932. }
  1933. qi_value_t *__qistd305(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
  1934. qi_decl(state, "xs", qi_list_index(pargs, 0));
  1935. qi_value_t *__qistd306 = qi_call(state, qi_get(state, "reduce"), __qistd307(state));
  1936. return __qistd306;return state->nil;
  1937. }
  1938. qi_value_t *__qistd313(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
  1939. qi_decl(state, "x", qi_list_index(pargs, 0));
  1940. qi_decl(state, "y", qi_list_index(pargs, 1));
  1941. qi_value_t *__qistd314 = qi_mul(state, qi_get(state, "x"), qi_get(state, "y"));
  1942. return __qistd314;return state->nil;
  1943. }
  1944. inline static qi_list_t *__qistd312(qi_state_t *state) {
  1945. qi_list_t *list = qi_list_make_n(2);
  1946. qi_list_data(list, 0) = qi_make_function(state, "<anon>", 2, __qistd313, NULL);
  1947. qi_list_data(list, 1) = qi_get(state, "xs");
  1948. return list;
  1949. }
  1950. qi_value_t *__qistd310(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
  1951. qi_decl(state, "xs", qi_list_index(pargs, 0));
  1952. qi_value_t *__qistd311 = qi_call(state, qi_get(state, "reduce"), __qistd312(state));
  1953. return __qistd311;return state->nil;
  1954. }
  1955. qi_value_t *__qistd318(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
  1956. qi_decl(state, "x", qi_list_index(pargs, 0));
  1957. qi_decl(state, "y", qi_list_index(pargs, 1));
  1958. qi_value_t *__qistd319 = qi_and(state, qi_get(state, "x"), qi_get(state, "y"));
  1959. return __qistd319;return state->nil;
  1960. }
  1961. inline static qi_list_t *__qistd317(qi_state_t *state) {
  1962. qi_list_t *list = qi_list_make_n(2);
  1963. qi_list_data(list, 0) = qi_make_function(state, "<anon>", 2, __qistd318, NULL);
  1964. qi_list_data(list, 1) = qi_get(state, "l");
  1965. return list;
  1966. }
  1967. qi_value_t *__qistd315(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
  1968. qi_decl(state, "l", qi_list_index(pargs, 0));
  1969. qi_value_t *__qistd316 = qi_call(state, qi_get(state, "reduce"), __qistd317(state));
  1970. return __qistd316;return state->nil;
  1971. }
  1972. qi_value_t *__qistd323(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
  1973. qi_decl(state, "x", qi_list_index(pargs, 0));
  1974. qi_decl(state, "y", qi_list_index(pargs, 1));
  1975. qi_value_t *__qistd324 = qi_or(state, qi_get(state, "x"), qi_get(state, "y"));
  1976. return __qistd324;return state->nil;
  1977. }
  1978. inline static qi_list_t *__qistd322(qi_state_t *state) {
  1979. qi_list_t *list = qi_list_make_n(2);
  1980. qi_list_data(list, 0) = qi_make_function(state, "<anon>", 2, __qistd323, NULL);
  1981. qi_list_data(list, 1) = qi_get(state, "l");
  1982. return list;
  1983. }
  1984. qi_value_t *__qistd320(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
  1985. qi_decl(state, "l", qi_list_index(pargs, 0));
  1986. qi_value_t *__qistd321 = qi_call(state, qi_get(state, "reduce"), __qistd322(state));
  1987. return __qistd321;return state->nil;
  1988. }
  1989. inline static qi_list_t *__qistd326(qi_state_t *state) {
  1990. qi_list_t *list = qi_list_make_n(1);
  1991. qi_list_data(list, 0) = qi_get(state, "f");
  1992. return list;
  1993. }
  1994. inline static qi_list_t *__qistd328(qi_state_t *state) {
  1995. qi_list_t *list = qi_list_make_n(1);
  1996. qi_list_data(list, 0) = qi_get(state, "f");
  1997. return list;
  1998. }
  1999. inline static qi_list_t *__qistd327(qi_state_t *state) {
  2000. qi_list_t *list = qi_list_make_n(1);
  2001. qi_list_data(list, 0) = qi_add(state, qi_make_string(state, "expected first argument to be: function, but got: "), qi_call(state, qi_get(state, "type"), __qistd328(state)));
  2002. return list;
  2003. }
  2004. inline static qi_list_t *__qistd329(qi_state_t *state) {
  2005. qi_list_t *list = qi_list_make_n(1);
  2006. qi_list_data(list, 0) = qi_get(state, "xs");
  2007. return list;
  2008. }
  2009. inline static qi_list_t *__qistd330(qi_state_t *state) {
  2010. qi_list_t *list = qi_list_make_n(4);
  2011. qi_list_data(list, 0) = qi_make_string(state, "list");
  2012. qi_list_data(list, 1) = qi_make_string(state, "tuple");
  2013. qi_list_data(list, 2) = qi_make_string(state, "string");
  2014. qi_list_data(list, 3) = qi_make_string(state, "bytes");
  2015. return list;
  2016. }
  2017. inline static qi_list_t *__qistd332(qi_state_t *state) {
  2018. qi_list_t *list = qi_list_make_n(1);
  2019. qi_list_data(list, 0) = qi_get(state, "xs");
  2020. return list;
  2021. }
  2022. inline static qi_list_t *__qistd331(qi_state_t *state) {
  2023. qi_list_t *list = qi_list_make_n(1);
  2024. qi_list_data(list, 0) = qi_add(state, qi_make_string(state, "expected second argument to be: list, tuple, string or bytes, but got: "), qi_call(state, qi_get(state, "type"), __qistd332(state)));
  2025. return list;
  2026. }
  2027. inline static qi_list_t *__qistd333(qi_state_t *state) {
  2028. qi_list_t *list = qi_list_make_n(1);
  2029. qi_list_data(list, 0) = qi_get(state, "xs");
  2030. return list;
  2031. }
  2032. inline static qi_list_t *__qistd338(qi_state_t *state) {
  2033. qi_list_t *list = qi_list_make_n(1);
  2034. qi_list_data(list, 0) = qi_get(state, "x");
  2035. return list;
  2036. }
  2037. inline static qi_list_t *__qistd337(qi_state_t *state) {
  2038. qi_list_t *list = qi_list_make_n(2);
  2039. qi_list_data(list, 0) = qi_get(state, "r");
  2040. qi_list_data(list, 1) = qi_call(state, qi_get(state, "f"), __qistd338(state));
  2041. return list;
  2042. }
  2043. inline static qi_list_t *__qistd339(qi_state_t *state) {
  2044. qi_list_t *list = qi_list_make_n(1);
  2045. qi_list_data(list, 0) = qi_get(state, "xs");
  2046. return list;
  2047. }
  2048. inline static qi_list_t *__qistd341(qi_state_t *state) {
  2049. qi_list_t *list = qi_list_make_n(1);
  2050. qi_list_data(list, 0) = qi_get(state, "r");
  2051. return list;
  2052. }
  2053. inline static qi_list_t *__qistd342(qi_state_t *state) {
  2054. qi_list_t *list = qi_list_make_n(1);
  2055. qi_list_data(list, 0) = qi_get(state, "xs");
  2056. return list;
  2057. }
  2058. inline static qi_list_t *__qistd344(qi_state_t *state) {
  2059. qi_list_t *list = qi_list_make_n(1);
  2060. qi_list_data(list, 0) = qi_get(state, "r");
  2061. return list;
  2062. }
  2063. inline static qi_list_t *__qistd345(qi_state_t *state) {
  2064. qi_list_t *list = qi_list_make_n(1);
  2065. qi_list_data(list, 0) = qi_get(state, "xs");
  2066. return list;
  2067. }
  2068. inline static qi_list_t *__qistd347(qi_state_t *state) {
  2069. qi_list_t *list = qi_list_make_n(1);
  2070. qi_list_data(list, 0) = qi_get(state, "r");
  2071. return list;
  2072. }
  2073. qi_value_t *__qistd325(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
  2074. qi_decl(state, "f", qi_list_index(pargs, 0));
  2075. qi_decl(state, "xs", qi_list_index(pargs, 1));
  2076. qi_new_scope(state);
  2077. if (_qi_truthy(state, qi_not_equals(state, qi_call(state, qi_get(state, "type"), __qistd326(state)), qi_make_string(state, "function")))) {
  2078. qi_throw(state, qi_call(state, qi_get(state, "TypeError"), __qistd327(state)));}
  2079. qi_old_scope(state);
  2080. qi_new_scope(state);
  2081. if (_qi_truthy(state, qi_not_in(state, qi_call(state, qi_get(state, "type"), __qistd329(state)), qi_make_tuple(state, __qistd330(state))))) {
  2082. qi_throw(state, qi_call(state, qi_get(state, "TypeError"), __qistd331(state)));}
  2083. qi_old_scope(state);
  2084. qi_new_scope(state);
  2085. if (_qi_truthy(state, qi_equals(state, qi_call(state, qi_get(state, "len"), __qistd333(state)), qi_make_number(state, 0)))) {
  2086. qi_value_t *__qistd334 = qi_get(state, "xs");
  2087. qi_old_scope(state);
  2088. return __qistd334;}
  2089. qi_old_scope(state);
  2090. qi_decl(state, "r", qi_make_list(state, NULL));
  2091. qi_new_scope(state);
  2092. qi_value_t *__qistd336 = qi_iter(state, qi_get(state, "xs"));
  2093. qi_decl(state, "x", state->nil);
  2094. while (!qi_iter_end(state, __qistd336)) {
  2095. qi_value_t *el = qi_iter_next(state, __qistd336);
  2096. qi_set(state, false, "x", el);
  2097. qi_new_scope(state);
  2098. (void)(qi_call(state, qi_get(state, "list_push"), __qistd337(state)));__continue335:;
  2099. qi_old_scope(state);
  2100. }
  2101. goto __exit335;
  2102. __break335:;
  2103. qi_old_scope(state);
  2104. __exit335:;
  2105. qi_old_scope(state);
  2106. qi_new_scope(state);
  2107. if (_qi_truthy(state, qi_equals(state, qi_call(state, qi_get(state, "type"), __qistd339(state)), qi_make_string(state, "tuple")))) {
  2108. qi_value_t *__qistd340 = qi_call(state, qi_get(state, "tuple"), __qistd341(state));
  2109. qi_old_scope(state);
  2110. return __qistd340;} else {
  2111. qi_new_scope(state);
  2112. if (_qi_truthy(state, qi_equals(state, qi_call(state, qi_get(state, "type"), __qistd342(state)), qi_make_string(state, "string")))) {
  2113. qi_value_t *__qistd343 = qi_call(state, qi_get(state, "list_join"), __qistd344(state));
  2114. qi_old_scope(state);
  2115. qi_old_scope(state);
  2116. return __qistd343;} else {
  2117. qi_new_scope(state);
  2118. if (_qi_truthy(state, qi_equals(state, qi_call(state, qi_get(state, "type"), __qistd345(state)), qi_make_string(state, "bytes")))) {
  2119. qi_value_t *__qistd346 = qi_call(state, qi_get(state, "bytes"), __qistd347(state));
  2120. qi_old_scope(state);
  2121. qi_old_scope(state);
  2122. qi_old_scope(state);
  2123. return __qistd346;}
  2124. qi_old_scope(state);
  2125. }
  2126. qi_old_scope(state);
  2127. }
  2128. qi_old_scope(state);
  2129. qi_value_t *__qistd348 = qi_get(state, "r");
  2130. return __qistd348;
  2131. return state->nil;
  2132. }
  2133. inline static qi_list_t *__qistd350(qi_state_t *state) {
  2134. qi_list_t *list = qi_list_make_n(1);
  2135. qi_list_data(list, 0) = qi_get(state, "f");
  2136. return list;
  2137. }
  2138. inline static qi_list_t *__qistd352(qi_state_t *state) {
  2139. qi_list_t *list = qi_list_make_n(1);
  2140. qi_list_data(list, 0) = qi_get(state, "f");
  2141. return list;
  2142. }
  2143. inline static qi_list_t *__qistd351(qi_state_t *state) {
  2144. qi_list_t *list = qi_list_make_n(1);
  2145. qi_list_data(list, 0) = qi_add(state, qi_make_string(state, "expected first argument to be: function, but got: "), qi_call(state, qi_get(state, "type"), __qistd352(state)));
  2146. return list;
  2147. }
  2148. inline static qi_list_t *__qistd353(qi_state_t *state) {
  2149. qi_list_t *list = qi_list_make_n(1);
  2150. qi_list_data(list, 0) = qi_get(state, "xs");
  2151. return list;
  2152. }
  2153. inline static qi_list_t *__qistd354(qi_state_t *state) {
  2154. qi_list_t *list = qi_list_make_n(4);
  2155. qi_list_data(list, 0) = qi_make_string(state, "list");
  2156. qi_list_data(list, 1) = qi_make_string(state, "tuple");
  2157. qi_list_data(list, 2) = qi_make_string(state, "string");
  2158. qi_list_data(list, 3) = qi_make_string(state, "bytes");
  2159. return list;
  2160. }
  2161. inline static qi_list_t *__qistd356(qi_state_t *state) {
  2162. qi_list_t *list = qi_list_make_n(1);
  2163. qi_list_data(list, 0) = qi_get(state, "xs");
  2164. return list;
  2165. }
  2166. inline static qi_list_t *__qistd355(qi_state_t *state) {
  2167. qi_list_t *list = qi_list_make_n(1);
  2168. qi_list_data(list, 0) = qi_add(state, qi_make_string(state, "expected second argument to be: list, tuple, string or bytes, but got: "), qi_call(state, qi_get(state, "type"), __qistd356(state)));
  2169. return list;
  2170. }
  2171. inline static qi_list_t *__qistd357(qi_state_t *state) {
  2172. qi_list_t *list = qi_list_make_n(1);
  2173. qi_list_data(list, 0) = qi_get(state, "xs");
  2174. return list;
  2175. }
  2176. inline static qi_list_t *__qistd361(qi_state_t *state) {
  2177. qi_list_t *list = qi_list_make_n(1);
  2178. qi_list_data(list, 0) = qi_get(state, "x");
  2179. return list;
  2180. }
  2181. inline static qi_list_t *__qistd362(qi_state_t *state) {
  2182. qi_list_t *list = qi_list_make_n(2);
  2183. qi_list_data(list, 0) = qi_get(state, "r");
  2184. qi_list_data(list, 1) = qi_get(state, "x");
  2185. return list;
  2186. }
  2187. inline static qi_list_t *__qistd363(qi_state_t *state) {
  2188. qi_list_t *list = qi_list_make_n(1);
  2189. qi_list_data(list, 0) = qi_get(state, "xs");
  2190. return list;
  2191. }
  2192. inline static qi_list_t *__qistd365(qi_state_t *state) {
  2193. qi_list_t *list = qi_list_make_n(1);
  2194. qi_list_data(list, 0) = qi_get(state, "r");
  2195. return list;
  2196. }
  2197. inline static qi_list_t *__qistd366(qi_state_t *state) {
  2198. qi_list_t *list = qi_list_make_n(1);
  2199. qi_list_data(list, 0) = qi_get(state, "xs");
  2200. return list;
  2201. }
  2202. inline static qi_list_t *__qistd368(qi_state_t *state) {
  2203. qi_list_t *list = qi_list_make_n(1);
  2204. qi_list_data(list, 0) = qi_get(state, "r");
  2205. return list;
  2206. }
  2207. inline static qi_list_t *__qistd369(qi_state_t *state) {
  2208. qi_list_t *list = qi_list_make_n(1);
  2209. qi_list_data(list, 0) = qi_get(state, "xs");
  2210. return list;
  2211. }
  2212. inline static qi_list_t *__qistd371(qi_state_t *state) {
  2213. qi_list_t *list = qi_list_make_n(1);
  2214. qi_list_data(list, 0) = qi_get(state, "r");
  2215. return list;
  2216. }
  2217. qi_value_t *__qistd349(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
  2218. qi_decl(state, "f", qi_list_index(pargs, 0));
  2219. qi_decl(state, "xs", qi_list_index(pargs, 1));
  2220. qi_new_scope(state);
  2221. if (_qi_truthy(state, qi_not_equals(state, qi_call(state, qi_get(state, "type"), __qistd350(state)), qi_make_string(state, "function")))) {
  2222. qi_throw(state, qi_call(state, qi_get(state, "TypeError"), __qistd351(state)));}
  2223. qi_old_scope(state);
  2224. qi_new_scope(state);
  2225. if (_qi_truthy(state, qi_not_in(state, qi_call(state, qi_get(state, "type"), __qistd353(state)), qi_make_tuple(state, __qistd354(state))))) {
  2226. qi_throw(state, qi_call(state, qi_get(state, "TypeError"), __qistd355(state)));}
  2227. qi_old_scope(state);
  2228. qi_new_scope(state);
  2229. if (_qi_truthy(state, qi_equals(state, qi_call(state, qi_get(state, "len"), __qistd357(state)), qi_make_number(state, 0)))) {
  2230. qi_value_t *__qistd358 = qi_get(state, "xs");
  2231. qi_old_scope(state);
  2232. return __qistd358;}
  2233. qi_old_scope(state);
  2234. qi_decl(state, "r", qi_make_list(state, NULL));
  2235. qi_new_scope(state);
  2236. qi_value_t *__qistd360 = qi_iter(state, qi_get(state, "xs"));
  2237. qi_decl(state, "x", state->nil);
  2238. while (!qi_iter_end(state, __qistd360)) {
  2239. qi_value_t *el = qi_iter_next(state, __qistd360);
  2240. qi_set(state, false, "x", el);
  2241. qi_new_scope(state);
  2242. qi_new_scope(state);
  2243. if (_qi_truthy(state, qi_call(state, qi_get(state, "f"), __qistd361(state)))) {
  2244. (void)(qi_call(state, qi_get(state, "list_push"), __qistd362(state)));}
  2245. qi_old_scope(state);
  2246. __continue359:;
  2247. qi_old_scope(state);
  2248. }
  2249. goto __exit359;
  2250. __break359:;
  2251. qi_old_scope(state);
  2252. __exit359:;
  2253. qi_old_scope(state);
  2254. qi_new_scope(state);
  2255. if (_qi_truthy(state, qi_equals(state, qi_call(state, qi_get(state, "type"), __qistd363(state)), qi_make_string(state, "tuple")))) {
  2256. qi_value_t *__qistd364 = qi_call(state, qi_get(state, "tuple"), __qistd365(state));
  2257. qi_old_scope(state);
  2258. return __qistd364;} else {
  2259. qi_new_scope(state);
  2260. if (_qi_truthy(state, qi_equals(state, qi_call(state, qi_get(state, "type"), __qistd366(state)), qi_make_string(state, "string")))) {
  2261. qi_value_t *__qistd367 = qi_call(state, qi_get(state, "list_join"), __qistd368(state));
  2262. qi_old_scope(state);
  2263. qi_old_scope(state);
  2264. return __qistd367;} else {
  2265. qi_new_scope(state);
  2266. if (_qi_truthy(state, qi_equals(state, qi_call(state, qi_get(state, "type"), __qistd369(state)), qi_make_string(state, "bytes")))) {
  2267. qi_value_t *__qistd370 = qi_call(state, qi_get(state, "bytes"), __qistd371(state));
  2268. qi_old_scope(state);
  2269. qi_old_scope(state);
  2270. qi_old_scope(state);
  2271. return __qistd370;}
  2272. qi_old_scope(state);
  2273. }
  2274. qi_old_scope(state);
  2275. }
  2276. qi_old_scope(state);
  2277. qi_value_t *__qistd372 = qi_get(state, "r");
  2278. return __qistd372;
  2279. return state->nil;
  2280. }
  2281. inline static qi_list_t *__qistd375(qi_state_t *state) {
  2282. qi_list_t *list = qi_list_make_n(1);
  2283. qi_list_data(list, 0) = qi_get(state, "s");
  2284. return list;
  2285. }
  2286. inline static qi_list_t *__qistd377(qi_state_t *state) {
  2287. qi_list_t *list = qi_list_make_n(1);
  2288. qi_list_data(list, 0) = qi_get(state, "s");
  2289. return list;
  2290. }
  2291. inline static qi_list_t *__qistd376(qi_state_t *state) {
  2292. qi_list_t *list = qi_list_make_n(1);
  2293. qi_list_data(list, 0) = qi_add(state, qi_make_string(state, "expected first argument to be: string, but got: "), qi_call(state, qi_get(state, "type"), __qistd377(state)));
  2294. return list;
  2295. }
  2296. inline static qi_list_t *__qistd378(qi_state_t *state) {
  2297. qi_list_t *list = qi_list_make_n(1);
  2298. qi_list_data(list, 0) = qi_get(state, "w");
  2299. return list;
  2300. }
  2301. inline static qi_list_t *__qistd380(qi_state_t *state) {
  2302. qi_list_t *list = qi_list_make_n(1);
  2303. qi_list_data(list, 0) = qi_get(state, "w");
  2304. return list;
  2305. }
  2306. inline static qi_list_t *__qistd379(qi_state_t *state) {
  2307. qi_list_t *list = qi_list_make_n(1);
  2308. qi_list_data(list, 0) = qi_add(state, qi_make_string(state, "expected second argument to be: string, but got: "), qi_call(state, qi_get(state, "type"), __qistd380(state)));
  2309. return list;
  2310. }
  2311. inline static qi_list_t *__qistd382(qi_state_t *state) {
  2312. qi_list_t *list = qi_list_make_n(1);
  2313. qi_list_data(list, 0) = qi_get(state, "s");
  2314. return list;
  2315. }
  2316. inline static qi_list_t *__qistd383(qi_state_t *state) {
  2317. qi_list_t *list = qi_list_make_n(1);
  2318. qi_list_data(list, 0) = qi_get(state, "w");
  2319. return list;
  2320. }
  2321. inline static qi_list_t *__qistd386(qi_state_t *state) {
  2322. qi_list_t *list = qi_list_make_n(1);
  2323. qi_list_data(list, 0) = qi_get(state, "w");
  2324. return list;
  2325. }
  2326. inline static qi_list_t *__qistd385(qi_state_t *state) {
  2327. qi_list_t *list = qi_list_make_n(3);
  2328. qi_list_data(list, 0) = qi_get(state, "s");
  2329. qi_list_data(list, 1) = qi_get(state, "i");
  2330. qi_list_data(list, 2) = qi_sub(state, qi_add(state, qi_get(state, "i"), qi_call(state, qi_get(state, "len"), __qistd386(state))), qi_make_number(state, 1));
  2331. return list;
  2332. }
  2333. qi_value_t *__qistd373(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
  2334. qi_decl(state, "s", qi_list_index(pargs, 0));
  2335. qi_decl(state, "w", qi_list_index(pargs, 1));
  2336. qi_new_scope(state);
  2337. if (_qi_truthy(state, qi_or(state, qi_equals(state, qi_get(state, "s"), state->empty_string), qi_equals(state, qi_get(state, "w"), state->empty_string)))) {
  2338. qi_value_t *__qistd374 = qi_negate(state, qi_make_number(state, 1));
  2339. qi_old_scope(state);
  2340. return __qistd374;}
  2341. qi_old_scope(state);
  2342. qi_new_scope(state);
  2343. if (_qi_truthy(state, qi_not_equals(state, qi_call(state, qi_get(state, "type"), __qistd375(state)), qi_make_string(state, "string")))) {
  2344. qi_throw(state, qi_call(state, qi_get(state, "TypeError"), __qistd376(state)));}
  2345. qi_old_scope(state);
  2346. qi_new_scope(state);
  2347. if (_qi_truthy(state, qi_not_equals(state, qi_call(state, qi_get(state, "type"), __qistd378(state)), qi_make_string(state, "string")))) {
  2348. qi_throw(state, qi_call(state, qi_get(state, "TypeError"), __qistd379(state)));}
  2349. qi_old_scope(state);
  2350. qi_new_scope(state);
  2351. qi_decl(state, "i", qi_make_number(state, 0));
  2352. while (_qi_truthy(state, qi_lt(state, qi_get(state, "i"), qi_call(state, qi_get(state, "len"), __qistd382(state))))) {
  2353. qi_new_scope(state);
  2354. qi_new_scope(state);
  2355. if (_qi_truthy(state, qi_and(state, qi_equals(state, qi_call(state, qi_get(state, "len"), __qistd383(state)), qi_make_number(state, 1)), qi_equals(state, qi_index(state, qi_get(state, "s"), qi_get(state, "i")), qi_get(state, "w"))))) {
  2356. qi_value_t *__qistd384 = qi_get(state, "i");
  2357. qi_old_scope(state);
  2358. qi_old_scope(state);
  2359. qi_old_scope(state);
  2360. return __qistd384;} else {
  2361. qi_new_scope(state);
  2362. if (_qi_truthy(state, qi_equals(state, qi_call(state, qi_get(state, "slice"), __qistd385(state)), qi_get(state, "w")))) {
  2363. qi_value_t *__qistd387 = qi_get(state, "i");
  2364. qi_old_scope(state);
  2365. qi_old_scope(state);
  2366. qi_old_scope(state);
  2367. qi_old_scope(state);
  2368. return __qistd387;}
  2369. qi_old_scope(state);
  2370. }
  2371. qi_old_scope(state);
  2372. __continue381:;
  2373. qi_set(state, false, "i", qi_add(state, qi_get(state, "i"), state->one));
  2374. qi_old_scope(state);
  2375. }
  2376. goto __exit381;
  2377. __break381:;
  2378. qi_old_scope(state);
  2379. __exit381:;
  2380. qi_old_scope(state);
  2381. qi_value_t *__qistd388 = qi_negate(state, qi_make_number(state, 1));
  2382. return __qistd388;
  2383. return state->nil;
  2384. }
  2385. inline static qi_list_t *__qistd390(qi_state_t *state) {
  2386. qi_list_t *list = qi_list_make_n(1);
  2387. qi_list_data(list, 0) = qi_get(state, "s");
  2388. return list;
  2389. }
  2390. inline static qi_list_t *__qistd392(qi_state_t *state) {
  2391. qi_list_t *list = qi_list_make_n(1);
  2392. qi_list_data(list, 0) = qi_get(state, "s");
  2393. return list;
  2394. }
  2395. inline static qi_list_t *__qistd391(qi_state_t *state) {
  2396. qi_list_t *list = qi_list_make_n(1);
  2397. qi_list_data(list, 0) = qi_add(state, qi_make_string(state, "expected first argument to be: string, but got: "), qi_call(state, qi_get(state, "type"), __qistd392(state)));
  2398. return list;
  2399. }
  2400. inline static qi_list_t *__qistd393(qi_state_t *state) {
  2401. qi_list_t *list = qi_list_make_n(1);
  2402. qi_list_data(list, 0) = qi_get(state, "cs");
  2403. return list;
  2404. }
  2405. inline static qi_list_t *__qistd395(qi_state_t *state) {
  2406. qi_list_t *list = qi_list_make_n(1);
  2407. qi_list_data(list, 0) = qi_get(state, "cs");
  2408. return list;
  2409. }
  2410. inline static qi_list_t *__qistd394(qi_state_t *state) {
  2411. qi_list_t *list = qi_list_make_n(1);
  2412. qi_list_data(list, 0) = qi_add(state, qi_make_string(state, "expected second argument to be: string, but got: "), qi_call(state, qi_get(state, "type"), __qistd395(state)));
  2413. return list;
  2414. }
  2415. inline static qi_list_t *__qistd398(qi_state_t *state) {
  2416. qi_list_t *list = qi_list_make_n(1);
  2417. qi_list_data(list, 0) = qi_get(state, "s");
  2418. return list;
  2419. }
  2420. inline static qi_list_t *__qistd400(qi_state_t *state) {
  2421. qi_list_t *list = qi_list_make_n(2);
  2422. qi_list_data(list, 0) = qi_get(state, "s");
  2423. qi_list_data(list, 1) = qi_get(state, "i");
  2424. return list;
  2425. }
  2426. qi_value_t *__qistd389(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
  2427. qi_decl(state, "s", qi_list_index(pargs, 0));
  2428. qi_decl(state, "cs", pargc >= 2? qi_list_index(pargs, 1): qi_make_string(state, " \t\n\r\x0b\x0c"));
  2429. qi_new_scope(state);
  2430. if (_qi_truthy(state, qi_not_equals(state, qi_call(state, qi_get(state, "type"), __qistd390(state)), qi_make_string(state, "string")))) {
  2431. qi_throw(state, qi_call(state, qi_get(state, "TypeError"), __qistd391(state)));}
  2432. qi_old_scope(state);
  2433. qi_new_scope(state);
  2434. if (_qi_truthy(state, qi_not_equals(state, qi_call(state, qi_get(state, "type"), __qistd393(state)), qi_make_string(state, "string")))) {
  2435. qi_throw(state, qi_call(state, qi_get(state, "TypeError"), __qistd394(state)));}
  2436. qi_old_scope(state);
  2437. qi_new_scope(state);
  2438. if (_qi_truthy(state, qi_equals(state, qi_get(state, "s"), state->empty_string))) {
  2439. qi_value_t *__qistd396 = qi_get(state, "s");
  2440. qi_old_scope(state);
  2441. return __qistd396;}
  2442. qi_old_scope(state);
  2443. qi_decl(state, "i", state->nil);
  2444. qi_new_scope(state);
  2445. (void)(qi_set(state, false, "i", qi_make_number(state, 0)));while (_qi_truthy(state, qi_and(state, qi_in(state, qi_index(state, qi_get(state, "s"), qi_get(state, "i")), qi_get(state, "cs")), qi_lt(state, qi_get(state, "i"), qi_call(state, qi_get(state, "len"), __qistd398(state)))))) {
  2446. qi_new_scope(state);
  2447. __continue397:;
  2448. qi_set(state, false, "i", qi_add(state, qi_get(state, "i"), state->one));
  2449. qi_old_scope(state);
  2450. }
  2451. goto __exit397;
  2452. __break397:;
  2453. qi_old_scope(state);
  2454. __exit397:;
  2455. qi_old_scope(state);
  2456. qi_value_t *__qistd399 = qi_call(state, qi_get(state, "slice"), __qistd400(state));
  2457. return __qistd399;
  2458. return state->nil;
  2459. }
  2460. inline static qi_list_t *__qistd402(qi_state_t *state) {
  2461. qi_list_t *list = qi_list_make_n(1);
  2462. qi_list_data(list, 0) = qi_get(state, "s");
  2463. return list;
  2464. }
  2465. inline static qi_list_t *__qistd404(qi_state_t *state) {
  2466. qi_list_t *list = qi_list_make_n(1);
  2467. qi_list_data(list, 0) = qi_get(state, "s");
  2468. return list;
  2469. }
  2470. inline static qi_list_t *__qistd403(qi_state_t *state) {
  2471. qi_list_t *list = qi_list_make_n(1);
  2472. qi_list_data(list, 0) = qi_add(state, qi_make_string(state, "expected first argument to be: string, but got: "), qi_call(state, qi_get(state, "type"), __qistd404(state)));
  2473. return list;
  2474. }
  2475. inline static qi_list_t *__qistd405(qi_state_t *state) {
  2476. qi_list_t *list = qi_list_make_n(1);
  2477. qi_list_data(list, 0) = qi_get(state, "cs");
  2478. return list;
  2479. }
  2480. inline static qi_list_t *__qistd407(qi_state_t *state) {
  2481. qi_list_t *list = qi_list_make_n(1);
  2482. qi_list_data(list, 0) = qi_get(state, "cs");
  2483. return list;
  2484. }
  2485. inline static qi_list_t *__qistd406(qi_state_t *state) {
  2486. qi_list_t *list = qi_list_make_n(1);
  2487. qi_list_data(list, 0) = qi_add(state, qi_make_string(state, "expected second argument to be: string, but got: "), qi_call(state, qi_get(state, "type"), __qistd407(state)));
  2488. return list;
  2489. }
  2490. inline static qi_list_t *__qistd410(qi_state_t *state) {
  2491. qi_list_t *list = qi_list_make_n(1);
  2492. qi_list_data(list, 0) = qi_get(state, "s");
  2493. return list;
  2494. }
  2495. inline static qi_list_t *__qistd413(qi_state_t *state) {
  2496. qi_list_t *list = qi_list_make_n(1);
  2497. qi_list_data(list, 0) = qi_get(state, "s");
  2498. return list;
  2499. }
  2500. inline static qi_list_t *__qistd412(qi_state_t *state) {
  2501. qi_list_t *list = qi_list_make_n(3);
  2502. qi_list_data(list, 0) = qi_get(state, "s");
  2503. qi_list_data(list, 1) = qi_make_number(state, 0);
  2504. qi_list_data(list, 2) = qi_sub(state, qi_sub(state, qi_call(state, qi_get(state, "len"), __qistd413(state)), qi_get(state, "k")), qi_make_number(state, 1));
  2505. return list;
  2506. }
  2507. qi_value_t *__qistd401(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
  2508. qi_decl(state, "s", qi_list_index(pargs, 0));
  2509. qi_decl(state, "cs", pargc >= 2? qi_list_index(pargs, 1): qi_make_string(state, " \t\n\r\x0b\x0c"));
  2510. qi_new_scope(state);
  2511. if (_qi_truthy(state, qi_not_equals(state, qi_call(state, qi_get(state, "type"), __qistd402(state)), qi_make_string(state, "string")))) {
  2512. qi_throw(state, qi_call(state, qi_get(state, "TypeError"), __qistd403(state)));}
  2513. qi_old_scope(state);
  2514. qi_new_scope(state);
  2515. if (_qi_truthy(state, qi_not_equals(state, qi_call(state, qi_get(state, "type"), __qistd405(state)), qi_make_string(state, "string")))) {
  2516. qi_throw(state, qi_call(state, qi_get(state, "TypeError"), __qistd406(state)));}
  2517. qi_old_scope(state);
  2518. qi_new_scope(state);
  2519. if (_qi_truthy(state, qi_equals(state, qi_get(state, "s"), state->empty_string))) {
  2520. qi_value_t *__qistd408 = qi_get(state, "s");
  2521. qi_old_scope(state);
  2522. return __qistd408;}
  2523. qi_old_scope(state);
  2524. qi_decl(state, "i", state->nil);
  2525. qi_decl(state, "k", state->nil);
  2526. qi_new_scope(state);
  2527. (void)((qi_set(state, false, "k", qi_make_number(state, 0)), qi_set(state, false, "i", qi_sub(state, qi_call(state, qi_get(state, "len"), __qistd410(state)), qi_make_number(state, 1)))));while (_qi_truthy(state, qi_and(state, qi_in(state, qi_index(state, qi_get(state, "s"), qi_get(state, "i")), qi_get(state, "cs")), qi_ge(state, qi_get(state, "i"), qi_make_number(state, 0))))) {
  2528. qi_new_scope(state);
  2529. (void)(qi_set(state, false, "i", qi_sub(state, qi_get(state, "i"), state->one)));__continue409:;
  2530. qi_set(state, false, "k", qi_add(state, qi_get(state, "k"), state->one));
  2531. qi_old_scope(state);
  2532. }
  2533. goto __exit409;
  2534. __break409:;
  2535. qi_old_scope(state);
  2536. __exit409:;
  2537. qi_old_scope(state);
  2538. qi_value_t *__qistd411 = qi_call(state, qi_get(state, "slice"), __qistd412(state));
  2539. return __qistd411;
  2540. return state->nil;
  2541. }
  2542. inline static qi_list_t *__qistd415(qi_state_t *state) {
  2543. qi_list_t *list = qi_list_make_n(1);
  2544. qi_list_data(list, 0) = qi_get(state, "s");
  2545. return list;
  2546. }
  2547. inline static qi_list_t *__qistd417(qi_state_t *state) {
  2548. qi_list_t *list = qi_list_make_n(1);
  2549. qi_list_data(list, 0) = qi_get(state, "s");
  2550. return list;
  2551. }
  2552. inline static qi_list_t *__qistd416(qi_state_t *state) {
  2553. qi_list_t *list = qi_list_make_n(1);
  2554. qi_list_data(list, 0) = qi_add(state, qi_make_string(state, "expected first argument to be: string, but got: "), qi_call(state, qi_get(state, "type"), __qistd417(state)));
  2555. return list;
  2556. }
  2557. inline static qi_list_t *__qistd418(qi_state_t *state) {
  2558. qi_list_t *list = qi_list_make_n(1);
  2559. qi_list_data(list, 0) = qi_get(state, "cs");
  2560. return list;
  2561. }
  2562. inline static qi_list_t *__qistd420(qi_state_t *state) {
  2563. qi_list_t *list = qi_list_make_n(1);
  2564. qi_list_data(list, 0) = qi_get(state, "cs");
  2565. return list;
  2566. }
  2567. inline static qi_list_t *__qistd419(qi_state_t *state) {
  2568. qi_list_t *list = qi_list_make_n(1);
  2569. qi_list_data(list, 0) = qi_add(state, qi_make_string(state, "expected second argument to be: string, but got: "), qi_call(state, qi_get(state, "type"), __qistd420(state)));
  2570. return list;
  2571. }
  2572. inline static qi_list_t *__qistd423(qi_state_t *state) {
  2573. qi_list_t *list = qi_list_make_n(2);
  2574. qi_list_data(list, 0) = qi_get(state, "s");
  2575. qi_list_data(list, 1) = qi_get(state, "cs");
  2576. return list;
  2577. }
  2578. inline static qi_list_t *__qistd422(qi_state_t *state) {
  2579. qi_list_t *list = qi_list_make_n(2);
  2580. qi_list_data(list, 0) = qi_call(state, qi_get(state, "str_rstrip"), __qistd423(state));
  2581. qi_list_data(list, 1) = qi_get(state, "cs");
  2582. return list;
  2583. }
  2584. qi_value_t *__qistd414(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
  2585. qi_decl(state, "s", qi_list_index(pargs, 0));
  2586. qi_decl(state, "cs", pargc >= 2? qi_list_index(pargs, 1): qi_make_string(state, " \t\n\r\x0b\x0c"));
  2587. qi_new_scope(state);
  2588. if (_qi_truthy(state, qi_not_equals(state, qi_call(state, qi_get(state, "type"), __qistd415(state)), qi_make_string(state, "string")))) {
  2589. qi_throw(state, qi_call(state, qi_get(state, "TypeError"), __qistd416(state)));}
  2590. qi_old_scope(state);
  2591. qi_new_scope(state);
  2592. if (_qi_truthy(state, qi_not_equals(state, qi_call(state, qi_get(state, "type"), __qistd418(state)), qi_make_string(state, "string")))) {
  2593. qi_throw(state, qi_call(state, qi_get(state, "TypeError"), __qistd419(state)));}
  2594. qi_old_scope(state);
  2595. qi_value_t *__qistd421 = qi_call(state, qi_get(state, "str_lstrip"), __qistd422(state));
  2596. return __qistd421;
  2597. return state->nil;
  2598. }
  2599. inline static qi_list_t *__qistd426(qi_state_t *state) {
  2600. qi_list_t *list = qi_list_make_n(2);
  2601. qi_list_data(list, 0) = qi_get(state, "len");
  2602. qi_list_data(list, 1) = qi_get(state, "arguments");
  2603. return list;
  2604. }
  2605. inline static qi_list_t *__qistd427(qi_state_t *state) {
  2606. qi_list_t *list = qi_list_make_n(2);
  2607. qi_list_data(list, 0) = qi_get(state, "min");
  2608. qi_list_data(list, 1) = qi_get(state, "l");
  2609. return list;
  2610. }
  2611. inline static qi_list_t *__qistd431(qi_state_t *state) {
  2612. qi_list_t *list = qi_list_make_n(2);
  2613. qi_list_data(list, 0) = qi_get(state, "t");
  2614. qi_list_data(list, 1) = qi_index(state, qi_get(state, "xs"), qi_get(state, "i"));
  2615. return list;
  2616. }
  2617. inline static qi_list_t *__qistd432(qi_state_t *state) {
  2618. qi_list_t *list = qi_list_make_n(2);
  2619. qi_list_data(list, 0) = qi_get(state, "r");
  2620. qi_list_data(list, 1) = qi_get(state, "t");
  2621. return list;
  2622. }
  2623. qi_value_t *__qistd424(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
  2624. qi_new_scope(state);
  2625. if (_qi_truthy(state, qi_not(state, qi_get(state, "arguments")))) {
  2626. qi_value_t *__qistd425 = qi_make_list(state, NULL);
  2627. qi_old_scope(state);
  2628. return __qistd425;}
  2629. qi_old_scope(state);
  2630. qi_decl(state, "l", qi_call(state, qi_get(state, "map"), __qistd426(state)));
  2631. (void)(qi_set(state, false, "l", qi_call(state, qi_get(state, "reduce"), __qistd427(state))));
  2632. qi_decl(state, "r", qi_make_list(state, NULL));
  2633. qi_new_scope(state);
  2634. qi_decl(state, "i", qi_make_number(state, 0));
  2635. while (_qi_truthy(state, qi_lt(state, qi_get(state, "i"), qi_get(state, "l")))) {
  2636. qi_new_scope(state);
  2637. qi_decl(state, "t", qi_make_list(state, NULL));
  2638. qi_new_scope(state);
  2639. qi_value_t *__qistd430 = qi_iter(state, qi_get(state, "arguments"));
  2640. qi_decl(state, "xs", state->nil);
  2641. while (!qi_iter_end(state, __qistd430)) {
  2642. qi_value_t *el = qi_iter_next(state, __qistd430);
  2643. qi_set(state, false, "xs", el);
  2644. qi_new_scope(state);
  2645. (void)(qi_call(state, qi_get(state, "list_push"), __qistd431(state)));__continue429:;
  2646. qi_old_scope(state);
  2647. }
  2648. goto __exit429;
  2649. __break429:;
  2650. qi_old_scope(state);
  2651. __exit429:;
  2652. qi_old_scope(state);
  2653. (void)(qi_call(state, qi_get(state, "list_push"), __qistd432(state)));
  2654. __continue428:;
  2655. qi_set(state, false, "i", qi_add(state, qi_get(state, "i"), state->one));
  2656. qi_old_scope(state);
  2657. }
  2658. goto __exit428;
  2659. __break428:;
  2660. qi_old_scope(state);
  2661. __exit428:;
  2662. qi_old_scope(state);
  2663. qi_value_t *__qistd433 = qi_get(state, "r");
  2664. return __qistd433;
  2665. return state->nil;
  2666. }
  2667. inline static qi_list_t *__qistd435(qi_state_t *state) {
  2668. qi_list_t *list = qi_list_make_n(1);
  2669. qi_list_data(list, 0) = qi_get(state, "l");
  2670. return list;
  2671. }
  2672. inline static qi_list_t *__qistd438(qi_state_t *state) {
  2673. qi_list_t *list = qi_list_make_n(1);
  2674. qi_list_data(list, 0) = qi_get(state, "l");
  2675. return list;
  2676. }
  2677. inline static qi_list_t *__qistd439(qi_state_t *state) {
  2678. qi_list_t *list = qi_list_make_n(1);
  2679. qi_list_data(list, 0) = qi_get(state, "l");
  2680. return list;
  2681. }
  2682. inline static qi_list_t *__qistd437(qi_state_t *state) {
  2683. qi_list_t *list = qi_list_make_n(2);
  2684. qi_list_data(list, 0) = qi_call(state, qi_get(state, "table_keys"), __qistd438(state));
  2685. qi_list_data(list, 1) = qi_call(state, qi_get(state, "table_values"), __qistd439(state));
  2686. return list;
  2687. }
  2688. inline static qi_list_t *__qistd443(qi_state_t *state) {
  2689. qi_list_t *list = qi_list_make_n(1);
  2690. qi_list_data(list, 0) = qi_get(state, "l");
  2691. return list;
  2692. }
  2693. inline static qi_list_t *__qistd442(qi_state_t *state) {
  2694. qi_list_t *list = qi_list_make_n(1);
  2695. qi_list_data(list, 0) = qi_call(state, qi_get(state, "len"), __qistd443(state));
  2696. return list;
  2697. }
  2698. inline static qi_list_t *__qistd441(qi_state_t *state) {
  2699. qi_list_t *list = qi_list_make_n(2);
  2700. qi_list_data(list, 0) = qi_call(state, qi_get(state, "range"), __qistd442(state));
  2701. qi_list_data(list, 1) = qi_get(state, "l");
  2702. return list;
  2703. }
  2704. qi_value_t *__qistd434(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
  2705. qi_decl(state, "l", qi_list_index(pargs, 0));
  2706. qi_new_scope(state);
  2707. if (_qi_truthy(state, qi_equals(state, qi_call(state, qi_get(state, "type"), __qistd435(state)), qi_make_string(state, "table")))) {
  2708. qi_value_t *__qistd436 = qi_call(state, qi_get(state, "zip"), __qistd437(state));
  2709. qi_old_scope(state);
  2710. return __qistd436;} else {
  2711. qi_value_t *__qistd440 = qi_call(state, qi_get(state, "zip"), __qistd441(state));
  2712. qi_old_scope(state);
  2713. return __qistd440;}
  2714. qi_old_scope(state);
  2715. return state->nil;
  2716. }
  2717. inline static qi_list_t *__qistd445(qi_state_t *state) {
  2718. qi_list_t *list = qi_list_make_n(1);
  2719. qi_list_data(list, 0) = qi_get(state, "s");
  2720. return list;
  2721. }
  2722. inline static qi_list_t *__qistd447(qi_state_t *state) {
  2723. qi_list_t *list = qi_list_make_n(1);
  2724. qi_list_data(list, 0) = qi_get(state, "c");
  2725. return list;
  2726. }
  2727. inline static qi_list_t *__qistd446(qi_state_t *state) {
  2728. qi_list_t *list = qi_list_make_n(1);
  2729. qi_list_data(list, 0) = qi_add(state, qi_make_string(state, "expected first argument to be: string, but got: "), qi_call(state, qi_get(state, "type"), __qistd447(state)));
  2730. return list;
  2731. }
  2732. inline static qi_list_t *__qistd453(qi_state_t *state) {
  2733. qi_list_t *list = qi_list_make_n(1);
  2734. qi_list_data(list, 0) = qi_get(state, "c");
  2735. return list;
  2736. }
  2737. inline static qi_list_t *__qistd452(qi_state_t *state) {
  2738. qi_list_t *list = qi_list_make_n(1);
  2739. qi_list_data(list, 0) = qi_sub(state, qi_call(state, qi_get(state, "ord"), __qistd453(state)), qi_make_number(state, 32));
  2740. return list;
  2741. }
  2742. qi_value_t *__qistd450(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
  2743. qi_decl(state, "c", qi_list_index(pargs, 0));
  2744. qi_value_t *__qistd451 = (_qi_truthy(state, qi_and(state, qi_ge(state, qi_get(state, "c"), qi_make_string(state, "a")), qi_le(state, qi_get(state, "c"), qi_make_string(state, "z"))))? qi_call(state, qi_get(state, "chr"), __qistd452(state)): qi_get(state, "c"));
  2745. return __qistd451;return state->nil;
  2746. }
  2747. inline static qi_list_t *__qistd449(qi_state_t *state) {
  2748. qi_list_t *list = qi_list_make_n(2);
  2749. qi_list_data(list, 0) = qi_make_function(state, "<anon>", 1, __qistd450, NULL);
  2750. qi_list_data(list, 1) = qi_get(state, "s");
  2751. return list;
  2752. }
  2753. qi_value_t *__qistd444(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
  2754. qi_decl(state, "s", qi_list_index(pargs, 0));
  2755. qi_new_scope(state);
  2756. if (_qi_truthy(state, qi_not_equals(state, qi_call(state, qi_get(state, "type"), __qistd445(state)), qi_make_string(state, "string")))) {
  2757. qi_throw(state, qi_call(state, qi_get(state, "TypeError"), __qistd446(state)));}
  2758. qi_old_scope(state);
  2759. qi_value_t *__qistd448 = qi_call(state, qi_get(state, "map"), __qistd449(state));
  2760. return __qistd448;
  2761. return state->nil;
  2762. }
  2763. inline static qi_list_t *__qistd455(qi_state_t *state) {
  2764. qi_list_t *list = qi_list_make_n(1);
  2765. qi_list_data(list, 0) = qi_get(state, "s");
  2766. return list;
  2767. }
  2768. inline static qi_list_t *__qistd457(qi_state_t *state) {
  2769. qi_list_t *list = qi_list_make_n(1);
  2770. qi_list_data(list, 0) = qi_get(state, "c");
  2771. return list;
  2772. }
  2773. inline static qi_list_t *__qistd456(qi_state_t *state) {
  2774. qi_list_t *list = qi_list_make_n(1);
  2775. qi_list_data(list, 0) = qi_add(state, qi_make_string(state, "expected first argument to be: string, but got: "), qi_call(state, qi_get(state, "type"), __qistd457(state)));
  2776. return list;
  2777. }
  2778. inline static qi_list_t *__qistd463(qi_state_t *state) {
  2779. qi_list_t *list = qi_list_make_n(1);
  2780. qi_list_data(list, 0) = qi_get(state, "c");
  2781. return list;
  2782. }
  2783. inline static qi_list_t *__qistd462(qi_state_t *state) {
  2784. qi_list_t *list = qi_list_make_n(1);
  2785. qi_list_data(list, 0) = qi_add(state, qi_call(state, qi_get(state, "ord"), __qistd463(state)), qi_make_number(state, 32));
  2786. return list;
  2787. }
  2788. qi_value_t *__qistd460(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
  2789. qi_decl(state, "c", qi_list_index(pargs, 0));
  2790. qi_value_t *__qistd461 = (_qi_truthy(state, qi_and(state, qi_ge(state, qi_get(state, "c"), qi_make_string(state, "A")), qi_le(state, qi_get(state, "c"), qi_make_string(state, "Z"))))? qi_call(state, qi_get(state, "chr"), __qistd462(state)): qi_get(state, "c"));
  2791. return __qistd461;return state->nil;
  2792. }
  2793. inline static qi_list_t *__qistd459(qi_state_t *state) {
  2794. qi_list_t *list = qi_list_make_n(2);
  2795. qi_list_data(list, 0) = qi_make_function(state, "<anon>", 1, __qistd460, NULL);
  2796. qi_list_data(list, 1) = qi_get(state, "s");
  2797. return list;
  2798. }
  2799. qi_value_t *__qistd454(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
  2800. qi_decl(state, "s", qi_list_index(pargs, 0));
  2801. qi_new_scope(state);
  2802. if (_qi_truthy(state, qi_not_equals(state, qi_call(state, qi_get(state, "type"), __qistd455(state)), qi_make_string(state, "string")))) {
  2803. qi_throw(state, qi_call(state, qi_get(state, "TypeError"), __qistd456(state)));}
  2804. qi_old_scope(state);
  2805. qi_value_t *__qistd458 = qi_call(state, qi_get(state, "map"), __qistd459(state));
  2806. return __qistd458;
  2807. return state->nil;
  2808. }
  2809. inline static qi_list_t *__qistd465(qi_state_t *state) {
  2810. qi_list_t *list = qi_list_make_n(1);
  2811. qi_list_data(list, 0) = qi_get(state, "x");
  2812. return list;
  2813. }
  2814. inline static qi_list_t *__qistd467(qi_state_t *state) {
  2815. qi_list_t *list = qi_list_make_n(1);
  2816. qi_list_data(list, 0) = qi_get(state, "x");
  2817. return list;
  2818. }
  2819. inline static qi_list_t *__qistd466(qi_state_t *state) {
  2820. qi_list_t *list = qi_list_make_n(1);
  2821. qi_list_data(list, 0) = qi_add(state, qi_make_string(state, "expected first argument to be: number, but got: "), qi_call(state, qi_get(state, "type"), __qistd467(state)));
  2822. return list;
  2823. }
  2824. qi_value_t *__qistd464(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
  2825. qi_decl(state, "x", qi_list_index(pargs, 0));
  2826. qi_new_scope(state);
  2827. if (_qi_truthy(state, qi_not_equals(state, qi_call(state, qi_get(state, "type"), __qistd465(state)), qi_make_string(state, "number")))) {
  2828. qi_throw(state, qi_call(state, qi_get(state, "TypeError"), __qistd466(state)));}
  2829. qi_old_scope(state);
  2830. qi_new_scope(state);
  2831. if (_qi_truthy(state, qi_equals(state, qi_get(state, "x"), qi_make_number(state, 0)))) {
  2832. qi_value_t *__qistd468 = qi_make_string(state, "0x0");
  2833. qi_old_scope(state);
  2834. return __qistd468;}
  2835. qi_old_scope(state);
  2836. qi_decl_const(state, "sgn", qi_lt(state, qi_get(state, "x"), qi_make_number(state, 0)));
  2837. qi_new_scope(state);
  2838. if (_qi_truthy(state, qi_get(state, "sgn"))) {
  2839. (void)(qi_set(state, false, "x", qi_negate(state, qi_get(state, "x"))));}
  2840. qi_old_scope(state);
  2841. qi_decl(state, "r", state->empty_string);
  2842. qi_new_scope(state);
  2843. while (_qi_truthy(state, qi_gt(state, qi_get(state, "x"), qi_make_number(state, 0)))) {
  2844. qi_new_scope(state);
  2845. (void)(qi_set(state, false, "r", qi_add(state, qi_index(state, qi_make_string(state, "0123456789abcdef"), qi_mod(state, qi_get(state, "x"), qi_make_number(state, 16))), qi_get(state, "r"))));
  2846. (void)(qi_set(state, false, "x", qi_idiv(state, qi_get(state, "x"), qi_make_number(state, 16))));
  2847. __continue469:;
  2848. qi_old_scope(state);
  2849. }
  2850. goto __exit469;
  2851. __break469:;
  2852. qi_old_scope(state);
  2853. __exit469:;
  2854. qi_old_scope(state);
  2855. qi_value_t *__qistd470 = qi_add(state, (_qi_truthy(state, qi_get(state, "sgn"))? qi_make_string(state, "-0x"): qi_make_string(state, "0x")), qi_get(state, "r"));
  2856. return __qistd470;
  2857. return state->nil;
  2858. }
  2859. inline static qi_list_t *__qistd472(qi_state_t *state) {
  2860. qi_list_t *list = qi_list_make_n(1);
  2861. qi_list_data(list, 0) = qi_get(state, "x");
  2862. return list;
  2863. }
  2864. inline static qi_list_t *__qistd474(qi_state_t *state) {
  2865. qi_list_t *list = qi_list_make_n(1);
  2866. qi_list_data(list, 0) = qi_get(state, "x");
  2867. return list;
  2868. }
  2869. inline static qi_list_t *__qistd473(qi_state_t *state) {
  2870. qi_list_t *list = qi_list_make_n(1);
  2871. qi_list_data(list, 0) = qi_add(state, qi_make_string(state, "expected first argument to be: number, but got: "), qi_call(state, qi_get(state, "type"), __qistd474(state)));
  2872. return list;
  2873. }
  2874. qi_value_t *__qistd471(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
  2875. qi_decl(state, "x", qi_list_index(pargs, 0));
  2876. qi_new_scope(state);
  2877. if (_qi_truthy(state, qi_not_equals(state, qi_call(state, qi_get(state, "type"), __qistd472(state)), qi_make_string(state, "number")))) {
  2878. qi_throw(state, qi_call(state, qi_get(state, "TypeError"), __qistd473(state)));}
  2879. qi_old_scope(state);
  2880. qi_new_scope(state);
  2881. if (_qi_truthy(state, qi_equals(state, qi_get(state, "x"), qi_make_number(state, 0)))) {
  2882. qi_value_t *__qistd475 = qi_make_string(state, "0o0");
  2883. qi_old_scope(state);
  2884. return __qistd475;}
  2885. qi_old_scope(state);
  2886. qi_decl_const(state, "sgn", qi_lt(state, qi_get(state, "x"), qi_make_number(state, 0)));
  2887. qi_new_scope(state);
  2888. if (_qi_truthy(state, qi_get(state, "sgn"))) {
  2889. (void)(qi_set(state, false, "x", qi_negate(state, qi_get(state, "x"))));}
  2890. qi_old_scope(state);
  2891. qi_decl(state, "r", state->empty_string);
  2892. qi_new_scope(state);
  2893. while (_qi_truthy(state, qi_gt(state, qi_get(state, "x"), qi_make_number(state, 0)))) {
  2894. qi_new_scope(state);
  2895. (void)(qi_set(state, false, "r", qi_add(state, qi_index(state, qi_make_string(state, "01234567"), qi_mod(state, qi_get(state, "x"), qi_make_number(state, 8))), qi_get(state, "r"))));
  2896. (void)(qi_set(state, false, "x", qi_idiv(state, qi_get(state, "x"), qi_make_number(state, 8))));
  2897. __continue476:;
  2898. qi_old_scope(state);
  2899. }
  2900. goto __exit476;
  2901. __break476:;
  2902. qi_old_scope(state);
  2903. __exit476:;
  2904. qi_old_scope(state);
  2905. qi_value_t *__qistd477 = qi_add(state, (_qi_truthy(state, qi_get(state, "sgn"))? qi_make_string(state, "-0o"): qi_make_string(state, "0o")), qi_get(state, "r"));
  2906. return __qistd477;
  2907. return state->nil;
  2908. }
  2909. inline static qi_list_t *__qistd479(qi_state_t *state) {
  2910. qi_list_t *list = qi_list_make_n(1);
  2911. qi_list_data(list, 0) = qi_get(state, "s");
  2912. return list;
  2913. }
  2914. inline static qi_list_t *__qistd481(qi_state_t *state) {
  2915. qi_list_t *list = qi_list_make_n(1);
  2916. qi_list_data(list, 0) = qi_get(state, "s");
  2917. return list;
  2918. }
  2919. inline static qi_list_t *__qistd480(qi_state_t *state) {
  2920. qi_list_t *list = qi_list_make_n(1);
  2921. qi_list_data(list, 0) = qi_add(state, qi_make_string(state, "expected first argument to be: string, but got: "), qi_call(state, qi_get(state, "type"), __qistd481(state)));
  2922. return list;
  2923. }
  2924. inline static qi_list_t *__qistd483(qi_state_t *state) {
  2925. qi_list_t *list = qi_list_make_n(1);
  2926. qi_list_data(list, 0) = qi_get(state, "s");
  2927. return list;
  2928. }
  2929. inline static qi_list_t *__qistd487(qi_state_t *state) {
  2930. qi_list_t *list = qi_list_make_n(1);
  2931. qi_list_data(list, 0) = qi_get(state, "s");
  2932. return list;
  2933. }
  2934. inline static qi_list_t *__qistd488(qi_state_t *state) {
  2935. qi_list_t *list = qi_list_make_n(1);
  2936. qi_list_data(list, 0) = qi_index(state, qi_get(state, "arguments"), qi_set(state, false, "n", qi_add(state, qi_get(state, "n"), state->one)));
  2937. return list;
  2938. }
  2939. qi_value_t *__qistd478(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
  2940. qi_decl(state, "s", qi_list_index(pargs, 0));
  2941. qi_new_scope(state);
  2942. if (_qi_truthy(state, qi_not_equals(state, qi_call(state, qi_get(state, "type"), __qistd479(state)), qi_make_string(state, "string")))) {
  2943. qi_throw(state, qi_call(state, qi_get(state, "TypeError"), __qistd480(state)));}
  2944. qi_old_scope(state);
  2945. qi_decl(state, "r", state->empty_string);
  2946. qi_decl(state, "n", qi_make_number(state, 1));
  2947. qi_new_scope(state);
  2948. qi_decl(state, "i", qi_make_number(state, 0));
  2949. while (_qi_truthy(state, qi_lt(state, qi_get(state, "i"), qi_call(state, qi_get(state, "len"), __qistd483(state))))) {
  2950. qi_new_scope(state);
  2951. qi_new_scope(state);
  2952. qi_value_t *__qistd485 = qi_index(state, qi_get(state, "s"), qi_get(state, "i"));
  2953. if (_qi_equals(state, __qistd485, qi_make_string(state, "_"))) goto __qistd486;
  2954. goto __default484;
  2955. __qistd486:;
  2956. qi_new_scope(state);
  2957. if (_qi_truthy(state, qi_and(state, qi_lt(state, qi_add(state, qi_get(state, "i"), qi_make_number(state, 1)), qi_call(state, qi_get(state, "len"), __qistd487(state))), qi_equals(state, qi_index(state, qi_get(state, "s"), qi_add(state, qi_get(state, "i"), qi_make_number(state, 1))), qi_make_string(state, "_"))))) {
  2958. (void)(qi_set(state, false, "r", qi_add(state, qi_get(state, "r"), qi_make_string(state, "_"))));
  2959. (void)(qi_set(state, false, "i", qi_add(state, qi_get(state, "i"), state->one)));
  2960. qi_old_scope(state);
  2961. qi_old_scope(state);
  2962. goto __continue482;
  2963. }
  2964. qi_old_scope(state);
  2965. (void)(qi_set(state, false, "r", qi_add(state, qi_get(state, "r"), qi_call(state, qi_get(state, "repr"), __qistd488(state)))));
  2966. goto __break484;
  2967. __default484:;
  2968. (void)(qi_set(state, false, "r", qi_add(state, qi_get(state, "r"), qi_index(state, qi_get(state, "s"), qi_get(state, "i")))));
  2969. __break484:;
  2970. qi_old_scope(state);
  2971. __continue482:;
  2972. qi_set(state, false, "i", qi_add(state, qi_get(state, "i"), state->one));
  2973. qi_old_scope(state);
  2974. }
  2975. goto __exit482;
  2976. __break482:;
  2977. qi_old_scope(state);
  2978. __exit482:;
  2979. qi_old_scope(state);
  2980. qi_value_t *__qistd489 = qi_get(state, "r");
  2981. return __qistd489;
  2982. return state->nil;
  2983. }
  2984. inline static qi_list_t *__qistd491(qi_state_t *state) {
  2985. qi_list_t *list = qi_list_make_n(1);
  2986. qi_list_data(list, 0) = qi_get(state, "s");
  2987. return list;
  2988. }
  2989. inline static qi_list_t *__qistd493(qi_state_t *state) {
  2990. qi_list_t *list = qi_list_make_n(1);
  2991. qi_list_data(list, 0) = qi_get(state, "s");
  2992. return list;
  2993. }
  2994. inline static qi_list_t *__qistd492(qi_state_t *state) {
  2995. qi_list_t *list = qi_list_make_n(1);
  2996. qi_list_data(list, 0) = qi_add(state, qi_make_string(state, "expected first argument to be: string, but got: "), qi_call(state, qi_get(state, "type"), __qistd493(state)));
  2997. return list;
  2998. }
  2999. inline static qi_list_t *__qistd494(qi_state_t *state) {
  3000. qi_list_t *list = qi_list_make_n(1);
  3001. qi_list_data(list, 0) = qi_get(state, "l");
  3002. return list;
  3003. }
  3004. inline static qi_list_t *__qistd496(qi_state_t *state) {
  3005. qi_list_t *list = qi_list_make_n(1);
  3006. qi_list_data(list, 0) = qi_get(state, "l");
  3007. return list;
  3008. }
  3009. inline static qi_list_t *__qistd495(qi_state_t *state) {
  3010. qi_list_t *list = qi_list_make_n(1);
  3011. qi_list_data(list, 0) = qi_add(state, qi_make_string(state, "expected second argument to be: list, but got: "), qi_call(state, qi_get(state, "type"), __qistd496(state)));
  3012. return list;
  3013. }
  3014. inline static qi_list_t *__qistd499(qi_state_t *state) {
  3015. qi_list_t *list = qi_list_make_n(1);
  3016. qi_list_data(list, 0) = qi_get(state, "s");
  3017. return list;
  3018. }
  3019. inline static qi_list_t *__qistd498(qi_state_t *state) {
  3020. qi_list_t *list = qi_list_make_n(2);
  3021. qi_list_data(list, 0) = qi_get(state, "str_format");
  3022. qi_list_data(list, 1) = qi_add(state, qi_make_list(state, __qistd499(state)), qi_get(state, "l"));
  3023. return list;
  3024. }
  3025. qi_value_t *__qistd490(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
  3026. qi_decl(state, "l", qi_list_index(pargs, 1));
  3027. qi_decl(state, "s", qi_list_index(pargs, 0));
  3028. qi_new_scope(state);
  3029. if (_qi_truthy(state, qi_not_equals(state, qi_call(state, qi_get(state, "type"), __qistd491(state)), qi_make_string(state, "string")))) {
  3030. qi_throw(state, qi_call(state, qi_get(state, "TypeError"), __qistd492(state)));}
  3031. qi_old_scope(state);
  3032. qi_new_scope(state);
  3033. if (_qi_truthy(state, qi_not_equals(state, qi_call(state, qi_get(state, "type"), __qistd494(state)), qi_make_string(state, "list")))) {
  3034. qi_throw(state, qi_call(state, qi_get(state, "TypeError"), __qistd495(state)));}
  3035. qi_old_scope(state);
  3036. qi_value_t *__qistd497 = qi_call(state, qi_get(state, "func_call"), __qistd498(state));
  3037. return __qistd497;
  3038. return state->nil;
  3039. }
  3040. inline static qi_list_t *__qistd501(qi_state_t *state) {
  3041. qi_list_t *list = qi_list_make_n(1);
  3042. qi_list_data(list, 0) = qi_get(state, "s");
  3043. return list;
  3044. }
  3045. inline static qi_list_t *__qistd503(qi_state_t *state) {
  3046. qi_list_t *list = qi_list_make_n(1);
  3047. qi_list_data(list, 0) = qi_get(state, "s");
  3048. return list;
  3049. }
  3050. inline static qi_list_t *__qistd502(qi_state_t *state) {
  3051. qi_list_t *list = qi_list_make_n(1);
  3052. qi_list_data(list, 0) = qi_add(state, qi_make_string(state, "expected first argument to be: string, but got: "), qi_call(state, qi_get(state, "type"), __qistd503(state)));
  3053. return list;
  3054. }
  3055. inline static qi_list_t *__qistd505(qi_state_t *state) {
  3056. qi_list_t *list = qi_list_make_n(1);
  3057. qi_list_data(list, 0) = qi_get(state, "s");
  3058. return list;
  3059. }
  3060. inline static qi_list_t *__qistd509(qi_state_t *state) {
  3061. qi_list_t *list = qi_list_make_n(1);
  3062. qi_list_data(list, 0) = qi_get(state, "s");
  3063. return list;
  3064. }
  3065. inline static qi_list_t *__qistd511(qi_state_t *state) {
  3066. qi_list_t *list = qi_list_make_n(1);
  3067. qi_list_data(list, 0) = qi_get(state, "s");
  3068. return list;
  3069. }
  3070. inline static qi_list_t *__qistd512(qi_state_t *state) {
  3071. qi_list_t *list = qi_list_make_n(1);
  3072. qi_list_data(list, 0) = qi_get(state, "s");
  3073. return list;
  3074. }
  3075. inline static qi_list_t *__qistd513(qi_state_t *state) {
  3076. qi_list_t *list = qi_list_make_n(1);
  3077. qi_list_data(list, 0) = qi_make_string(state, "unmatched { in format specifier");
  3078. return list;
  3079. }
  3080. inline static qi_list_t *__qistd514(qi_state_t *state) {
  3081. qi_list_t *list = qi_list_make_n(1);
  3082. qi_list_data(list, 0) = qi_make_string(state, "empty format key");
  3083. return list;
  3084. }
  3085. inline static qi_list_t *__qistd515(qi_state_t *state) {
  3086. qi_list_t *list = qi_list_make_n(1);
  3087. qi_list_data(list, 0) = qi_index(state, qi_get(state, "t"), qi_get(state, "k"));
  3088. return list;
  3089. }
  3090. qi_value_t *__qistd500(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
  3091. qi_decl(state, "s", qi_list_index(pargs, 0));
  3092. qi_decl(state, "t", qi_list_index(pargs, 1));
  3093. qi_new_scope(state);
  3094. if (_qi_truthy(state, qi_not_equals(state, qi_call(state, qi_get(state, "type"), __qistd501(state)), qi_make_string(state, "string")))) {
  3095. qi_throw(state, qi_call(state, qi_get(state, "TypeError"), __qistd502(state)));}
  3096. qi_old_scope(state);
  3097. qi_decl(state, "r", state->empty_string);
  3098. qi_decl(state, "n", qi_make_number(state, 1));
  3099. qi_new_scope(state);
  3100. qi_decl(state, "i", qi_make_number(state, 0));
  3101. while (_qi_truthy(state, qi_lt(state, qi_get(state, "i"), qi_call(state, qi_get(state, "len"), __qistd505(state))))) {
  3102. qi_new_scope(state);
  3103. qi_new_scope(state);
  3104. qi_value_t *__qistd507 = qi_index(state, qi_get(state, "s"), qi_get(state, "i"));
  3105. if (_qi_equals(state, __qistd507, qi_make_string(state, "{"))) goto __qistd508;
  3106. goto __default506;
  3107. __qistd508:;
  3108. qi_new_scope(state);
  3109. if (_qi_truthy(state, qi_and(state, qi_lt(state, qi_add(state, qi_get(state, "i"), qi_make_number(state, 1)), qi_call(state, qi_get(state, "len"), __qistd509(state))), qi_equals(state, qi_index(state, qi_get(state, "s"), qi_add(state, qi_get(state, "i"), qi_make_number(state, 1))), qi_make_string(state, "{"))))) {
  3110. (void)(qi_set(state, false, "r", qi_add(state, qi_get(state, "r"), qi_make_string(state, "{"))));
  3111. (void)(qi_set(state, false, "i", qi_add(state, qi_get(state, "i"), state->one)));
  3112. qi_old_scope(state);
  3113. qi_old_scope(state);
  3114. goto __continue504;
  3115. }
  3116. qi_old_scope(state);
  3117. qi_decl(state, "k", state->empty_string);
  3118. (void)(qi_set(state, false, "i", qi_add(state, qi_get(state, "i"), state->one)));
  3119. qi_new_scope(state);
  3120. while (_qi_truthy(state, qi_and(state, qi_lt(state, qi_get(state, "i"), qi_call(state, qi_get(state, "len"), __qistd511(state))), qi_not_equals(state, qi_index(state, qi_get(state, "s"), qi_get(state, "i")), qi_make_string(state, "}"))))) {
  3121. qi_new_scope(state);
  3122. (void)(qi_set(state, false, "k", qi_add(state, qi_get(state, "k"), qi_index(state, qi_get(state, "s"), qi_set(state, false, "i", qi_add(state, qi_get(state, "i"), state->one))))));__continue510:;
  3123. qi_old_scope(state);
  3124. }
  3125. goto __exit510;
  3126. __break510:;
  3127. qi_old_scope(state);
  3128. __exit510:;
  3129. qi_old_scope(state);
  3130. qi_new_scope(state);
  3131. if (_qi_truthy(state, qi_or(state, qi_ge(state, qi_get(state, "i"), qi_call(state, qi_get(state, "len"), __qistd512(state))), qi_not_equals(state, qi_index(state, qi_get(state, "s"), qi_get(state, "i")), qi_make_string(state, "}"))))) {
  3132. qi_throw(state, qi_call(state, qi_get(state, "ValueError"), __qistd513(state)));}
  3133. qi_old_scope(state);
  3134. qi_new_scope(state);
  3135. if (_qi_truthy(state, qi_not(state, qi_get(state, "k")))) {
  3136. qi_throw(state, qi_call(state, qi_get(state, "ValueError"), __qistd514(state)));}
  3137. qi_old_scope(state);
  3138. (void)(qi_set(state, false, "r", qi_add(state, qi_get(state, "r"), qi_call(state, qi_get(state, "repr"), __qistd515(state)))));
  3139. goto __break506;
  3140. __default506:;
  3141. (void)(qi_set(state, false, "r", qi_add(state, qi_get(state, "r"), qi_index(state, qi_get(state, "s"), qi_get(state, "i")))));
  3142. __break506:;
  3143. qi_old_scope(state);
  3144. __continue504:;
  3145. qi_set(state, false, "i", qi_add(state, qi_get(state, "i"), state->one));
  3146. qi_old_scope(state);
  3147. }
  3148. goto __exit504;
  3149. __break504:;
  3150. qi_old_scope(state);
  3151. __exit504:;
  3152. qi_old_scope(state);
  3153. qi_value_t *__qistd516 = qi_get(state, "r");
  3154. return __qistd516;
  3155. return state->nil;
  3156. }
  3157. inline static qi_list_t *__qistd520(qi_state_t *state) {
  3158. qi_list_t *list = qi_list_make_n(1);
  3159. qi_list_data(list, 0) = qi_get(state, "STDIN");
  3160. return list;
  3161. }
  3162. inline static qi_list_t *__qistd519(qi_state_t *state) {
  3163. qi_list_t *list = qi_list_make_n(1);
  3164. qi_list_data(list, 0) = qi_call(state, qi_get(state, "fgetc"), __qistd520(state));
  3165. return list;
  3166. }
  3167. qi_value_t *__qistd517(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
  3168. qi_value_t *__qistd518 = qi_call(state, qi_get(state, "chr"), __qistd519(state));
  3169. return __qistd518;return state->nil;
  3170. }
  3171. inline static qi_list_t *__qistd522(qi_state_t *state) {
  3172. qi_list_t *list = qi_list_make_n(2);
  3173. qi_list_data(list, 0) = qi_get(state, "STDOUT");
  3174. qi_list_data(list, 1) = qi_get(state, "c");
  3175. return list;
  3176. }
  3177. qi_value_t *__qistd521(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
  3178. qi_decl(state, "c", qi_list_index(pargs, 0));
  3179. (void)(qi_call(state, qi_get(state, "fputc"), __qistd522(state)));return state->nil;
  3180. }
  3181. inline static qi_list_t *__qistd525(qi_state_t *state) {
  3182. qi_list_t *list = qi_list_make_n(2);
  3183. qi_list_data(list, 0) = qi_get(state, "STDIN");
  3184. qi_list_data(list, 1) = qi_make_number(state, 256);
  3185. return list;
  3186. }
  3187. qi_value_t *__qistd523(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
  3188. qi_value_t *__qistd524 = qi_call(state, qi_get(state, "fgets"), __qistd525(state));
  3189. return __qistd524;return state->nil;
  3190. }
  3191. inline static qi_list_t *__qistd527(qi_state_t *state) {
  3192. qi_list_t *list = qi_list_make_n(1);
  3193. qi_list_data(list, 0) = qi_get(state, "arguments");
  3194. return list;
  3195. }
  3196. inline static qi_list_t *__qistd528(qi_state_t *state) {
  3197. qi_list_t *list = qi_list_make_n(2);
  3198. qi_list_data(list, 0) = qi_get(state, "print");
  3199. qi_list_data(list, 1) = qi_get(state, "arguments");
  3200. return list;
  3201. }
  3202. inline static qi_list_t *__qistd530(qi_state_t *state) {
  3203. qi_list_t *list = qi_list_make_n(2);
  3204. qi_list_data(list, 0) = qi_call(state, qi_get(state, "getline"), NULL);
  3205. qi_list_data(list, 1) = qi_make_string(state, "\n\r");
  3206. return list;
  3207. }
  3208. qi_value_t *__qistd526(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
  3209. qi_new_scope(state);
  3210. if (_qi_truthy(state, qi_gt(state, qi_call(state, qi_get(state, "len"), __qistd527(state)), qi_make_number(state, 0)))) {
  3211. (void)(qi_call(state, qi_get(state, "func_call"), __qistd528(state)));}
  3212. qi_old_scope(state);
  3213. qi_value_t *__qistd529 = qi_call(state, qi_get(state, "str_rstrip"), __qistd530(state));
  3214. return __qistd529;
  3215. return state->nil;
  3216. }
  3217. inline static qi_list_t *__qistd533(qi_state_t *state) {
  3218. qi_list_t *list = qi_list_make_n(2);
  3219. qi_list_data(list, 0) = qi_get(state, "path");
  3220. qi_list_data(list, 1) = qi_get(state, "mode");
  3221. return list;
  3222. }
  3223. qi_value_t *__qistd531(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
  3224. qi_decl(state, "mode", pargc >= 2? qi_list_index(pargs, 1): qi_make_string(state, "r"));
  3225. qi_decl(state, "path", qi_list_index(pargs, 0));
  3226. qi_value_t *__qistd532 = qi_call(state, qi_get(state, "fopen"), __qistd533(state));
  3227. return __qistd532;return state->nil;
  3228. }
  3229. qi_value_t *__qistd534(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
  3230. qi_decl(state, "cond", qi_list_index(pargs, 0));
  3231. qi_decl(state, "msg", pargc >= 2? qi_list_index(pargs, 1): qi_call(state, qi_get(state, "AssertionError"), NULL));
  3232. qi_new_scope(state);
  3233. if (_qi_truthy(state, qi_not(state, qi_get(state, "cond")))) {
  3234. qi_throw(state, qi_get(state, "msg"));}
  3235. qi_old_scope(state);
  3236. return state->nil;
  3237. }
  3238. inline static qi_list_t *__qistd537(qi_state_t *state) {
  3239. qi_list_t *list = qi_list_make_n(1);
  3240. qi_list_data(list, 0) = qi_get(state, "l");
  3241. return list;
  3242. }
  3243. inline static qi_list_t *__qistd538(qi_state_t *state) {
  3244. qi_list_t *list = qi_list_make_n(1);
  3245. qi_list_data(list, 0) = qi_index(state, qi_get(state, "this"), qi_make_string(state, "l"));
  3246. return list;
  3247. }
  3248. qi_value_t *__qistd536(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
  3249. qi_decl(state, "l", qi_list_index(pargs, 1));
  3250. qi_decl(state, "this", qi_list_index(pargs, 0));
  3251. (void)(qi_index_set(state, false, qi_get(state, "this"), qi_make_string(state, "l"), qi_call(state, qi_get(state, "list"), __qistd537(state))));
  3252. (void)(qi_index_set(state, false, qi_get(state, "this"), qi_make_string(state, "i"), qi_make_number(state, 0)));
  3253. (void)(qi_index_set(state, false, qi_get(state, "this"), qi_make_string(state, "z"), qi_call(state, qi_get(state, "len"), __qistd538(state))));
  3254. return state->nil;
  3255. }
  3256. qi_value_t *__qistd539(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
  3257. qi_decl(state, "this", qi_list_index(pargs, 0));
  3258. qi_value_t *__qistd540 = qi_make_string(state, "<ListIterator>");
  3259. return __qistd540;return state->nil;
  3260. }
  3261. qi_value_t *__qistd541(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
  3262. qi_decl(state, "this", qi_list_index(pargs, 0));
  3263. (void)(qi_index_set(state, false, qi_get(state, "this"), qi_make_string(state, "i"), qi_make_number(state, 0)));
  3264. qi_value_t *__qistd542 = qi_get(state, "this");
  3265. return __qistd542;
  3266. return state->nil;
  3267. }
  3268. qi_value_t *__qistd543(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
  3269. qi_decl(state, "this", qi_list_index(pargs, 0));
  3270. qi_new_scope(state);
  3271. if (_qi_truthy(state, qi_lt(state, qi_index(state, qi_get(state, "this"), qi_make_string(state, "i")), qi_index(state, qi_get(state, "this"), qi_make_string(state, "z"))))) {
  3272. qi_value_t *__qistd544 = qi_index(state, qi_index(state, qi_get(state, "this"), qi_make_string(state, "l")), qi_index_set(state, false, qi_get(state, "this"), qi_make_string(state, "i"), qi_add(state, qi_index(state, qi_get(state, "this"), qi_make_string(state, "i")), state->one)));
  3273. qi_old_scope(state);
  3274. return __qistd544;}
  3275. qi_old_scope(state);
  3276. return state->nil;
  3277. }
  3278. qi_value_t *__qistd545(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
  3279. qi_decl(state, "this", qi_list_index(pargs, 0));
  3280. qi_value_t *__qistd546 = qi_ge(state, qi_index(state, qi_get(state, "this"), qi_make_string(state, "i")), qi_index(state, qi_get(state, "this"), qi_make_string(state, "z")));
  3281. return __qistd546;return state->nil;
  3282. }
  3283. qi_value_t *__qistd535(qi_state_t *state) {
  3284. qi_list_t *supers = qi_list_make_n(0);
  3285. qi_table_t *table = qi_table_make();
  3286. qi_table_t *metatable = qi_table_make();
  3287. qi_table_t *statictable = qi_table_make();
  3288. qi_table_set(metatable, "constructor", qi_make_function(state, "ListIterator.constructor", 2, __qistd536, NULL));
  3289. qi_table_set(metatable, "__str", qi_make_function(state, "ListIterator.__str", 1, __qistd539, NULL));
  3290. qi_table_set(metatable, "__begin", qi_make_function(state, "ListIterator.__begin", 1, __qistd541, NULL));
  3291. qi_table_set(metatable, "__next", qi_make_function(state, "ListIterator.__next", 1, __qistd543, NULL));
  3292. qi_table_set(metatable, "__end", qi_make_function(state, "ListIterator.__end", 1, __qistd545, NULL));
  3293. qi_list_t *pargs = qi_list_make_n(5);
  3294. qi_list_data(pargs, 0) = qi_make_string(state, "ListIterator");
  3295. qi_list_data(pargs, 1) = qi_make_list(state, supers);
  3296. qi_list_data(pargs, 2) = qi_make_table(state, table);
  3297. qi_list_data(pargs, 3) = qi_make_table(state, metatable);
  3298. qi_list_data(pargs, 4) = qi_make_table(state, statictable);
  3299. return qi_call(state, qi_get(state, "__class_wrapper"), pargs);
  3300. }
  3301. inline static qi_list_t *__qistd549(qi_state_t *state) {
  3302. qi_list_t *list = qi_list_make_n(1);
  3303. qi_list_data(list, 0) = qi_get(state, "v");
  3304. return list;
  3305. }
  3306. qi_value_t *__qistd548(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
  3307. qi_decl(state, "v", pargc >= 2? qi_list_index(pargs, 1): state->nil);
  3308. qi_decl(state, "this", qi_list_index(pargs, 0));
  3309. (void)(qi_index_set(state, false, qi_get(state, "this"), qi_make_string(state, "__data__"), qi_make_list(state, NULL)));
  3310. qi_new_scope(state);
  3311. if (_qi_truthy(state, qi_not_is(state, qi_get(state, "v"), state->nil))) {
  3312. (void)(qi_set(state, false, "v", qi_call(state, qi_get(state, "table"), __qistd549(state))));
  3313. qi_new_scope(state);
  3314. qi_value_t *__qistd551 = qi_iter(state, qi_get(state, "v"));
  3315. qi_decl(state, "k", state->nil);
  3316. while (!qi_iter_end(state, __qistd551)) {
  3317. qi_value_t *el = qi_iter_next(state, __qistd551);
  3318. qi_set(state, false, "k", el);
  3319. qi_new_scope(state);
  3320. (void)(qi_index_set(state, false, qi_get(state, "this"), qi_get(state, "k"), qi_index(state, qi_get(state, "v"), qi_get(state, "k"))));__continue550:;
  3321. qi_old_scope(state);
  3322. }
  3323. goto __exit550;
  3324. __break550:;
  3325. qi_old_scope(state);
  3326. __exit550:;
  3327. qi_old_scope(state);
  3328. }
  3329. qi_old_scope(state);
  3330. return state->nil;
  3331. }
  3332. qi_value_t *__qistd552(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
  3333. qi_decl(state, "this", qi_list_index(pargs, 0));
  3334. qi_value_t *__qistd553 = qi_make_string(state, "orderedtable");
  3335. return __qistd553;return state->nil;
  3336. }
  3337. inline static qi_list_t *__qistd556(qi_state_t *state) {
  3338. qi_list_t *list = qi_list_make_n(1);
  3339. qi_list_data(list, 0) = qi_get(state, "this");
  3340. return list;
  3341. }
  3342. inline static qi_list_t *__qistd559(qi_state_t *state) {
  3343. qi_list_t *list = qi_list_make_n(2);
  3344. qi_list_data(list, 0) = qi_make_string(state, "\\");
  3345. qi_list_data(list, 1) = qi_make_string(state, "\\\\");
  3346. return list;
  3347. }
  3348. inline static qi_list_t *__qistd560(qi_state_t *state) {
  3349. qi_list_t *list = qi_list_make_n(2);
  3350. qi_list_data(list, 0) = qi_make_string(state, "\"");
  3351. qi_list_data(list, 1) = qi_make_string(state, "\\\"");
  3352. return list;
  3353. }
  3354. inline static qi_list_t *__qistd561(qi_state_t *state) {
  3355. qi_list_t *list = qi_list_make_n(1);
  3356. qi_list_data(list, 0) = qi_get(state, "v");
  3357. return list;
  3358. }
  3359. inline static qi_list_t *__qistd562(qi_state_t *state) {
  3360. qi_list_t *list = qi_list_make_n(1);
  3361. qi_list_data(list, 0) = qi_get(state, "tempstack");
  3362. return list;
  3363. }
  3364. inline static qi_value_t *__qistd563(qi_state_t *state) {
  3365. qi_value_t *str = state->empty_string;
  3366. str = qi_add(state, str, qi_make_string(state, "\""));
  3367. str = qi_add(state, str, qi_to_string(state, qi_get(state, "k")));
  3368. str = qi_add(state, str, qi_make_string(state, "\": "));
  3369. str = qi_add(state, str, qi_to_string(state, qi_get(state, "v")));
  3370. return str;
  3371. }
  3372. qi_value_t *__qistd554(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
  3373. qi_decl(state, "tempstack", pargc >= 2? qi_list_index(pargs, 1): qi_make_list(state, NULL));
  3374. qi_decl(state, "this", qi_list_index(pargs, 0));
  3375. qi_new_scope(state);
  3376. if (_qi_truthy(state, qi_in(state, qi_get(state, "this"), qi_get(state, "tempstack")))) {
  3377. qi_value_t *__qistd555 = qi_make_string(state, "OrderedTable({...})");
  3378. qi_old_scope(state);
  3379. return __qistd555;}
  3380. qi_old_scope(state);
  3381. (void)(qi_call(state, qi_index(state, qi_get(state, "tempstack"), qi_make_string(state, "push")), __qistd556(state)));
  3382. qi_decl(state, "buf", qi_make_string(state, "OrderedTable({"));
  3383. qi_decl(state, "f", state->_true);
  3384. qi_new_scope(state);
  3385. qi_value_t *__qistd558 = qi_iter(state, qi_index(state, qi_get(state, "this"), qi_make_string(state, "__data__")));
  3386. qi_decl(state, "k", state->nil);
  3387. qi_decl(state, "v", state->nil);
  3388. while (!qi_iter_end(state, __qistd558)) {
  3389. qi_value_t *el = qi_iter_next(state, __qistd558);
  3390. qi_set(state, false, "k", qi_index(state, el, qi_make_number(state, 0)));
  3391. qi_set(state, false, "v", qi_index(state, el, qi_make_number(state, 1)));
  3392. qi_new_scope(state);
  3393. qi_new_scope(state);
  3394. if (_qi_truthy(state, qi_get(state, "f"))) {
  3395. (void)(qi_set(state, false, "f", state->_false));} else {
  3396. (void)(qi_set(state, false, "buf", qi_add(state, qi_get(state, "buf"), qi_make_string(state, ", "))));}
  3397. qi_old_scope(state);
  3398. (void)(qi_set(state, false, "k", qi_call(state, qi_index(state, qi_call(state, qi_index(state, qi_get(state, "k"), qi_make_string(state, "replace")), __qistd559(state)), qi_make_string(state, "replace")), __qistd560(state))));
  3399. qi_new_scope(state);
  3400. if (_qi_truthy(state, qi_is(state, qi_call(state, qi_get(state, "type"), __qistd561(state)), qi_make_string(state, "orderedtable")))) {
  3401. (void)(qi_set(state, false, "v", qi_call(state, qi_index(state, qi_get(state, "v"), qi_make_string(state, "stringify")), __qistd562(state))));}
  3402. qi_old_scope(state);
  3403. (void)(qi_set(state, false, "buf", qi_add(state, qi_get(state, "buf"), __qistd563(state))));
  3404. __continue557:;
  3405. qi_old_scope(state);
  3406. }
  3407. goto __exit557;
  3408. __break557:;
  3409. qi_old_scope(state);
  3410. __exit557:;
  3411. qi_old_scope(state);
  3412. (void)(qi_set(state, false, "buf", qi_add(state, qi_get(state, "buf"), qi_make_string(state, "})"))));
  3413. qi_value_t *__qistd564 = qi_get(state, "buf");
  3414. return __qistd564;
  3415. return state->nil;
  3416. }
  3417. inline static qi_list_t *__qistd567(qi_state_t *state) {
  3418. qi_list_t *list = qi_list_make_n(1);
  3419. qi_list_data(list, 0) = qi_make_list(state, NULL);
  3420. return list;
  3421. }
  3422. qi_value_t *__qistd565(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
  3423. qi_decl(state, "this", qi_list_index(pargs, 0));
  3424. qi_value_t *__qistd566 = qi_call(state, qi_index(state, qi_get(state, "this"), qi_make_string(state, "stringify")), __qistd567(state));
  3425. return __qistd566;
  3426. return state->nil;
  3427. }
  3428. inline static qi_list_t *__qistd571(qi_state_t *state) {
  3429. qi_list_t *list = qi_list_make_n(1);
  3430. qi_list_data(list, 0) = qi_get(state, "k");
  3431. return list;
  3432. }
  3433. qi_value_t *__qistd568(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
  3434. qi_decl(state, "this", qi_list_index(pargs, 0));
  3435. qi_decl_const(state, "keys", qi_make_list(state, NULL));
  3436. qi_new_scope(state);
  3437. qi_value_t *__qistd570 = qi_iter(state, qi_index(state, qi_get(state, "this"), qi_make_string(state, "__data__")));
  3438. qi_decl(state, "k", state->nil);
  3439. while (!qi_iter_end(state, __qistd570)) {
  3440. qi_value_t *el = qi_iter_next(state, __qistd570);
  3441. qi_set(state, false, "k", qi_index(state, el, qi_make_number(state, 0)));
  3442. (void)(qi_index(state, el, qi_make_number(state, 1)));
  3443. qi_new_scope(state);
  3444. (void)(qi_call(state, qi_index(state, qi_get(state, "keys"), qi_make_string(state, "push")), __qistd571(state)));__continue569:;
  3445. qi_old_scope(state);
  3446. }
  3447. goto __exit569;
  3448. __break569:;
  3449. qi_old_scope(state);
  3450. __exit569:;
  3451. qi_old_scope(state);
  3452. qi_value_t *__qistd572 = qi_get(state, "keys");
  3453. return __qistd572;
  3454. return state->nil;
  3455. }
  3456. inline static qi_list_t *__qistd576(qi_state_t *state) {
  3457. qi_list_t *list = qi_list_make_n(1);
  3458. qi_list_data(list, 0) = qi_get(state, "v");
  3459. return list;
  3460. }
  3461. qi_value_t *__qistd573(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
  3462. qi_decl(state, "this", qi_list_index(pargs, 0));
  3463. qi_decl_const(state, "values", qi_make_list(state, NULL));
  3464. qi_new_scope(state);
  3465. qi_value_t *__qistd575 = qi_iter(state, qi_index(state, qi_get(state, "this"), qi_make_string(state, "__data__")));
  3466. qi_decl(state, "v", state->nil);
  3467. while (!qi_iter_end(state, __qistd575)) {
  3468. qi_value_t *el = qi_iter_next(state, __qistd575);
  3469. (void)(qi_index(state, el, qi_make_number(state, 0)));
  3470. qi_set(state, false, "v", qi_index(state, el, qi_make_number(state, 1)));
  3471. qi_new_scope(state);
  3472. (void)(qi_call(state, qi_index(state, qi_get(state, "values"), qi_make_string(state, "push")), __qistd576(state)));__continue574:;
  3473. qi_old_scope(state);
  3474. }
  3475. goto __exit574;
  3476. __break574:;
  3477. qi_old_scope(state);
  3478. __exit574:;
  3479. qi_old_scope(state);
  3480. qi_value_t *__qistd577 = qi_get(state, "values");
  3481. return __qistd577;
  3482. return state->nil;
  3483. }
  3484. qi_value_t *__qistd578(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
  3485. qi_decl(state, "k", qi_list_index(pargs, 1));
  3486. qi_decl(state, "this", qi_list_index(pargs, 0));
  3487. qi_del(state, qi_get(state, "this"), qi_get(state, "k"));
  3488. return state->nil;
  3489. }
  3490. inline static qi_list_t *__qistd581(qi_state_t *state) {
  3491. qi_list_t *list = qi_list_make_n(1);
  3492. qi_list_data(list, 0) = qi_index(state, qi_get(state, "this"), qi_make_string(state, "__data__"));
  3493. return list;
  3494. }
  3495. qi_value_t *__qistd579(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
  3496. qi_decl(state, "this", qi_list_index(pargs, 0));
  3497. qi_value_t *__qistd580 = qi_call(state, qi_get(state, "OrderedTable"), __qistd581(state));
  3498. return __qistd580;
  3499. return state->nil;
  3500. }
  3501. inline static qi_list_t *__qistd583(qi_state_t *state) {
  3502. qi_list_t *list = qi_list_make_n(1);
  3503. qi_list_data(list, 0) = qi_get(state, "k");
  3504. return list;
  3505. }
  3506. qi_value_t *__qistd582(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
  3507. qi_decl(state, "d", pargc >= 3? qi_list_index(pargs, 2): state->nil);
  3508. qi_decl(state, "k", qi_list_index(pargs, 1));
  3509. qi_decl(state, "this", qi_list_index(pargs, 0));
  3510. (void)(qi_set(state, false, "k", qi_call(state, qi_get(state, "str"), __qistd583(state))));
  3511. qi_new_scope(state);
  3512. qi_value_t *__qistd585 = qi_iter(state, qi_index(state, qi_get(state, "this"), qi_make_string(state, "__data__")));
  3513. qi_decl(state, "ok", state->nil);
  3514. qi_decl(state, "v", state->nil);
  3515. while (!qi_iter_end(state, __qistd585)) {
  3516. qi_value_t *el = qi_iter_next(state, __qistd585);
  3517. qi_set(state, false, "ok", qi_index(state, el, qi_make_number(state, 0)));
  3518. qi_set(state, false, "v", qi_index(state, el, qi_make_number(state, 1)));
  3519. qi_new_scope(state);
  3520. qi_new_scope(state);
  3521. if (_qi_truthy(state, qi_equals(state, qi_get(state, "ok"), qi_get(state, "k")))) {
  3522. qi_value_t *__qistd586 = qi_get(state, "v");
  3523. qi_old_scope(state);
  3524. qi_old_scope(state);
  3525. qi_old_scope(state);
  3526. return __qistd586;}
  3527. qi_old_scope(state);
  3528. __continue584:;
  3529. qi_old_scope(state);
  3530. }
  3531. goto __exit584;
  3532. __break584:;
  3533. qi_old_scope(state);
  3534. __exit584:;
  3535. qi_old_scope(state);
  3536. qi_value_t *__qistd587 = qi_get(state, "d");
  3537. return __qistd587;
  3538. return state->nil;
  3539. }
  3540. inline static qi_list_t *__qistd590(qi_state_t *state) {
  3541. qi_list_t *list = qi_list_make_n(1);
  3542. qi_list_data(list, 0) = qi_call(state, qi_index(state, qi_get(state, "this"), qi_make_string(state, "keys")), NULL);
  3543. return list;
  3544. }
  3545. qi_value_t *__qistd588(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
  3546. qi_decl(state, "this", qi_list_index(pargs, 0));
  3547. qi_value_t *__qistd589 = qi_call(state, qi_get(state, "ListIterator"), __qistd590(state));
  3548. return __qistd589;return state->nil;
  3549. }
  3550. inline static qi_list_t *__qistd593(qi_state_t *state) {
  3551. qi_list_t *list = qi_list_make_n(1);
  3552. qi_list_data(list, 0) = qi_index(state, qi_get(state, "this"), qi_make_string(state, "__data__"));
  3553. return list;
  3554. }
  3555. qi_value_t *__qistd591(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
  3556. qi_decl(state, "this", qi_list_index(pargs, 0));
  3557. qi_value_t *__qistd592 = qi_call(state, qi_get(state, "len"), __qistd593(state));
  3558. return __qistd592;return state->nil;
  3559. }
  3560. inline static qi_list_t *__qistd595(qi_state_t *state) {
  3561. qi_list_t *list = qi_list_make_n(1);
  3562. qi_list_data(list, 0) = qi_get(state, "k");
  3563. return list;
  3564. }
  3565. qi_value_t *__qistd594(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
  3566. qi_decl(state, "k", qi_list_index(pargs, 1));
  3567. qi_decl(state, "this", qi_list_index(pargs, 0));
  3568. (void)(qi_set(state, false, "k", qi_call(state, qi_get(state, "str"), __qistd595(state))));
  3569. qi_new_scope(state);
  3570. qi_value_t *__qistd597 = qi_iter(state, qi_index(state, qi_get(state, "this"), qi_make_string(state, "__data__")));
  3571. qi_decl(state, "ok", state->nil);
  3572. while (!qi_iter_end(state, __qistd597)) {
  3573. qi_value_t *el = qi_iter_next(state, __qistd597);
  3574. qi_set(state, false, "ok", qi_index(state, el, qi_make_number(state, 0)));
  3575. (void)(qi_index(state, el, qi_make_number(state, 1)));
  3576. qi_new_scope(state);
  3577. qi_new_scope(state);
  3578. if (_qi_truthy(state, qi_equals(state, qi_get(state, "ok"), qi_get(state, "k")))) {
  3579. qi_value_t *__qistd598 = state->_true;
  3580. qi_old_scope(state);
  3581. qi_old_scope(state);
  3582. qi_old_scope(state);
  3583. return __qistd598;}
  3584. qi_old_scope(state);
  3585. __continue596:;
  3586. qi_old_scope(state);
  3587. }
  3588. goto __exit596;
  3589. __break596:;
  3590. qi_old_scope(state);
  3591. __exit596:;
  3592. qi_old_scope(state);
  3593. qi_value_t *__qistd599 = state->_false;
  3594. return __qistd599;
  3595. return state->nil;
  3596. }
  3597. inline static qi_list_t *__qistd601(qi_state_t *state) {
  3598. qi_list_t *list = qi_list_make_n(1);
  3599. qi_list_data(list, 0) = qi_get(state, "k");
  3600. return list;
  3601. }
  3602. inline static qi_list_t *__qistd606(qi_state_t *state) {
  3603. qi_list_t *list = qi_list_make_n(1);
  3604. qi_list_data(list, 0) = qi_get(state, "this");
  3605. return list;
  3606. }
  3607. inline static qi_list_t *__qistd605(qi_state_t *state) {
  3608. qi_list_t *list = qi_list_make_n(1);
  3609. qi_list_data(list, 0) = qi_call(state, qi_get(state, "len"), __qistd606(state));
  3610. return list;
  3611. }
  3612. inline static qi_list_t *__qistd604(qi_state_t *state) {
  3613. qi_list_t *list = qi_list_make_n(2);
  3614. qi_list_data(list, 0) = qi_call(state, qi_get(state, "range"), __qistd605(state));
  3615. qi_list_data(list, 1) = qi_call(state, qi_index(state, qi_get(state, "this"), qi_make_string(state, "keys")), NULL);
  3616. return list;
  3617. }
  3618. inline static qi_list_t *__qistd607(qi_state_t *state) {
  3619. qi_list_t *list = qi_list_make_n(1);
  3620. qi_list_data(list, 0) = qi_get(state, "k");
  3621. return list;
  3622. }
  3623. qi_value_t *__qistd600(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
  3624. qi_decl(state, "k", qi_list_index(pargs, 1));
  3625. qi_decl(state, "this", qi_list_index(pargs, 0));
  3626. (void)(qi_set(state, false, "k", qi_call(state, qi_get(state, "str"), __qistd601(state))));
  3627. qi_new_scope(state);
  3628. qi_value_t *__qistd603 = qi_iter(state, qi_call(state, qi_get(state, "zip"), __qistd604(state)));
  3629. qi_decl(state, "i", state->nil);
  3630. qi_decl(state, "ok", state->nil);
  3631. while (!qi_iter_end(state, __qistd603)) {
  3632. qi_value_t *el = qi_iter_next(state, __qistd603);
  3633. qi_set(state, false, "i", qi_index(state, el, qi_make_number(state, 0)));
  3634. qi_set(state, false, "ok", qi_index(state, el, qi_make_number(state, 1)));
  3635. qi_new_scope(state);
  3636. qi_new_scope(state);
  3637. if (_qi_truthy(state, qi_equals(state, qi_get(state, "ok"), qi_get(state, "k")))) {
  3638. qi_del(state, qi_index(state, qi_get(state, "this"), qi_make_string(state, "__data__")), qi_get(state, "i"));
  3639. qi_old_scope(state);
  3640. qi_old_scope(state);
  3641. qi_old_scope(state);
  3642. return state->nil;
  3643. }
  3644. qi_old_scope(state);
  3645. __continue602:;
  3646. qi_old_scope(state);
  3647. }
  3648. goto __exit602;
  3649. __break602:;
  3650. qi_old_scope(state);
  3651. __exit602:;
  3652. qi_old_scope(state);
  3653. qi_throw(state, qi_call(state, qi_get(state, "KeyError"), __qistd607(state)));
  3654. return state->nil;
  3655. }
  3656. inline static qi_list_t *__qistd609(qi_state_t *state) {
  3657. qi_list_t *list = qi_list_make_n(1);
  3658. qi_list_data(list, 0) = qi_get(state, "k");
  3659. return list;
  3660. }
  3661. inline static qi_list_t *__qistd613(qi_state_t *state) {
  3662. qi_list_t *list = qi_list_make_n(1);
  3663. qi_list_data(list, 0) = qi_get(state, "k");
  3664. return list;
  3665. }
  3666. qi_value_t *__qistd608(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
  3667. qi_decl(state, "k", qi_list_index(pargs, 1));
  3668. qi_decl(state, "this", qi_list_index(pargs, 0));
  3669. (void)(qi_set(state, false, "k", qi_call(state, qi_get(state, "str"), __qistd609(state))));
  3670. qi_new_scope(state);
  3671. qi_value_t *__qistd611 = qi_iter(state, qi_index(state, qi_get(state, "this"), qi_make_string(state, "__data__")));
  3672. qi_decl(state, "ok", state->nil);
  3673. qi_decl(state, "v", state->nil);
  3674. while (!qi_iter_end(state, __qistd611)) {
  3675. qi_value_t *el = qi_iter_next(state, __qistd611);
  3676. qi_set(state, false, "ok", qi_index(state, el, qi_make_number(state, 0)));
  3677. qi_set(state, false, "v", qi_index(state, el, qi_make_number(state, 1)));
  3678. qi_new_scope(state);
  3679. qi_new_scope(state);
  3680. if (_qi_truthy(state, qi_equals(state, qi_get(state, "ok"), qi_get(state, "k")))) {
  3681. qi_value_t *__qistd612 = qi_get(state, "v");
  3682. qi_old_scope(state);
  3683. qi_old_scope(state);
  3684. qi_old_scope(state);
  3685. return __qistd612;}
  3686. qi_old_scope(state);
  3687. __continue610:;
  3688. qi_old_scope(state);
  3689. }
  3690. goto __exit610;
  3691. __break610:;
  3692. qi_old_scope(state);
  3693. __exit610:;
  3694. qi_old_scope(state);
  3695. qi_throw(state, qi_call(state, qi_get(state, "KeyError"), __qistd613(state)));
  3696. return state->nil;
  3697. }
  3698. inline static qi_list_t *__qistd615(qi_state_t *state) {
  3699. qi_list_t *list = qi_list_make_n(1);
  3700. qi_list_data(list, 0) = qi_get(state, "k");
  3701. return list;
  3702. }
  3703. inline static qi_list_t *__qistd620(qi_state_t *state) {
  3704. qi_list_t *list = qi_list_make_n(1);
  3705. qi_list_data(list, 0) = qi_get(state, "this");
  3706. return list;
  3707. }
  3708. inline static qi_list_t *__qistd619(qi_state_t *state) {
  3709. qi_list_t *list = qi_list_make_n(1);
  3710. qi_list_data(list, 0) = qi_call(state, qi_get(state, "len"), __qistd620(state));
  3711. return list;
  3712. }
  3713. inline static qi_list_t *__qistd618(qi_state_t *state) {
  3714. qi_list_t *list = qi_list_make_n(2);
  3715. qi_list_data(list, 0) = qi_call(state, qi_get(state, "range"), __qistd619(state));
  3716. qi_list_data(list, 1) = qi_call(state, qi_index(state, qi_get(state, "this"), qi_make_string(state, "keys")), NULL);
  3717. return list;
  3718. }
  3719. inline static qi_list_t *__qistd621(qi_state_t *state) {
  3720. qi_list_t *list = qi_list_make_n(2);
  3721. qi_list_data(list, 0) = qi_get(state, "ok");
  3722. qi_list_data(list, 1) = qi_get(state, "v");
  3723. return list;
  3724. }
  3725. inline static qi_list_t *__qistd623(qi_state_t *state) {
  3726. qi_list_t *list = qi_list_make_n(2);
  3727. qi_list_data(list, 0) = qi_get(state, "k");
  3728. qi_list_data(list, 1) = qi_get(state, "v");
  3729. return list;
  3730. }
  3731. inline static qi_list_t *__qistd622(qi_state_t *state) {
  3732. qi_list_t *list = qi_list_make_n(1);
  3733. qi_list_data(list, 0) = qi_make_tuple(state, __qistd623(state));
  3734. return list;
  3735. }
  3736. qi_value_t *__qistd614(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
  3737. qi_decl(state, "k", qi_list_index(pargs, 1));
  3738. qi_decl(state, "v", qi_list_index(pargs, 2));
  3739. qi_decl(state, "this", qi_list_index(pargs, 0));
  3740. (void)(qi_set(state, false, "k", qi_call(state, qi_get(state, "str"), __qistd615(state))));
  3741. qi_new_scope(state);
  3742. qi_value_t *__qistd617 = qi_iter(state, qi_call(state, qi_get(state, "zip"), __qistd618(state)));
  3743. qi_decl(state, "i", state->nil);
  3744. qi_decl(state, "ok", state->nil);
  3745. while (!qi_iter_end(state, __qistd617)) {
  3746. qi_value_t *el = qi_iter_next(state, __qistd617);
  3747. qi_set(state, false, "i", qi_index(state, el, qi_make_number(state, 0)));
  3748. qi_set(state, false, "ok", qi_index(state, el, qi_make_number(state, 1)));
  3749. qi_new_scope(state);
  3750. qi_new_scope(state);
  3751. if (_qi_truthy(state, qi_equals(state, qi_get(state, "ok"), qi_get(state, "k")))) {
  3752. (void)(qi_index_set(state, false, qi_index(state, qi_get(state, "this"), qi_make_string(state, "__data__")), qi_get(state, "i"), qi_make_tuple(state, __qistd621(state))));
  3753. qi_old_scope(state);
  3754. qi_old_scope(state);
  3755. qi_old_scope(state);
  3756. return state->nil;
  3757. }
  3758. qi_old_scope(state);
  3759. __continue616:;
  3760. qi_old_scope(state);
  3761. }
  3762. goto __exit616;
  3763. __break616:;
  3764. qi_old_scope(state);
  3765. __exit616:;
  3766. qi_old_scope(state);
  3767. (void)(qi_call(state, qi_index(state, qi_index(state, qi_get(state, "this"), qi_make_string(state, "__data__")), qi_make_string(state, "push")), __qistd622(state)));
  3768. return state->nil;
  3769. }
  3770. qi_value_t *__qistd547(qi_state_t *state) {
  3771. qi_list_t *supers = qi_list_make_n(0);
  3772. qi_table_t *table = qi_table_make();
  3773. qi_table_t *metatable = qi_table_make();
  3774. qi_table_t *statictable = qi_table_make();
  3775. qi_table_set(metatable, "__data__", state->nil);
  3776. qi_table_set(metatable, "constructor", qi_make_function(state, "OrderedTable.constructor", 1, __qistd548, NULL));
  3777. qi_table_set(metatable, "__type", qi_make_function(state, "OrderedTable.__type", 1, __qistd552, NULL));
  3778. qi_table_set(metatable, "stringify", qi_make_function(state, "OrderedTable.stringify", 1, __qistd554, NULL));
  3779. qi_table_set(metatable, "__str", qi_make_function(state, "OrderedTable.__str", 1, __qistd565, NULL));
  3780. qi_table_set(metatable, "keys", qi_make_function(state, "OrderedTable.keys", 1, __qistd568, NULL));
  3781. qi_table_set(metatable, "values", qi_make_function(state, "OrderedTable.values", 1, __qistd573, NULL));
  3782. qi_table_set(metatable, "delete", qi_make_function(state, "OrderedTable.delete", 2, __qistd578, NULL));
  3783. qi_table_set(metatable, "copy", qi_make_function(state, "OrderedTable.copy", 1, __qistd579, NULL));
  3784. qi_table_set(metatable, "get", qi_make_function(state, "OrderedTable.get", 2, __qistd582, NULL));
  3785. qi_table_set(metatable, "__iter", qi_make_function(state, "OrderedTable.__iter", 1, __qistd588, NULL));
  3786. qi_table_set(metatable, "__len", qi_make_function(state, "OrderedTable.__len", 1, __qistd591, NULL));
  3787. qi_table_set(metatable, "__in", qi_make_function(state, "OrderedTable.__in", 2, __qistd594, NULL));
  3788. qi_table_set(metatable, "__del", qi_make_function(state, "OrderedTable.__del", 2, __qistd600, NULL));
  3789. qi_table_set(metatable, "__index", qi_make_function(state, "OrderedTable.__index", 2, __qistd608, NULL));
  3790. qi_table_set(metatable, "__index_set", qi_make_function(state, "OrderedTable.__index_set", 3, __qistd614, NULL));
  3791. qi_list_t *pargs = qi_list_make_n(5);
  3792. qi_list_data(pargs, 0) = qi_make_string(state, "OrderedTable");
  3793. qi_list_data(pargs, 1) = qi_make_list(state, supers);
  3794. qi_list_data(pargs, 2) = qi_make_table(state, table);
  3795. qi_list_data(pargs, 3) = qi_make_table(state, metatable);
  3796. qi_list_data(pargs, 4) = qi_make_table(state, statictable);
  3797. return qi_call(state, qi_get(state, "__class_wrapper"), pargs);
  3798. }
  3799. inline static qi_list_t *__qistd624(qi_state_t *state) {
  3800. qi_list_t *list = qi_list_make_n(2);
  3801. qi_list_data(list, 0) = qi_make_string(state, "list.reverse");
  3802. qi_list_data(list, 1) = qi_get(state, "reverse");
  3803. return list;
  3804. }
  3805. inline static qi_list_t *__qistd625(qi_state_t *state) {
  3806. qi_list_t *list = qi_list_make_n(2);
  3807. qi_list_data(list, 0) = qi_make_string(state, "string.reverse");
  3808. qi_list_data(list, 1) = qi_get(state, "reverse");
  3809. return list;
  3810. }
  3811. inline static qi_list_t *__qistd626(qi_state_t *state) {
  3812. qi_list_t *list = qi_list_make_n(2);
  3813. qi_list_data(list, 0) = qi_make_string(state, "bytes.reverse");
  3814. qi_list_data(list, 1) = qi_get(state, "reverse");
  3815. return list;
  3816. }
  3817. inline static qi_list_t *__qistd627(qi_state_t *state) {
  3818. qi_list_t *list = qi_list_make_n(2);
  3819. qi_list_data(list, 0) = qi_make_string(state, "list.remove");
  3820. qi_list_data(list, 1) = qi_get(state, "list_remove");
  3821. return list;
  3822. }
  3823. inline static qi_list_t *__qistd628(qi_state_t *state) {
  3824. qi_list_t *list = qi_list_make_n(2);
  3825. qi_list_data(list, 0) = qi_make_string(state, "list.join");
  3826. qi_list_data(list, 1) = qi_get(state, "list_join");
  3827. return list;
  3828. }
  3829. inline static qi_list_t *__qistd629(qi_state_t *state) {
  3830. qi_list_t *list = qi_list_make_n(2);
  3831. qi_list_data(list, 0) = qi_make_string(state, "list.popAt");
  3832. qi_list_data(list, 1) = qi_get(state, "list_pop_at");
  3833. return list;
  3834. }
  3835. inline static qi_list_t *__qistd630(qi_state_t *state) {
  3836. qi_list_t *list = qi_list_make_n(2);
  3837. qi_list_data(list, 0) = qi_make_string(state, "list.sort");
  3838. qi_list_data(list, 1) = qi_get(state, "list_sort");
  3839. return list;
  3840. }
  3841. inline static qi_list_t *__qistd631(qi_state_t *state) {
  3842. qi_list_t *list = qi_list_make_n(2);
  3843. qi_list_data(list, 0) = qi_make_string(state, "list.sorted");
  3844. qi_list_data(list, 1) = qi_get(state, "list_sorted");
  3845. return list;
  3846. }
  3847. inline static qi_list_t *__qistd632(qi_state_t *state) {
  3848. qi_list_t *list = qi_list_make_n(2);
  3849. qi_list_data(list, 0) = qi_make_string(state, "list.shift");
  3850. qi_list_data(list, 1) = qi_get(state, "list_shift");
  3851. return list;
  3852. }
  3853. inline static qi_list_t *__qistd633(qi_state_t *state) {
  3854. qi_list_t *list = qi_list_make_n(2);
  3855. qi_list_data(list, 0) = qi_make_string(state, "list.unshift");
  3856. qi_list_data(list, 1) = qi_get(state, "list_unshift");
  3857. return list;
  3858. }
  3859. inline static qi_list_t *__qistd634(qi_state_t *state) {
  3860. qi_list_t *list = qi_list_make_n(2);
  3861. qi_list_data(list, 0) = qi_make_string(state, "list.insert");
  3862. qi_list_data(list, 1) = qi_get(state, "list_insert");
  3863. return list;
  3864. }
  3865. inline static qi_list_t *__qistd635(qi_state_t *state) {
  3866. qi_list_t *list = qi_list_make_n(2);
  3867. qi_list_data(list, 0) = qi_make_string(state, "list.delete");
  3868. qi_list_data(list, 1) = qi_get(state, "list_delete");
  3869. return list;
  3870. }
  3871. inline static qi_list_t *__qistd636(qi_state_t *state) {
  3872. qi_list_t *list = qi_list_make_n(2);
  3873. qi_list_data(list, 0) = qi_make_string(state, "list.slice");
  3874. qi_list_data(list, 1) = qi_get(state, "slice");
  3875. return list;
  3876. }
  3877. inline static qi_list_t *__qistd637(qi_state_t *state) {
  3878. qi_list_t *list = qi_list_make_n(2);
  3879. qi_list_data(list, 0) = qi_make_string(state, "string.slice");
  3880. qi_list_data(list, 1) = qi_get(state, "slice");
  3881. return list;
  3882. }
  3883. inline static qi_list_t *__qistd638(qi_state_t *state) {
  3884. qi_list_t *list = qi_list_make_n(2);
  3885. qi_list_data(list, 0) = qi_make_string(state, "bytes.slice");
  3886. qi_list_data(list, 1) = qi_get(state, "slice");
  3887. return list;
  3888. }
  3889. inline static qi_list_t *__qistd639(qi_state_t *state) {
  3890. qi_list_t *list = qi_list_make_n(2);
  3891. qi_list_data(list, 0) = qi_make_string(state, "string.startsWith");
  3892. qi_list_data(list, 1) = qi_get(state, "str_startswith");
  3893. return list;
  3894. }
  3895. inline static qi_list_t *__qistd640(qi_state_t *state) {
  3896. qi_list_t *list = qi_list_make_n(2);
  3897. qi_list_data(list, 0) = qi_make_string(state, "string.endsWith");
  3898. qi_list_data(list, 1) = qi_get(state, "str_endswith");
  3899. return list;
  3900. }
  3901. inline static qi_list_t *__qistd641(qi_state_t *state) {
  3902. qi_list_t *list = qi_list_make_n(2);
  3903. qi_list_data(list, 0) = qi_make_string(state, "string.split");
  3904. qi_list_data(list, 1) = qi_get(state, "str_split");
  3905. return list;
  3906. }
  3907. inline static qi_list_t *__qistd642(qi_state_t *state) {
  3908. qi_list_t *list = qi_list_make_n(2);
  3909. qi_list_data(list, 0) = qi_make_string(state, "string.replace");
  3910. qi_list_data(list, 1) = qi_get(state, "str_replace");
  3911. return list;
  3912. }
  3913. inline static qi_list_t *__qistd643(qi_state_t *state) {
  3914. qi_list_t *list = qi_list_make_n(2);
  3915. qi_list_data(list, 0) = qi_make_string(state, "table.keys");
  3916. qi_list_data(list, 1) = qi_get(state, "table_keys");
  3917. return list;
  3918. }
  3919. inline static qi_list_t *__qistd644(qi_state_t *state) {
  3920. qi_list_t *list = qi_list_make_n(2);
  3921. qi_list_data(list, 0) = qi_make_string(state, "table.values");
  3922. qi_list_data(list, 1) = qi_get(state, "table_values");
  3923. return list;
  3924. }
  3925. inline static qi_list_t *__qistd648(qi_state_t *state) {
  3926. qi_list_t *list = qi_list_make_n(2);
  3927. qi_list_data(list, 0) = qi_get(state, "f");
  3928. qi_list_data(list, 1) = qi_get(state, "xs");
  3929. return list;
  3930. }
  3931. qi_value_t *__qistd646(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
  3932. qi_decl(state, "f", qi_list_index(pargs, 1));
  3933. qi_decl(state, "xs", qi_list_index(pargs, 0));
  3934. qi_value_t *__qistd647 = qi_call(state, qi_get(state, "reduce"), __qistd648(state));
  3935. return __qistd647;return state->nil;
  3936. }
  3937. inline static qi_list_t *__qistd645(qi_state_t *state) {
  3938. qi_list_t *list = qi_list_make_n(2);
  3939. qi_list_data(list, 0) = qi_make_string(state, "list.reduce");
  3940. qi_list_data(list, 1) = qi_make_function(state, "<anon>", 2, __qistd646, NULL);
  3941. return list;
  3942. }
  3943. inline static qi_list_t *__qistd652(qi_state_t *state) {
  3944. qi_list_t *list = qi_list_make_n(2);
  3945. qi_list_data(list, 0) = qi_get(state, "f");
  3946. qi_list_data(list, 1) = qi_get(state, "xs");
  3947. return list;
  3948. }
  3949. qi_value_t *__qistd650(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
  3950. qi_decl(state, "f", qi_list_index(pargs, 1));
  3951. qi_decl(state, "xs", qi_list_index(pargs, 0));
  3952. qi_value_t *__qistd651 = qi_call(state, qi_get(state, "reduce"), __qistd652(state));
  3953. return __qistd651;return state->nil;
  3954. }
  3955. inline static qi_list_t *__qistd649(qi_state_t *state) {
  3956. qi_list_t *list = qi_list_make_n(2);
  3957. qi_list_data(list, 0) = qi_make_string(state, "tuple.reduce");
  3958. qi_list_data(list, 1) = qi_make_function(state, "<anon>", 2, __qistd650, NULL);
  3959. return list;
  3960. }
  3961. inline static qi_list_t *__qistd656(qi_state_t *state) {
  3962. qi_list_t *list = qi_list_make_n(2);
  3963. qi_list_data(list, 0) = qi_get(state, "f");
  3964. qi_list_data(list, 1) = qi_get(state, "xs");
  3965. return list;
  3966. }
  3967. qi_value_t *__qistd654(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
  3968. qi_decl(state, "f", qi_list_index(pargs, 1));
  3969. qi_decl(state, "xs", qi_list_index(pargs, 0));
  3970. qi_value_t *__qistd655 = qi_call(state, qi_get(state, "reduce"), __qistd656(state));
  3971. return __qistd655;return state->nil;
  3972. }
  3973. inline static qi_list_t *__qistd653(qi_state_t *state) {
  3974. qi_list_t *list = qi_list_make_n(2);
  3975. qi_list_data(list, 0) = qi_make_string(state, "string.reduce");
  3976. qi_list_data(list, 1) = qi_make_function(state, "<anon>", 2, __qistd654, NULL);
  3977. return list;
  3978. }
  3979. inline static qi_list_t *__qistd660(qi_state_t *state) {
  3980. qi_list_t *list = qi_list_make_n(2);
  3981. qi_list_data(list, 0) = qi_get(state, "f");
  3982. qi_list_data(list, 1) = qi_get(state, "xs");
  3983. return list;
  3984. }
  3985. qi_value_t *__qistd658(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
  3986. qi_decl(state, "f", qi_list_index(pargs, 1));
  3987. qi_decl(state, "xs", qi_list_index(pargs, 0));
  3988. qi_value_t *__qistd659 = qi_call(state, qi_get(state, "reduce"), __qistd660(state));
  3989. return __qistd659;return state->nil;
  3990. }
  3991. inline static qi_list_t *__qistd657(qi_state_t *state) {
  3992. qi_list_t *list = qi_list_make_n(2);
  3993. qi_list_data(list, 0) = qi_make_string(state, "bytes.reduce");
  3994. qi_list_data(list, 1) = qi_make_function(state, "<anon>", 2, __qistd658, NULL);
  3995. return list;
  3996. }
  3997. inline static qi_list_t *__qistd661(qi_state_t *state) {
  3998. qi_list_t *list = qi_list_make_n(2);
  3999. qi_list_data(list, 0) = qi_make_string(state, "list.sum");
  4000. qi_list_data(list, 1) = qi_get(state, "sum");
  4001. return list;
  4002. }
  4003. inline static qi_list_t *__qistd662(qi_state_t *state) {
  4004. qi_list_t *list = qi_list_make_n(2);
  4005. qi_list_data(list, 0) = qi_make_string(state, "tuple.sum");
  4006. qi_list_data(list, 1) = qi_get(state, "sum");
  4007. return list;
  4008. }
  4009. inline static qi_list_t *__qistd663(qi_state_t *state) {
  4010. qi_list_t *list = qi_list_make_n(2);
  4011. qi_list_data(list, 0) = qi_make_string(state, "list.product");
  4012. qi_list_data(list, 1) = qi_get(state, "product");
  4013. return list;
  4014. }
  4015. inline static qi_list_t *__qistd664(qi_state_t *state) {
  4016. qi_list_t *list = qi_list_make_n(2);
  4017. qi_list_data(list, 0) = qi_make_string(state, "tuple.product");
  4018. qi_list_data(list, 1) = qi_get(state, "product");
  4019. return list;
  4020. }
  4021. inline static qi_list_t *__qistd665(qi_state_t *state) {
  4022. qi_list_t *list = qi_list_make_n(2);
  4023. qi_list_data(list, 0) = qi_make_string(state, "list.all");
  4024. qi_list_data(list, 1) = qi_get(state, "all");
  4025. return list;
  4026. }
  4027. inline static qi_list_t *__qistd666(qi_state_t *state) {
  4028. qi_list_t *list = qi_list_make_n(2);
  4029. qi_list_data(list, 0) = qi_make_string(state, "tuple.all");
  4030. qi_list_data(list, 1) = qi_get(state, "all");
  4031. return list;
  4032. }
  4033. inline static qi_list_t *__qistd667(qi_state_t *state) {
  4034. qi_list_t *list = qi_list_make_n(2);
  4035. qi_list_data(list, 0) = qi_make_string(state, "list.any");
  4036. qi_list_data(list, 1) = qi_get(state, "any");
  4037. return list;
  4038. }
  4039. inline static qi_list_t *__qistd668(qi_state_t *state) {
  4040. qi_list_t *list = qi_list_make_n(2);
  4041. qi_list_data(list, 0) = qi_make_string(state, "tuple.any");
  4042. qi_list_data(list, 1) = qi_get(state, "any");
  4043. return list;
  4044. }
  4045. inline static qi_list_t *__qistd672(qi_state_t *state) {
  4046. qi_list_t *list = qi_list_make_n(2);
  4047. qi_list_data(list, 0) = qi_get(state, "f");
  4048. qi_list_data(list, 1) = qi_get(state, "xs");
  4049. return list;
  4050. }
  4051. qi_value_t *__qistd670(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
  4052. qi_decl(state, "f", qi_list_index(pargs, 1));
  4053. qi_decl(state, "xs", qi_list_index(pargs, 0));
  4054. qi_value_t *__qistd671 = qi_call(state, qi_get(state, "map"), __qistd672(state));
  4055. return __qistd671;return state->nil;
  4056. }
  4057. inline static qi_list_t *__qistd669(qi_state_t *state) {
  4058. qi_list_t *list = qi_list_make_n(2);
  4059. qi_list_data(list, 0) = qi_make_string(state, "list.map");
  4060. qi_list_data(list, 1) = qi_make_function(state, "<anon>", 2, __qistd670, NULL);
  4061. return list;
  4062. }
  4063. inline static qi_list_t *__qistd676(qi_state_t *state) {
  4064. qi_list_t *list = qi_list_make_n(2);
  4065. qi_list_data(list, 0) = qi_get(state, "f");
  4066. qi_list_data(list, 1) = qi_get(state, "xs");
  4067. return list;
  4068. }
  4069. qi_value_t *__qistd674(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
  4070. qi_decl(state, "f", qi_list_index(pargs, 1));
  4071. qi_decl(state, "xs", qi_list_index(pargs, 0));
  4072. qi_value_t *__qistd675 = qi_call(state, qi_get(state, "map"), __qistd676(state));
  4073. return __qistd675;return state->nil;
  4074. }
  4075. inline static qi_list_t *__qistd673(qi_state_t *state) {
  4076. qi_list_t *list = qi_list_make_n(2);
  4077. qi_list_data(list, 0) = qi_make_string(state, "tuple.map");
  4078. qi_list_data(list, 1) = qi_make_function(state, "<anon>", 2, __qistd674, NULL);
  4079. return list;
  4080. }
  4081. inline static qi_list_t *__qistd680(qi_state_t *state) {
  4082. qi_list_t *list = qi_list_make_n(2);
  4083. qi_list_data(list, 0) = qi_get(state, "f");
  4084. qi_list_data(list, 1) = qi_get(state, "xs");
  4085. return list;
  4086. }
  4087. qi_value_t *__qistd678(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
  4088. qi_decl(state, "f", qi_list_index(pargs, 1));
  4089. qi_decl(state, "xs", qi_list_index(pargs, 0));
  4090. qi_value_t *__qistd679 = qi_call(state, qi_get(state, "map"), __qistd680(state));
  4091. return __qistd679;return state->nil;
  4092. }
  4093. inline static qi_list_t *__qistd677(qi_state_t *state) {
  4094. qi_list_t *list = qi_list_make_n(2);
  4095. qi_list_data(list, 0) = qi_make_string(state, "string.map");
  4096. qi_list_data(list, 1) = qi_make_function(state, "<anon>", 2, __qistd678, NULL);
  4097. return list;
  4098. }
  4099. inline static qi_list_t *__qistd684(qi_state_t *state) {
  4100. qi_list_t *list = qi_list_make_n(2);
  4101. qi_list_data(list, 0) = qi_get(state, "f");
  4102. qi_list_data(list, 1) = qi_get(state, "xs");
  4103. return list;
  4104. }
  4105. qi_value_t *__qistd682(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
  4106. qi_decl(state, "f", qi_list_index(pargs, 1));
  4107. qi_decl(state, "xs", qi_list_index(pargs, 0));
  4108. qi_value_t *__qistd683 = qi_call(state, qi_get(state, "map"), __qistd684(state));
  4109. return __qistd683;return state->nil;
  4110. }
  4111. inline static qi_list_t *__qistd681(qi_state_t *state) {
  4112. qi_list_t *list = qi_list_make_n(2);
  4113. qi_list_data(list, 0) = qi_make_string(state, "bytes.map");
  4114. qi_list_data(list, 1) = qi_make_function(state, "<anon>", 2, __qistd682, NULL);
  4115. return list;
  4116. }
  4117. inline static qi_list_t *__qistd688(qi_state_t *state) {
  4118. qi_list_t *list = qi_list_make_n(2);
  4119. qi_list_data(list, 0) = qi_get(state, "f");
  4120. qi_list_data(list, 1) = qi_get(state, "xs");
  4121. return list;
  4122. }
  4123. qi_value_t *__qistd686(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
  4124. qi_decl(state, "f", qi_list_index(pargs, 1));
  4125. qi_decl(state, "xs", qi_list_index(pargs, 0));
  4126. qi_value_t *__qistd687 = qi_call(state, qi_get(state, "filter"), __qistd688(state));
  4127. return __qistd687;return state->nil;
  4128. }
  4129. inline static qi_list_t *__qistd685(qi_state_t *state) {
  4130. qi_list_t *list = qi_list_make_n(2);
  4131. qi_list_data(list, 0) = qi_make_string(state, "list.filter");
  4132. qi_list_data(list, 1) = qi_make_function(state, "<anon>", 2, __qistd686, NULL);
  4133. return list;
  4134. }
  4135. inline static qi_list_t *__qistd692(qi_state_t *state) {
  4136. qi_list_t *list = qi_list_make_n(2);
  4137. qi_list_data(list, 0) = qi_get(state, "f");
  4138. qi_list_data(list, 1) = qi_get(state, "xs");
  4139. return list;
  4140. }
  4141. qi_value_t *__qistd690(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
  4142. qi_decl(state, "f", qi_list_index(pargs, 1));
  4143. qi_decl(state, "xs", qi_list_index(pargs, 0));
  4144. qi_value_t *__qistd691 = qi_call(state, qi_get(state, "filter"), __qistd692(state));
  4145. return __qistd691;return state->nil;
  4146. }
  4147. inline static qi_list_t *__qistd689(qi_state_t *state) {
  4148. qi_list_t *list = qi_list_make_n(2);
  4149. qi_list_data(list, 0) = qi_make_string(state, "tuple.filter");
  4150. qi_list_data(list, 1) = qi_make_function(state, "<anon>", 2, __qistd690, NULL);
  4151. return list;
  4152. }
  4153. inline static qi_list_t *__qistd696(qi_state_t *state) {
  4154. qi_list_t *list = qi_list_make_n(2);
  4155. qi_list_data(list, 0) = qi_get(state, "f");
  4156. qi_list_data(list, 1) = qi_get(state, "xs");
  4157. return list;
  4158. }
  4159. qi_value_t *__qistd694(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
  4160. qi_decl(state, "f", qi_list_index(pargs, 1));
  4161. qi_decl(state, "xs", qi_list_index(pargs, 0));
  4162. qi_value_t *__qistd695 = qi_call(state, qi_get(state, "filter"), __qistd696(state));
  4163. return __qistd695;return state->nil;
  4164. }
  4165. inline static qi_list_t *__qistd693(qi_state_t *state) {
  4166. qi_list_t *list = qi_list_make_n(2);
  4167. qi_list_data(list, 0) = qi_make_string(state, "string.filter");
  4168. qi_list_data(list, 1) = qi_make_function(state, "<anon>", 2, __qistd694, NULL);
  4169. return list;
  4170. }
  4171. inline static qi_list_t *__qistd700(qi_state_t *state) {
  4172. qi_list_t *list = qi_list_make_n(2);
  4173. qi_list_data(list, 0) = qi_get(state, "f");
  4174. qi_list_data(list, 1) = qi_get(state, "xs");
  4175. return list;
  4176. }
  4177. qi_value_t *__qistd698(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
  4178. qi_decl(state, "f", qi_list_index(pargs, 1));
  4179. qi_decl(state, "xs", qi_list_index(pargs, 0));
  4180. qi_value_t *__qistd699 = qi_call(state, qi_get(state, "filter"), __qistd700(state));
  4181. return __qistd699;return state->nil;
  4182. }
  4183. inline static qi_list_t *__qistd697(qi_state_t *state) {
  4184. qi_list_t *list = qi_list_make_n(2);
  4185. qi_list_data(list, 0) = qi_make_string(state, "bytes.filter");
  4186. qi_list_data(list, 1) = qi_make_function(state, "<anon>", 2, __qistd698, NULL);
  4187. return list;
  4188. }
  4189. inline static qi_list_t *__qistd701(qi_state_t *state) {
  4190. qi_list_t *list = qi_list_make_n(2);
  4191. qi_list_data(list, 0) = qi_make_string(state, "string.index");
  4192. qi_list_data(list, 1) = qi_get(state, "str_index");
  4193. return list;
  4194. }
  4195. inline static qi_list_t *__qistd702(qi_state_t *state) {
  4196. qi_list_t *list = qi_list_make_n(2);
  4197. qi_list_data(list, 0) = qi_make_string(state, "string.lstrip");
  4198. qi_list_data(list, 1) = qi_get(state, "str_lstrip");
  4199. return list;
  4200. }
  4201. inline static qi_list_t *__qistd703(qi_state_t *state) {
  4202. qi_list_t *list = qi_list_make_n(2);
  4203. qi_list_data(list, 0) = qi_make_string(state, "string.rstrip");
  4204. qi_list_data(list, 1) = qi_get(state, "str_rstrip");
  4205. return list;
  4206. }
  4207. inline static qi_list_t *__qistd704(qi_state_t *state) {
  4208. qi_list_t *list = qi_list_make_n(2);
  4209. qi_list_data(list, 0) = qi_make_string(state, "string.strip");
  4210. qi_list_data(list, 1) = qi_get(state, "str_strip");
  4211. return list;
  4212. }
  4213. inline static qi_list_t *__qistd705(qi_state_t *state) {
  4214. qi_list_t *list = qi_list_make_n(2);
  4215. qi_list_data(list, 0) = qi_make_string(state, "string.toupper");
  4216. qi_list_data(list, 1) = qi_get(state, "str_toupper");
  4217. return list;
  4218. }
  4219. inline static qi_list_t *__qistd706(qi_state_t *state) {
  4220. qi_list_t *list = qi_list_make_n(2);
  4221. qi_list_data(list, 0) = qi_make_string(state, "string.tolower");
  4222. qi_list_data(list, 1) = qi_get(state, "str_tolower");
  4223. return list;
  4224. }
  4225. inline static qi_list_t *__qistd707(qi_state_t *state) {
  4226. qi_list_t *list = qi_list_make_n(2);
  4227. qi_list_data(list, 0) = qi_make_string(state, "string.format");
  4228. qi_list_data(list, 1) = qi_get(state, "format");
  4229. return list;
  4230. }
  4231. inline static qi_list_t *__qistd708(qi_state_t *state) {
  4232. qi_list_t *list = qi_list_make_n(2);
  4233. qi_list_data(list, 0) = qi_make_string(state, "string.formatl");
  4234. qi_list_data(list, 1) = qi_get(state, "formatl");
  4235. return list;
  4236. }
  4237. inline static qi_list_t *__qistd709(qi_state_t *state) {
  4238. qi_list_t *list = qi_list_make_n(2);
  4239. qi_list_data(list, 0) = qi_make_string(state, "string.formatd");
  4240. qi_list_data(list, 1) = qi_get(state, "formatd");
  4241. return list;
  4242. }
  4243. qi_value_t *__qistd711(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
  4244. return state->nil;
  4245. }
  4246. inline static qi_list_t *__qistd710(qi_state_t *state) {
  4247. qi_list_t *list = qi_list_make_n(2);
  4248. qi_list_data(list, 0) = qi_make_string(state, "file.__enter");
  4249. qi_list_data(list, 1) = qi_make_function(state, "<anon>", 0, __qistd711, NULL);
  4250. return list;
  4251. }
  4252. inline static qi_list_t *__qistd715(qi_state_t *state) {
  4253. qi_list_t *list = qi_list_make_n(1);
  4254. qi_list_data(list, 0) = qi_get(state, "f");
  4255. return list;
  4256. }
  4257. qi_value_t *__qistd713(qi_state_t *state, qi_size_t pargc, qi_list_t *pargs) {
  4258. qi_decl(state, "f", qi_list_index(pargs, 0));
  4259. qi_value_t *__qistd714 = qi_call(state, qi_get(state, "fclose"), __qistd715(state));
  4260. return __qistd714;return state->nil;
  4261. }
  4262. inline static qi_list_t *__qistd712(qi_state_t *state) {
  4263. qi_list_t *list = qi_list_make_n(2);
  4264. qi_list_data(list, 0) = qi_make_string(state, "file.__leave");
  4265. qi_list_data(list, 1) = qi_make_function(state, "<anon>", 1, __qistd713, NULL);
  4266. return list;
  4267. }
  4268. inline static qi_list_t *__qistd716(qi_state_t *state) {
  4269. qi_list_t *list = qi_list_make_n(2);
  4270. qi_list_data(list, 0) = qi_make_string(state, "file.close");
  4271. qi_list_data(list, 1) = qi_get(state, "fclose");
  4272. return list;
  4273. }
  4274. inline static qi_list_t *__qistd717(qi_state_t *state) {
  4275. qi_list_t *list = qi_list_make_n(2);
  4276. qi_list_data(list, 0) = qi_make_string(state, "file.flush");
  4277. qi_list_data(list, 1) = qi_get(state, "fflush");
  4278. return list;
  4279. }
  4280. inline static qi_list_t *__qistd718(qi_state_t *state) {
  4281. qi_list_t *list = qi_list_make_n(2);
  4282. qi_list_data(list, 0) = qi_make_string(state, "file.seek");
  4283. qi_list_data(list, 1) = qi_get(state, "fseek");
  4284. return list;
  4285. }
  4286. inline static qi_list_t *__qistd719(qi_state_t *state) {
  4287. qi_list_t *list = qi_list_make_n(2);
  4288. qi_list_data(list, 0) = qi_make_string(state, "file.getc");
  4289. qi_list_data(list, 1) = qi_get(state, "fgetc");
  4290. return list;
  4291. }
  4292. inline static qi_list_t *__qistd720(qi_state_t *state) {
  4293. qi_list_t *list = qi_list_make_n(2);
  4294. qi_list_data(list, 0) = qi_make_string(state, "file.putc");
  4295. qi_list_data(list, 1) = qi_get(state, "fputc");
  4296. return list;
  4297. }
  4298. inline static qi_list_t *__qistd721(qi_state_t *state) {
  4299. qi_list_t *list = qi_list_make_n(2);
  4300. qi_list_data(list, 0) = qi_make_string(state, "file.gets");
  4301. qi_list_data(list, 1) = qi_get(state, "fgets");
  4302. return list;
  4303. }
  4304. inline static qi_list_t *__qistd722(qi_state_t *state) {
  4305. qi_list_t *list = qi_list_make_n(2);
  4306. qi_list_data(list, 0) = qi_make_string(state, "file.puts");
  4307. qi_list_data(list, 1) = qi_get(state, "fputs");
  4308. return list;
  4309. }
  4310. inline static qi_list_t *__qistd723(qi_state_t *state) {
  4311. qi_list_t *list = qi_list_make_n(2);
  4312. qi_list_data(list, 0) = qi_make_string(state, "file.tell");
  4313. qi_list_data(list, 1) = qi_get(state, "ftell");
  4314. return list;
  4315. }
  4316. inline static qi_list_t *__qistd724(qi_state_t *state) {
  4317. qi_list_t *list = qi_list_make_n(2);
  4318. qi_list_data(list, 0) = qi_make_string(state, "reference.deref");
  4319. qi_list_data(list, 1) = qi_get(state, "deref");
  4320. return list;
  4321. }
  4322. inline static qi_list_t *__qistd725(qi_state_t *state) {
  4323. qi_list_t *list = qi_list_make_n(2);
  4324. qi_list_data(list, 0) = qi_make_string(state, "reference.set");
  4325. qi_list_data(list, 1) = qi_get(state, "ref_set");
  4326. return list;
  4327. }
  4328. static void qi_init_std(qi_state_t *state) {
  4329. qi_set(state, false, "Object", qi_make_function(state, "Object", 1, __qistd0, NULL));
  4330. qi_set(state, false, "is_object", qi_make_function(state, "is_object", 1, __qistd5, NULL));
  4331. qi_set(state, false, "__class_wrapper", qi_make_function(state, "__class_wrapper", 5, __qistd8, NULL));
  4332. qi_set(state, false, "Error", __qistd30(state));qi_set(state, false, "AssertionError", __qistd36(state));qi_set(state, false, "TypeError", __qistd37(state));qi_set(state, false, "ValueError", __qistd38(state));qi_set(state, false, "IndexError", __qistd39(state));qi_set(state, false, "KeyError", __qistd40(state));qi_set(state, false, "RecursionError", __qistd41(state));qi_set(state, false, "NameError", __qistd42(state));qi_set(state, false, "IOError", __qistd43(state));qi_set(state, false, "isinstance", qi_make_function(state, "isinstance", 2, __qistd44, NULL));
  4333. qi_set(state, false, "head", qi_make_function(state, "head", 1, __qistd48, NULL));
  4334. qi_set(state, false, "tail", qi_make_function(state, "tail", 1, __qistd50, NULL));
  4335. qi_set(state, false, "min", qi_make_function(state, "min", 2, __qistd53, NULL));
  4336. qi_set(state, false, "max", qi_make_function(state, "max", 2, __qistd55, NULL));
  4337. qi_set(state, false, "reverse", qi_make_function(state, "reverse", 1, __qistd57, NULL));
  4338. qi_set(state, false, "range", qi_make_function(state, "range", 1, __qistd72, NULL));
  4339. qi_set(state, false, "frewind", qi_make_function(state, "frewind", 1, __qistd90, NULL));
  4340. qi_set(state, false, "read_stdin", qi_make_function(state, "read_stdin", 0, __qistd92, NULL));
  4341. qi_set(state, false, "file_read", qi_make_function(state, "file_read", 1, __qistd96, NULL));
  4342. qi_set(state, false, "file_write", qi_make_function(state, "file_write", 2, __qistd103, NULL));
  4343. qi_set(state, false, "is_defined", qi_make_function(state, "is_defined", 1, __qistd109, NULL));
  4344. qi_set(state, false, "is_table", qi_make_function(state, "is_table", 1, __qistd113, NULL));
  4345. qi_set(state, false, "list_remove", qi_make_function(state, "list_remove", 2, __qistd114, NULL));
  4346. qi_set(state, false, "list_join", qi_make_function(state, "list_join", 1, __qistd122, NULL));
  4347. qi_set(state, false, "list_pop_at", qi_make_function(state, "list_pop_at", 2, __qistd136, NULL));
  4348. qi_set(state, false, "__cmp", qi_make_function(state, "__cmp", 2, __qistd145, NULL));
  4349. qi_set(state, false, "list_sort", qi_make_function(state, "list_sort", 1, __qistd147, NULL));
  4350. qi_set(state, false, "list_sorted", qi_make_function(state, "list_sorted", 1, __qistd161, NULL));
  4351. qi_set(state, false, "list_shift", qi_make_function(state, "list_shift", 1, __qistd165, NULL));
  4352. qi_set(state, false, "list_unshift", qi_make_function(state, "list_unshift", 2, __qistd173, NULL));
  4353. qi_set(state, false, "slice", qi_make_function(state, "slice", 1, __qistd175, NULL));
  4354. qi_set(state, false, "str_startswith", qi_make_function(state, "str_startswith", 2, __qistd210, NULL));
  4355. qi_set(state, false, "str_endswith", qi_make_function(state, "str_endswith", 2, __qistd220, NULL));
  4356. qi_set(state, false, "str_split", qi_make_function(state, "str_split", 1, __qistd231, NULL));
  4357. qi_set(state, false, "str_replace", qi_make_function(state, "str_replace", 3, __qistd249, NULL));
  4358. qi_set(state, false, "table_keys", qi_make_function(state, "table_keys", 1, __qistd265, NULL));
  4359. qi_set(state, false, "table_values", qi_make_function(state, "table_values", 1, __qistd273, NULL));
  4360. qi_set(state, false, "reduce", qi_make_function(state, "reduce", 2, __qistd281, NULL));
  4361. qi_set(state, false, "sum", qi_make_function(state, "sum", 1, __qistd305, NULL));
  4362. qi_set(state, false, "product", qi_make_function(state, "product", 1, __qistd310, NULL));
  4363. qi_set(state, false, "all", qi_make_function(state, "all", 1, __qistd315, NULL));
  4364. qi_set(state, false, "any", qi_make_function(state, "any", 1, __qistd320, NULL));
  4365. qi_set(state, false, "map", qi_make_function(state, "map", 2, __qistd325, NULL));
  4366. qi_set(state, false, "filter", qi_make_function(state, "filter", 2, __qistd349, NULL));
  4367. qi_set(state, false, "str_index", qi_make_function(state, "str_index", 2, __qistd373, NULL));
  4368. qi_set(state, false, "str_lstrip", qi_make_function(state, "str_lstrip", 1, __qistd389, NULL));
  4369. qi_set(state, false, "str_rstrip", qi_make_function(state, "str_rstrip", 1, __qistd401, NULL));
  4370. qi_set(state, false, "str_strip", qi_make_function(state, "str_strip", 1, __qistd414, NULL));
  4371. qi_set(state, false, "zip", qi_make_function(state, "zip", 0, __qistd424, NULL));
  4372. qi_set(state, false, "enumerate", qi_make_function(state, "enumerate", 1, __qistd434, NULL));
  4373. qi_set(state, false, "str_toupper", qi_make_function(state, "str_toupper", 1, __qistd444, NULL));
  4374. qi_set(state, false, "str_tolower", qi_make_function(state, "str_tolower", 1, __qistd454, NULL));
  4375. qi_set(state, false, "hex", qi_make_function(state, "hex", 1, __qistd464, NULL));
  4376. qi_set(state, false, "oct", qi_make_function(state, "oct", 1, __qistd471, NULL));
  4377. qi_set(state, false, "format", qi_make_function(state, "format", 1, __qistd478, NULL));
  4378. qi_set(state, false, "formatl", qi_make_function(state, "formatl", 2, __qistd490, NULL));
  4379. qi_set(state, false, "formatd", qi_make_function(state, "formatd", 2, __qistd500, NULL));
  4380. qi_set(state, false, "getch", qi_make_function(state, "getch", 0, __qistd517, NULL));
  4381. qi_set(state, false, "putch", qi_make_function(state, "putch", 1, __qistd521, NULL));
  4382. qi_set(state, false, "getline", qi_make_function(state, "getline", 0, __qistd523, NULL));
  4383. qi_set(state, false, "input", qi_make_function(state, "input", 0, __qistd526, NULL));
  4384. qi_set(state, false, "open", qi_make_function(state, "open", 1, __qistd531, NULL));
  4385. qi_set(state, false, "assert", qi_make_function(state, "assert", 1, __qistd534, NULL));
  4386. qi_set(state, false, "ListIterator", __qistd535(state));qi_set(state, false, "OrderedTable", __qistd547(state));(void)(qi_call(state, qi_get(state, "set_pseudomethod"), __qistd624(state)));
  4387. (void)(qi_call(state, qi_get(state, "set_pseudomethod"), __qistd625(state)));
  4388. (void)(qi_call(state, qi_get(state, "set_pseudomethod"), __qistd626(state)));
  4389. qi_decl_const(state, "SEEK_END", qi_make_number(state, 2));
  4390. qi_decl_const(state, "SEEK_CUR", qi_make_number(state, 1));
  4391. qi_decl_const(state, "SEEK_SET", qi_make_number(state, 0));
  4392. (void)(qi_call(state, qi_get(state, "set_pseudomethod"), __qistd627(state)));
  4393. (void)(qi_call(state, qi_get(state, "set_pseudomethod"), __qistd628(state)));
  4394. (void)(qi_call(state, qi_get(state, "set_pseudomethod"), __qistd629(state)));
  4395. (void)(qi_call(state, qi_get(state, "set_pseudomethod"), __qistd630(state)));
  4396. (void)(qi_call(state, qi_get(state, "set_pseudomethod"), __qistd631(state)));
  4397. (void)(qi_call(state, qi_get(state, "set_pseudomethod"), __qistd632(state)));
  4398. (void)(qi_call(state, qi_get(state, "set_pseudomethod"), __qistd633(state)));
  4399. (void)(qi_call(state, qi_get(state, "set_pseudomethod"), __qistd634(state)));
  4400. (void)(qi_call(state, qi_get(state, "set_pseudomethod"), __qistd635(state)));
  4401. (void)(qi_call(state, qi_get(state, "set_pseudomethod"), __qistd636(state)));
  4402. (void)(qi_call(state, qi_get(state, "set_pseudomethod"), __qistd637(state)));
  4403. (void)(qi_call(state, qi_get(state, "set_pseudomethod"), __qistd638(state)));
  4404. qi_decl_const(state, "__slice", qi_get(state, "slice"));
  4405. (void)(qi_call(state, qi_get(state, "set_pseudomethod"), __qistd639(state)));
  4406. (void)(qi_call(state, qi_get(state, "set_pseudomethod"), __qistd640(state)));
  4407. (void)(qi_call(state, qi_get(state, "set_pseudomethod"), __qistd641(state)));
  4408. (void)(qi_call(state, qi_get(state, "set_pseudomethod"), __qistd642(state)));
  4409. (void)(qi_call(state, qi_get(state, "set_pseudomethod"), __qistd643(state)));
  4410. (void)(qi_call(state, qi_get(state, "set_pseudomethod"), __qistd644(state)));
  4411. (void)(qi_call(state, qi_get(state, "set_pseudomethod"), __qistd645(state)));
  4412. (void)(qi_call(state, qi_get(state, "set_pseudomethod"), __qistd649(state)));
  4413. (void)(qi_call(state, qi_get(state, "set_pseudomethod"), __qistd653(state)));
  4414. (void)(qi_call(state, qi_get(state, "set_pseudomethod"), __qistd657(state)));
  4415. (void)(qi_call(state, qi_get(state, "set_pseudomethod"), __qistd661(state)));
  4416. (void)(qi_call(state, qi_get(state, "set_pseudomethod"), __qistd662(state)));
  4417. (void)(qi_call(state, qi_get(state, "set_pseudomethod"), __qistd663(state)));
  4418. (void)(qi_call(state, qi_get(state, "set_pseudomethod"), __qistd664(state)));
  4419. (void)(qi_call(state, qi_get(state, "set_pseudomethod"), __qistd665(state)));
  4420. (void)(qi_call(state, qi_get(state, "set_pseudomethod"), __qistd666(state)));
  4421. (void)(qi_call(state, qi_get(state, "set_pseudomethod"), __qistd667(state)));
  4422. (void)(qi_call(state, qi_get(state, "set_pseudomethod"), __qistd668(state)));
  4423. (void)(qi_call(state, qi_get(state, "set_pseudomethod"), __qistd669(state)));
  4424. (void)(qi_call(state, qi_get(state, "set_pseudomethod"), __qistd673(state)));
  4425. (void)(qi_call(state, qi_get(state, "set_pseudomethod"), __qistd677(state)));
  4426. (void)(qi_call(state, qi_get(state, "set_pseudomethod"), __qistd681(state)));
  4427. (void)(qi_call(state, qi_get(state, "set_pseudomethod"), __qistd685(state)));
  4428. (void)(qi_call(state, qi_get(state, "set_pseudomethod"), __qistd689(state)));
  4429. (void)(qi_call(state, qi_get(state, "set_pseudomethod"), __qistd693(state)));
  4430. (void)(qi_call(state, qi_get(state, "set_pseudomethod"), __qistd697(state)));
  4431. (void)(qi_call(state, qi_get(state, "set_pseudomethod"), __qistd701(state)));
  4432. (void)(qi_call(state, qi_get(state, "set_pseudomethod"), __qistd702(state)));
  4433. (void)(qi_call(state, qi_get(state, "set_pseudomethod"), __qistd703(state)));
  4434. (void)(qi_call(state, qi_get(state, "set_pseudomethod"), __qistd704(state)));
  4435. (void)(qi_call(state, qi_get(state, "set_pseudomethod"), __qistd705(state)));
  4436. (void)(qi_call(state, qi_get(state, "set_pseudomethod"), __qistd706(state)));
  4437. (void)(qi_call(state, qi_get(state, "set_pseudomethod"), __qistd707(state)));
  4438. (void)(qi_call(state, qi_get(state, "set_pseudomethod"), __qistd708(state)));
  4439. (void)(qi_call(state, qi_get(state, "set_pseudomethod"), __qistd709(state)));
  4440. (void)(qi_call(state, qi_get(state, "set_pseudomethod"), __qistd710(state)));
  4441. (void)(qi_call(state, qi_get(state, "set_pseudomethod"), __qistd712(state)));
  4442. (void)(qi_call(state, qi_get(state, "set_pseudomethod"), __qistd716(state)));
  4443. (void)(qi_call(state, qi_get(state, "set_pseudomethod"), __qistd717(state)));
  4444. (void)(qi_call(state, qi_get(state, "set_pseudomethod"), __qistd718(state)));
  4445. (void)(qi_call(state, qi_get(state, "set_pseudomethod"), __qistd719(state)));
  4446. (void)(qi_call(state, qi_get(state, "set_pseudomethod"), __qistd720(state)));
  4447. (void)(qi_call(state, qi_get(state, "set_pseudomethod"), __qistd721(state)));
  4448. (void)(qi_call(state, qi_get(state, "set_pseudomethod"), __qistd722(state)));
  4449. (void)(qi_call(state, qi_get(state, "set_pseudomethod"), __qistd723(state)));
  4450. (void)(qi_call(state, qi_get(state, "set_pseudomethod"), __qistd724(state)));
  4451. (void)(qi_call(state, qi_get(state, "set_pseudomethod"), __qistd725(state)));
  4452. }