qistd.c 195 KB

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