qistd.c 187 KB

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