| 1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556575859606162636465666768697071727374757677787980818283848586878889909192939495969798991001011021031041051061071081091101111121131141151161171181191201211221231241251261271281291301311321331341351361371381391401411421431441451461471481491501511521531541551561571581591601611621631641651661671681691701711721731741751761771781791801811821831841851861871881891901911921931941951961971981992002012022032042052062072082092102112122132142152162172182192202212222232242252262272282292302312322332342352362372382392402412422432442452462472482492502512522532542552562572582592602612622632642652662672682692702712722732742752762772782792802812822832842852862872882892902912922932942952962972982993003013023033043053063073083093103113123133143153163173183193203213223233243253263273283293303313323333343353363373383393403413423433443453463473483493503513523533543553563573583593603613623633643653663673683693703713723733743753763773783793803813823833843853863873883893903913923933943953963973983994004014024034044054064074084094104114124134144154164174184194204214224234244254264274284294304314324334344354364374384394404414424434444454464474484494504514524534544554564574584594604614624634644654664674684694704714724734744754764774784794804814824834844854864874884894904914924934944954964974984995005015025035045055065075085095105115125135145155165175185195205215225235245255265275285295305315325335345355365375385395405415425435445455465475485495505515525535545555565575585595605615625635645655665675685695705715725735745755765775785795805815825835845855865875885895905915925935945955965975985996006016026036046056066076086096106116126136146156166176186196206216226236246256266276286296306316326336346356366376386396406416426436446456466476486496506516526536546556566576586596606616626636646656666676686696706716726736746756766776786796806816826836846856866876886896906916926936946956966976986997007017027037047057067077087097107117127137147157167177187197207217227237247257267277287297307317327337347357367377387397407417427437447457467477487497507517527537547557567577587597607617627637647657667677687697707717727737747757767777787797807817827837847857867877887897907917927937947957967977987998008018028038048058068078088098108118128138148158168178188198208218228238248258268278288298308318328338348358368378388398408418428438448458468478488498508518528538548558568578588598608618628638648658668678688698708718728738748758768778788798808818828838848858868878888898908918928938948958968978988999009019029039049059069079089099109119129139149159169179189199209219229239249259269279289299309319329339349359369379389399409419429439449459469479489499509519529539549559569579589599609619629639649659669679689699709719729739749759769779789799809819829839849859869879889899909919929939949959969979989991000100110021003100410051006100710081009101010111012101310141015101610171018101910201021102210231024102510261027102810291030103110321033103410351036103710381039104010411042104310441045104610471048104910501051105210531054105510561057105810591060106110621063106410651066106710681069107010711072107310741075107610771078107910801081108210831084108510861087108810891090109110921093109410951096109710981099110011011102110311041105110611071108110911101111111211131114111511161117111811191120112111221123112411251126112711281129113011311132113311341135113611371138113911401141114211431144114511461147114811491150115111521153115411551156115711581159116011611162116311641165116611671168116911701171117211731174117511761177117811791180118111821183118411851186118711881189119011911192119311941195119611971198119912001201120212031204120512061207120812091210121112121213121412151216121712181219122012211222122312241225122612271228122912301231123212331234123512361237123812391240124112421243124412451246124712481249125012511252125312541255125612571258125912601261126212631264126512661267126812691270127112721273127412751276127712781279128012811282128312841285128612871288128912901291129212931294129512961297129812991300130113021303130413051306130713081309131013111312131313141315131613171318131913201321132213231324132513261327132813291330133113321333133413351336133713381339134013411342134313441345134613471348134913501351135213531354135513561357135813591360136113621363136413651366136713681369137013711372137313741375137613771378137913801381138213831384138513861387138813891390139113921393139413951396139713981399140014011402140314041405140614071408140914101411141214131414141514161417141814191420142114221423142414251426142714281429143014311432143314341435143614371438143914401441144214431444144514461447144814491450145114521453145414551456145714581459146014611462146314641465146614671468146914701471147214731474147514761477147814791480148114821483148414851486148714881489149014911492149314941495149614971498149915001501150215031504150515061507150815091510151115121513151415151516151715181519152015211522152315241525152615271528152915301531153215331534153515361537153815391540154115421543154415451546154715481549155015511552155315541555155615571558155915601561156215631564156515661567156815691570157115721573157415751576157715781579158015811582158315841585158615871588158915901591159215931594159515961597159815991600160116021603160416051606160716081609161016111612161316141615161616171618161916201621162216231624162516261627162816291630163116321633163416351636163716381639164016411642164316441645164616471648164916501651165216531654165516561657165816591660166116621663166416651666166716681669167016711672167316741675167616771678167916801681168216831684168516861687168816891690169116921693169416951696169716981699170017011702170317041705170617071708170917101711171217131714171517161717171817191720172117221723172417251726172717281729173017311732173317341735173617371738173917401741174217431744174517461747174817491750175117521753175417551756175717581759176017611762176317641765176617671768176917701771177217731774177517761777177817791780178117821783178417851786178717881789179017911792179317941795179617971798179918001801180218031804180518061807180818091810181118121813181418151816181718181819182018211822182318241825182618271828182918301831183218331834183518361837183818391840184118421843184418451846184718481849185018511852185318541855185618571858185918601861186218631864186518661867186818691870187118721873187418751876187718781879188018811882188318841885188618871888188918901891189218931894189518961897189818991900190119021903190419051906190719081909191019111912191319141915191619171918191919201921192219231924192519261927192819291930193119321933193419351936193719381939194019411942194319441945194619471948194919501951195219531954195519561957195819591960196119621963196419651966196719681969197019711972197319741975197619771978197919801981198219831984198519861987198819891990199119921993199419951996199719981999200020012002200320042005200620072008200920102011201220132014201520162017201820192020202120222023202420252026202720282029203020312032203320342035203620372038203920402041204220432044204520462047204820492050205120522053205420552056205720582059206020612062206320642065206620672068206920702071207220732074207520762077207820792080208120822083208420852086208720882089209020912092209320942095209620972098209921002101210221032104210521062107210821092110211121122113211421152116211721182119212021212122212321242125212621272128212921302131213221332134213521362137213821392140214121422143214421452146214721482149215021512152215321542155215621572158215921602161216221632164216521662167216821692170217121722173217421752176217721782179218021812182218321842185218621872188218921902191219221932194219521962197219821992200220122022203220422052206220722082209221022112212221322142215221622172218221922202221222222232224222522262227222822292230223122322233223422352236223722382239224022412242224322442245224622472248224922502251225222532254225522562257225822592260226122622263226422652266226722682269227022712272227322742275227622772278227922802281228222832284228522862287228822892290229122922293229422952296229722982299230023012302230323042305230623072308230923102311231223132314231523162317231823192320232123222323232423252326232723282329233023312332233323342335233623372338233923402341234223432344234523462347234823492350235123522353235423552356235723582359236023612362236323642365236623672368236923702371237223732374237523762377237823792380238123822383238423852386238723882389239023912392239323942395239623972398239924002401240224032404240524062407240824092410241124122413241424152416241724182419242024212422242324242425242624272428242924302431243224332434243524362437243824392440244124422443244424452446244724482449245024512452245324542455245624572458245924602461246224632464246524662467246824692470247124722473247424752476247724782479248024812482248324842485248624872488248924902491249224932494249524962497249824992500250125022503250425052506250725082509251025112512251325142515251625172518251925202521252225232524252525262527252825292530253125322533253425352536253725382539254025412542254325442545254625472548254925502551255225532554255525562557255825592560256125622563256425652566256725682569257025712572257325742575257625772578257925802581258225832584258525862587258825892590259125922593259425952596259725982599260026012602260326042605260626072608260926102611261226132614261526162617261826192620262126222623262426252626262726282629263026312632263326342635263626372638263926402641264226432644264526462647264826492650265126522653265426552656265726582659266026612662266326642665266626672668266926702671267226732674267526762677267826792680268126822683268426852686268726882689269026912692269326942695269626972698269927002701270227032704270527062707270827092710271127122713271427152716271727182719272027212722272327242725272627272728272927302731273227332734273527362737273827392740274127422743274427452746274727482749275027512752275327542755275627572758275927602761276227632764276527662767276827692770277127722773277427752776277727782779278027812782278327842785278627872788278927902791279227932794279527962797279827992800280128022803280428052806280728082809281028112812281328142815281628172818281928202821282228232824282528262827282828292830283128322833283428352836283728382839284028412842284328442845284628472848284928502851285228532854285528562857285828592860286128622863286428652866286728682869287028712872287328742875287628772878287928802881288228832884288528862887288828892890289128922893289428952896289728982899290029012902290329042905290629072908290929102911291229132914291529162917291829192920292129222923292429252926292729282929293029312932293329342935293629372938293929402941294229432944294529462947294829492950295129522953295429552956295729582959296029612962296329642965296629672968296929702971297229732974297529762977297829792980298129822983298429852986298729882989299029912992299329942995299629972998299930003001300230033004300530063007300830093010301130123013301430153016301730183019302030213022302330243025302630273028302930303031303230333034303530363037303830393040304130423043304430453046304730483049305030513052305330543055305630573058305930603061306230633064306530663067306830693070307130723073307430753076307730783079308030813082308330843085308630873088308930903091309230933094309530963097309830993100310131023103310431053106310731083109311031113112311331143115311631173118311931203121312231233124312531263127312831293130313131323133313431353136313731383139314031413142314331443145314631473148314931503151315231533154315531563157315831593160316131623163316431653166316731683169317031713172317331743175317631773178317931803181318231833184318531863187318831893190319131923193319431953196319731983199320032013202320332043205320632073208320932103211321232133214321532163217321832193220322132223223322432253226322732283229323032313232323332343235323632373238323932403241324232433244324532463247324832493250325132523253325432553256325732583259326032613262326332643265326632673268326932703271327232733274327532763277327832793280328132823283328432853286328732883289329032913292329332943295329632973298329933003301330233033304330533063307330833093310331133123313331433153316331733183319332033213322332333243325332633273328332933303331333233333334333533363337333833393340334133423343334433453346334733483349335033513352335333543355335633573358335933603361336233633364336533663367336833693370337133723373337433753376337733783379338033813382338333843385338633873388338933903391339233933394339533963397339833993400340134023403340434053406340734083409341034113412341334143415341634173418341934203421342234233424342534263427342834293430343134323433343434353436343734383439344034413442344334443445344634473448344934503451345234533454345534563457345834593460346134623463346434653466346734683469347034713472347334743475347634773478347934803481348234833484348534863487348834893490349134923493349434953496349734983499350035013502350335043505350635073508350935103511351235133514351535163517351835193520352135223523352435253526352735283529353035313532353335343535353635373538353935403541354235433544354535463547354835493550355135523553355435553556355735583559356035613562356335643565356635673568356935703571357235733574357535763577357835793580358135823583358435853586358735883589359035913592359335943595359635973598359936003601360236033604360536063607360836093610361136123613361436153616361736183619362036213622362336243625362636273628362936303631363236333634363536363637363836393640364136423643364436453646364736483649365036513652365336543655365636573658365936603661366236633664366536663667366836693670367136723673367436753676367736783679368036813682368336843685368636873688368936903691369236933694369536963697369836993700370137023703370437053706370737083709371037113712371337143715371637173718371937203721372237233724372537263727372837293730373137323733373437353736373737383739374037413742374337443745374637473748374937503751375237533754375537563757375837593760376137623763376437653766376737683769377037713772377337743775377637773778377937803781378237833784378537863787378837893790379137923793379437953796379737983799380038013802380338043805380638073808380938103811381238133814381538163817381838193820382138223823382438253826382738283829383038313832383338343835383638373838383938403841384238433844384538463847384838493850385138523853385438553856385738583859386038613862386338643865386638673868386938703871387238733874387538763877387838793880388138823883388438853886388738883889389038913892389338943895389638973898389939003901390239033904390539063907390839093910391139123913391439153916391739183919392039213922392339243925392639273928392939303931393239333934393539363937393839393940394139423943394439453946394739483949395039513952395339543955395639573958395939603961396239633964396539663967396839693970397139723973397439753976397739783979398039813982398339843985398639873988398939903991399239933994399539963997399839994000400140024003400440054006400740084009401040114012401340144015401640174018401940204021402240234024402540264027402840294030403140324033403440354036403740384039404040414042404340444045404640474048404940504051405240534054405540564057405840594060406140624063406440654066406740684069407040714072407340744075407640774078407940804081408240834084408540864087408840894090409140924093409440954096409740984099410041014102410341044105410641074108410941104111411241134114411541164117411841194120412141224123412441254126412741284129413041314132413341344135413641374138413941404141414241434144414541464147414841494150415141524153415441554156415741584159416041614162416341644165416641674168416941704171417241734174417541764177417841794180418141824183418441854186418741884189419041914192419341944195419641974198419942004201420242034204420542064207420842094210421142124213421442154216421742184219422042214222422342244225422642274228422942304231423242334234423542364237423842394240424142424243424442454246424742484249425042514252425342544255425642574258425942604261426242634264426542664267426842694270427142724273427442754276427742784279428042814282428342844285428642874288428942904291429242934294429542964297429842994300430143024303430443054306430743084309431043114312431343144315431643174318431943204321432243234324432543264327432843294330433143324333433443354336433743384339434043414342434343444345434643474348434943504351435243534354435543564357435843594360436143624363436443654366436743684369437043714372437343744375437643774378437943804381438243834384438543864387438843894390439143924393439443954396439743984399440044014402440344044405440644074408440944104411441244134414441544164417441844194420442144224423442444254426442744284429443044314432443344344435443644374438443944404441444244434444444544464447444844494450445144524453445444554456445744584459446044614462446344644465446644674468446944704471447244734474447544764477447844794480448144824483448444854486448744884489449044914492449344944495449644974498449945004501450245034504450545064507450845094510451145124513451445154516451745184519452045214522452345244525452645274528452945304531453245334534453545364537453845394540454145424543454445454546454745484549455045514552455345544555455645574558455945604561456245634564456545664567456845694570457145724573457445754576457745784579458045814582458345844585458645874588458945904591459245934594459545964597459845994600460146024603460446054606460746084609461046114612461346144615461646174618461946204621462246234624462546264627462846294630463146324633463446354636463746384639464046414642464346444645464646474648464946504651465246534654465546564657465846594660466146624663466446654666466746684669467046714672467346744675467646774678467946804681468246834684468546864687468846894690469146924693469446954696469746984699470047014702470347044705470647074708470947104711471247134714471547164717471847194720472147224723472447254726472747284729473047314732473347344735473647374738473947404741474247434744474547464747474847494750475147524753475447554756475747584759476047614762476347644765476647674768476947704771477247734774477547764777477847794780478147824783478447854786478747884789479047914792479347944795479647974798479948004801480248034804480548064807480848094810481148124813481448154816481748184819482048214822482348244825482648274828482948304831483248334834483548364837483848394840484148424843484448454846484748484849485048514852485348544855485648574858485948604861486248634864486548664867486848694870487148724873487448754876487748784879488048814882488348844885488648874888488948904891489248934894489548964897489848994900490149024903490449054906490749084909491049114912491349144915491649174918491949204921492249234924492549264927492849294930493149324933493449354936493749384939494049414942494349444945494649474948494949504951495249534954495549564957495849594960496149624963496449654966496749684969497049714972497349744975497649774978497949804981498249834984498549864987498849894990499149924993499449954996499749984999500050015002500350045005500650075008500950105011501250135014501550165017501850195020502150225023502450255026502750285029503050315032503350345035503650375038503950405041504250435044504550465047504850495050505150525053505450555056505750585059506050615062506350645065506650675068506950705071507250735074507550765077507850795080508150825083508450855086508750885089509050915092509350945095509650975098509951005101510251035104510551065107510851095110511151125113511451155116511751185119512051215122512351245125512651275128512951305131513251335134513551365137513851395140514151425143 |
- #include "test_common.h"
- TEST_START
- extern "C" {
- /* head infomation */
- typedef QueueObj AST;
- char* Parser_linesToAsm(Args* outBuffs, char* multiLine);
- char* AST_genAsm(AST* ast, Args* outBuffs);
- AST* AST_parseLine(char* line, Stack* blockStack);
- char* Parser_LineToAsm(Args* buffs, char* line, Stack* blockStack);
- int32_t AST_deinit(AST* ast);
- char* Lexer_getTokenStream(Args* outBuffs, char* stmt);
- char* Lexer_printTokenStream(Args* outBuffs, char* tokens);
- char* Cursor_getCleanStmt(Args* outBuffs, char* cmd);
- char* Cursor_popLastToken(Args* outBuffs, char** pStmt, char* str);
- }
- TEST(parser, NEW) {
- AST* ast = AST_parseLine("add(a,b)", NULL);
- Args* buffs = New_strBuff();
- char* pikaAsm = AST_genAsm(ast, buffs);
- printf("%s", pikaAsm);
- args_deinit(buffs);
- AST_deinit(ast);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- TEST(parser, add_a_b) {
- AST* ast = AST_parseLine("add( a , b)", NULL);
- Args* buffs = New_strBuff();
- char* pikaAsm = AST_genAsm(ast, buffs);
- printf("%s", pikaAsm);
- EXPECT_STREQ(pikaAsm,
- "B0\n"
- "1 REF a\n"
- "1 REF b\n"
- "0 RUN add\n");
- args_deinit(buffs);
- AST_deinit(ast);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- TEST(parser, add_a_b_c) {
- AST* ast = AST_parseLine("d = add(add(a,b) , c)", NULL);
- Args* buffs = New_strBuff();
- char* pikaAsm = AST_genAsm(ast, buffs);
- printf("%s", pikaAsm);
- EXPECT_STREQ(pikaAsm,
- "B0\n"
- "2 REF a\n"
- "2 REF b\n"
- "1 RUN add\n"
- "1 REF c\n"
- "0 RUN add\n"
- "0 OUT d\n");
- args_deinit(buffs);
- AST_deinit(ast);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- TEST(parser, method1) {
- AST* ast = AST_parseLine("d.p = a.add(b.add(a,se.b) , pmw.c)", NULL);
- Args* buffs = New_strBuff();
- char* pikaAsm = AST_genAsm(ast, buffs);
- printf("%s", pikaAsm);
- EXPECT_STREQ(pikaAsm,
- "B0\n"
- "2 REF a\n"
- "2 REF se.b\n"
- "1 RUN b.add\n"
- "1 REF pmw.c\n"
- "0 RUN "
- "a.add\n"
- "0 OUT d.p\n");
- args_deinit(buffs);
- AST_deinit(ast);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- TEST(parser, method2) {
- char* line = "d.p = a.add(b.add(a,se.b,diek(pp)) , pmw.c())";
- Args* buffs = New_strBuff();
- char* pikaAsm = Parser_LineToAsm(buffs, line, NULL);
- printf("%s", pikaAsm);
- EXPECT_STREQ(pikaAsm,
- "B0\n"
- "2 REF a\n"
- "2 REF se.b\n"
- "3 REF pp\n"
- "2 RUN diek\n"
- "1 RUN b.add\n"
- "1 RUN pmw.c\n"
- "0 RUN a.add\n"
- "0 OUT d.p\n");
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- TEST(parser, method_void) {
- char* line = "a(c())";
- Args* buffs = New_strBuff();
- char* pikaAsm = Parser_LineToAsm(buffs, line, NULL);
- printf("%s", pikaAsm);
- EXPECT_STREQ(pikaAsm,(char *)
- "B0\n"
- "1 RUN c\n"
- "0 RUN a\n"
- );
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- TEST(parser, str1) {
- char* line = "literal('2.322')";
- Args* buffs = New_strBuff();
- char* pikaAsm = Parser_LineToAsm(buffs, line, NULL);
- printf("%s", pikaAsm);
- EXPECT_STREQ(pikaAsm,
- "B0\n"
- "1 STR 2.322\n"
- "0 RUN literal\n");
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- TEST(parser, str2) {
- char* line = "b=add(a,literal('1'))";
- Args* buffs = New_strBuff();
- char* pikaAsm = Parser_LineToAsm(buffs, line, NULL);
- printf("%s", pikaAsm);
- EXPECT_STREQ(pikaAsm,
- "B0\n"
- "1 REF a\n"
- "2 STR 1\n"
- "1 RUN literal\n"
- "0 RUN add\n"
- "0 OUT b\n");
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- TEST(parser, num1) {
- char* line = "b=add(a,1)";
- Args* buffs = New_strBuff();
- char* pikaAsm = Parser_LineToAsm(buffs, line, NULL);
- printf("%s", pikaAsm);
- EXPECT_STREQ(pikaAsm,
- "B0\n"
- "1 REF a\n"
- "1 NUM 1\n"
- "0 RUN add\n"
- "0 OUT b\n");
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- TEST(parser, add_str) {
- char* line = "b=add(a,'1')";
- Args* buffs = New_strBuff();
- char* pikaAsm = Parser_LineToAsm(buffs, line, NULL);
- printf("%s", pikaAsm);
- EXPECT_STREQ(pikaAsm,
- "B0\n"
- "1 REF a\n"
- "1 STR 1\n"
- "0 RUN add\n"
- "0 OUT b\n");
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- TEST(parser, deep4) {
- char* line = "b = add(add(add(add(1, 2), 3), 4), 5)";
- Args* buffs = New_strBuff();
- char* pikaAsm = Parser_LineToAsm(buffs, line, NULL);
- printf("%s", pikaAsm);
- EXPECT_STREQ(pikaAsm,
- "B0\n"
- "4 NUM 1\n"
- "4 NUM 2\n"
- "3 RUN add\n"
- "3 NUM 3\n"
- "2 RUN add\n"
- "2 NUM 4\n"
- "1 RUN add\n"
- "1 NUM 5\n"
- "0 RUN add\n"
- "0 OUT b\n");
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- TEST(parser, a_1) {
- char* line = "a = 1";
- Args* buffs = New_strBuff();
- char* pikaAsm = Parser_LineToAsm(buffs, line, NULL);
- printf("%s", pikaAsm);
- EXPECT_STREQ(pikaAsm,
- "B0\n"
- "0 NUM 1\n"
- "0 OUT a\n");
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- TEST(parser, while_true) {
- char* line = "while true:";
- Args* buffs = New_strBuff();
- char* pikaAsm = Parser_LineToAsm(buffs, line, NULL);
- printf("%s", pikaAsm);
- EXPECT_STREQ(pikaAsm,
- "B0\n"
- "0 REF true\n"
- "0 JEZ 2\n");
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- static char* parse(const char* line,
- Args* outBuffs,
- char* pikaAsm,
- Stack* blockStack) {
- printf("%s\n", line);
- Args* runBuffs = New_strBuff();
- pikaAsm = strsAppend(runBuffs, pikaAsm,
- Parser_LineToAsm(runBuffs, (char*)line, blockStack));
- pikaAsm = strsCopy(outBuffs, pikaAsm);
- args_deinit(runBuffs);
- return pikaAsm;
- }
- TEST(parser, while_true_block) {
- Args* bf = New_strBuff();
- Stack bs;
- stack_init(&bs);
- char* s = strsCopy(bf, "");
- s = parse("while true:", bf, s, &bs);
- s = parse(" rgb.flow()", bf, s, &bs);
- s = parse("", bf, s, &bs);
- printf("%s", s);
- EXPECT_STREQ(s,
- "B0\n"
- "0 REF true\n"
- "0 JEZ 2\n"
- "B1\n"
- "0 RUN rgb.flow\n"
- "B0\n"
- "0 JMP -1\n"
- "B0\n");
- stack_deinit(&bs);
- args_deinit(bf);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- TEST(parser, while_true_false) {
- Args* bf = New_strBuff();
- Stack bs;
- stack_init(&bs);
- char* s = strsCopy(bf, "");
- s = parse("while true:", bf, s, &bs);
- s = parse(" rgb.flow()", bf, s, &bs);
- s = parse(" while false:", bf, s, &bs);
- s = parse(" a=3", bf, s, &bs);
- s = parse(" test.on(add(2,3))", bf, s, &bs);
- s = parse(" print('flowing')", bf, s, &bs);
- s = parse("", bf, s, &bs);
- Arg* buffArg = arg_newStr(s);
- stack_deinit(&bs);
- args_deinit(bf);
- s = arg_getStr(buffArg);
- printf("%s", s);
- EXPECT_STREQ(s,
- "B0\n"
- "0 REF true\n"
- "0 JEZ 2\n"
- "B1\n"
- "0 RUN rgb.flow\n"
- "B1\n"
- "0 REF false\n"
- "0 JEZ 2\n"
- "B2\n"
- "0 NUM 3\n"
- "0 OUT a\n"
- "B2\n"
- "2 NUM 2\n"
- "2 NUM 3\n"
- "1 RUN add\n"
- "0 RUN test.on\n"
- "B1\n"
- "0 JMP -1\n"
- "B1\n"
- "1 STR flowing\n"
- "0 RUN print\n"
- "B0\n"
- "0 JMP -1\n"
- "B0\n");
- arg_deinit(buffArg);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- TEST(parser, while_true_false_both_exit) {
- Args* bf = New_strBuff();
- Stack bs;
- stack_init(&bs);
- char* s = strsCopy(bf, "");
- s = parse("while true:", bf, s, &bs);
- s = parse(" rgb.flow()", bf, s, &bs);
- s = parse(" while false:", bf, s, &bs);
- s = parse(" a=3", bf, s, &bs);
- s = parse(" test.on(add(2,3))", bf, s, &bs);
- s = parse("", bf, s, &bs);
- printf("%s", s);
- EXPECT_STREQ(s,
- "B0\n"
- "0 REF true\n"
- "0 JEZ 2\n"
- "B1\n"
- "0 RUN rgb.flow\n"
- "B1\n"
- "0 REF false\n"
- "0 JEZ 2\n"
- "B2\n"
- "0 NUM 3\n"
- "0 OUT a\n"
- "B2\n"
- "2 NUM 2\n"
- "2 NUM 3\n"
- "1 RUN add\n"
- "0 RUN test.on\n"
- "B1\n"
- "0 JMP -1\n"
- "B0\n"
- "0 JMP -1\n"
- "B0\n");
- stack_deinit(&bs);
- args_deinit(bf);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- TEST(parser, if_) {
- Args* bf = New_strBuff();
- Stack bs;
- stack_init(&bs);
- char* s = strsCopy(bf, "");
- s = parse("if true:", bf, s, &bs);
- s = parse(" rgb.flow()", bf, s, &bs);
- s = parse("", bf, s, &bs);
- printf("%s", s);
- EXPECT_STREQ(s,
- "B0\n"
- "0 REF true\n"
- "0 JEZ 1\n"
- "B1\n"
- "0 RUN rgb.flow\n"
- "B0\n");
- stack_deinit(&bs);
- args_deinit(bf);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- extern PikaMemInfo pikaMemInfo;
- TEST(parser, while_true_if_false_both_exit) {
- pikaMemInfo.heapUsedMax = 0;
- Args* bf = New_strBuff();
- Stack bs;
- stack_init(&bs);
- char* s = strsCopy(bf, "");
- s = parse("while true:", bf, s, &bs);
- s = parse(" rgb.flow()", bf, s, &bs);
- s = parse(" if false:", bf, s, &bs);
- s = parse(" a=3", bf, s, &bs);
- s = parse(" test.on(add(2,3))", bf, s, &bs);
- s = parse("", bf, s, &bs);
- printf("%s", s);
- EXPECT_STREQ(s,
- "B0\n"
- "0 REF true\n"
- "0 JEZ 2\n"
- "B1\n"
- "0 RUN rgb.flow\n"
- "B1\n"
- "0 REF false\n"
- "0 JEZ 1\n"
- "B2\n"
- "0 NUM 3\n"
- "0 OUT a\n"
- "B2\n"
- "2 NUM 2\n"
- "2 NUM 3\n"
- "1 RUN add\n"
- "0 RUN test.on\n"
- "B0\n"
- "0 JMP -1\n"
- "B0\n");
- stack_deinit(&bs);
- args_deinit(bf);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- TEST(parser, multiLine) {
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- char* lines =(char *)
- "while true:\n"
- " rgb.flow()\n"
- " if false:\n"
- " a=3\n"
- " test.on(add(2,3))\n"
- "\n";
- printf("%s", lines);
- char* pikaAsm = Parser_linesToAsm(buffs, lines);
- printf("%s", pikaAsm);
- EXPECT_STREQ(pikaAsm,
- "B0\n"
- "0 REF true\n"
- "0 JEZ 2\n"
- "B1\n"
- "0 RUN rgb.flow\n"
- "B1\n"
- "0 REF false\n"
- "0 JEZ 1\n"
- "B2\n"
- "0 NUM 3\n"
- "0 OUT a\n"
- "B2\n"
- "2 NUM 2\n"
- "2 NUM 3\n"
- "1 RUN add\n"
- "0 RUN test.on\n"
- "B0\n"
- "0 JMP -1\n"
- "B0\n");
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- TEST(parser, pikaPi) {
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- const char lines[] =
- "\n"
- "time = STM32.Time()\n"
- "uart = STM32.UART()\n"
- "adc = STM32.ADC()\n"
- "pin = STM32.GPIO()\n"
- "pwm = STM32.PWM()\n"
- "uart = STM32.UART()\n"
- "rgb = PikaPiZero.RGB()\n"
- "mem = PikaStdLib.MemChecker()\n"
- "op = PikaMath.Operator()\n"
- "\n"
- "uart.init()\n"
- "uart.setId(1)\n"
- "uart.setBaudRate(115200)\n"
- "uart.enable()\n"
- "\n"
- "rgb.init()\n"
- "rgb.enable()\n"
- "\n"
- "print('hello 2')\n"
- "print('mem used max:')\n"
- "mem.max() \n"
- "\n"
- "while True:\n"
- " time.sleep_ms(10)\n"
- " rgb.flow()\n"
- " print('flowing')\n"
- "\n"
- "\n"
- "\n"
- "\n";
- printf("%s", lines);
- char* pikaAsm = Parser_linesToAsm(buffs, (char*)lines);
- printf("mem max in parse: %0.2f Kb\n", pikaMemMax() / 1024.0);
- printf("%s", pikaAsm);
- EXPECT_STREQ(pikaAsm,
- "B0\n"
- "0 RUN STM32.Time\n"
- "0 OUT time\n"
- "B0\n"
- "0 RUN STM32.UART\n"
- "0 OUT uart\n"
- "B0\n"
- "0 RUN STM32.ADC\n"
- "0 OUT adc\n"
- "B0\n"
- "0 RUN STM32.GPIO\n"
- "0 OUT pin\n"
- "B0\n"
- "0 RUN STM32.PWM\n"
- "0 OUT pwm\n"
- "B0\n"
- "0 RUN STM32.UART\n"
- "0 OUT uart\n"
- "B0\n"
- "0 RUN PikaPiZero.RGB\n"
- "0 OUT rgb\n"
- "B0\n"
- "0 RUN PikaStdLib.MemChecker\n"
- "0 OUT mem\n"
- "B0\n"
- "0 RUN PikaMath.Operator\n"
- "0 OUT op\n"
- "B0\n"
- "0 RUN uart.init\n"
- "B0\n"
- "1 NUM 1\n"
- "0 RUN uart.setId\n"
- "B0\n"
- "1 NUM 115200\n"
- "0 RUN uart.setBaudRate\n"
- "B0\n"
- "0 RUN uart.enable\n"
- "B0\n"
- "0 RUN rgb.init\n"
- "B0\n"
- "0 RUN rgb.enable\n"
- "B0\n"
- "1 STR hello 2\n"
- "0 RUN print\n"
- "B0\n"
- "1 STR mem used max:\n"
- "0 RUN print\n"
- "B0\n"
- "0 RUN mem.max\n"
- "B0\n"
- "0 REF True\n"
- "0 JEZ 2\n"
- "B1\n"
- "1 NUM 10\n"
- "0 RUN time.sleep_ms\n"
- "B1\n"
- "0 RUN rgb.flow\n"
- "B1\n"
- "1 STR flowing\n"
- "0 RUN print\n"
- "B0\n"
- "0 JMP -1\n"
- "B0\n");
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- TEST(parser, add) {
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- char* lines = "a = 1 + 1\n";
- printf("%s", lines);
- char* pikaAsm = Parser_linesToAsm(buffs, lines);
- printf("%s", pikaAsm);
- EXPECT_STREQ(pikaAsm,
- "B0\n"
- "1 NUM 1\n"
- "1 NUM 1\n"
- "0 OPT +\n"
- "0 OUT a\n"
- "B0\n");
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- TEST(parser, add_3) {
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- char* lines = "a = 1 + 2 + 3";
- printf("%s", lines);
- char* pikaAsm = Parser_linesToAsm(buffs, lines);
- printf("%s", pikaAsm);
- EXPECT_STREQ(pikaAsm,
- "B0\n"
- "2 NUM 1\n"
- "2 NUM 2\n"
- "1 OPT +\n"
- "1 NUM 3\n"
- "0 OPT +\n"
- "0 OUT a\n"
- "B0\n");
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- TEST(parser, add_a_pp) {
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- char* lines = "a = a + 1\n";
- printf("%s", lines);
- char* pikaAsm = Parser_linesToAsm(buffs, lines);
- printf("%s", pikaAsm);
- EXPECT_STREQ(pikaAsm,
- "B0\n"
- "1 REF a\n"
- "1 NUM 1\n"
- "0 OPT +\n"
- "0 OUT a\n"
- "B0\n");
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- TEST(parser, while_a_pp) {
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- char* lines =
- "while a < 10:\n"
- " print(a)\n"
- " a = a + 1\n"
- "\n";
- printf("%s", lines);
- char* pikaAsm = Parser_linesToAsm(buffs, lines);
- printf("%s", pikaAsm);
- EXPECT_STREQ(pikaAsm,
- "B0\n"
- "1 REF a\n"
- "1 NUM 10\n"
- "0 OPT <\n"
- "0 JEZ 2\n"
- "B1\n"
- "1 REF a\n"
- "0 RUN print\n"
- "B1\n"
- "1 REF a\n"
- "1 NUM 1\n"
- "0 OPT +\n"
- "0 OUT a\n"
- "B0\n"
- "0 JMP -1\n"
- "B0\n");
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- TEST(parser, add_m2p3) {
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- char* lines = "a = 1 * 2 + 3\n";
- printf("%s", lines);
- char* pikaAsm = Parser_linesToAsm(buffs, lines);
- printf("%s", pikaAsm);
- EXPECT_STREQ(pikaAsm,
- "B0\n"
- "2 NUM 1\n"
- "2 NUM 2\n"
- "1 OPT *\n"
- "1 NUM 3\n"
- "0 OPT +\n"
- "0 OUT a\n"
- "B0\n");
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- TEST(parser, add_m2p3_) {
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- char* lines = "a = 1 * (2 + 3)\n";
- printf("%s", lines);
- char* pikaAsm = Parser_linesToAsm(buffs, lines);
- printf("%s", pikaAsm);
- EXPECT_STREQ(pikaAsm,
- "B0\n"
- "1 NUM 1\n"
- "3 NUM 2\n"
- "3 NUM 3\n"
- "2 OPT +\n"
- "1 RUN \n"
- "0 OPT *\n"
- "0 OUT a\n"
- "B0\n");
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- TEST(parser, add_m12p3_) {
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- char* lines = "a = (1 + 2) * 3\n";
- printf("%s", lines);
- char* pikaAsm = Parser_linesToAsm(buffs, lines);
- printf("%s", pikaAsm);
- EXPECT_STREQ(pikaAsm,
- "B0\n"
- "3 NUM 1\n"
- "3 NUM 2\n"
- "2 OPT +\n"
- "1 RUN \n"
- "1 NUM 3\n"
- "0 OPT *\n"
- "0 OUT a\n"
- "B0\n");
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- TEST(parser, method_equ) {
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- char* lines = "if right.read() == 1:\n";
- printf("%s", lines);
- char* pikaAsm = Parser_linesToAsm(buffs, lines);
- printf("%s", pikaAsm);
- EXPECT_STREQ(pikaAsm,
- "B0\n"
- "1 RUN right.read\n"
- "1 NUM 1\n"
- "0 OPT ==\n"
- "0 JEZ 1\n"
- "B0\n");
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- TEST(parser, equ_method) {
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- char* lines = "if 1 == right.read() :\n";
- printf("%s", lines);
- char* pikaAsm = Parser_linesToAsm(buffs, lines);
- printf("%s", pikaAsm);
- EXPECT_STREQ(pikaAsm,
- "B0\n"
- "1 NUM 1\n"
- "1 RUN right.read\n"
- "0 OPT ==\n"
- "0 JEZ 1\n"
- "B0\n");
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- TEST(parser, def_add) {
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- char* lines =
- "def add(a, b):\n"
- " a + b";
- printf("%s", lines);
- char* pikaAsm = Parser_linesToAsm(buffs, lines);
- printf("%s", pikaAsm);
- EXPECT_STREQ(pikaAsm,(char *)
- "B0\n"
- "0 DEF add(a,b)\n"
- "0 JMP 1\n"
- "B1\n"
- "1 REF a\n"
- "1 REF b\n"
- "0 OPT +\n"
- "B1\n"
- "0 RET \n"
- "B0\n"
- );
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- TEST(parser, def_add_return) {
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- char* lines =
- "def add(a, b):\n"
- " return a + b\n"
- "\n";
- printf("%s", lines);
- char* pikaAsm = Parser_linesToAsm(buffs, lines);
- printf("%s", pikaAsm);
- EXPECT_STREQ(pikaAsm,(char *)
- "B0\n"
- "0 DEF add(a,b)\n"
- "0 JMP 1\n"
- "B1\n"
- "1 REF a\n"
- "1 REF b\n"
- "0 OPT +\n"
- "0 RET \n"
- "B1\n"
- "0 RET \n"
- "B0\n"
- );
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- TEST(parser, def_while_return) {
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- char* lines =
- "def add(a, b):\n"
- " while True:\n"
- " return a + b\n"
- "\n";
- printf("%s", lines);
- char* pikaAsm = Parser_linesToAsm(buffs, lines);
- printf("%s", pikaAsm);
- EXPECT_STREQ(pikaAsm,(char *)
- "B0\n"
- "0 DEF add(a,b)\n"
- "0 JMP 1\n"
- "B1\n"
- "0 REF True\n"
- "0 JEZ 2\n"
- "B2\n"
- "1 REF a\n"
- "1 REF b\n"
- "0 OPT +\n"
- "0 RET \n"
- "B1\n"
- "0 JMP -1\n"
- "B1\n"
- "0 RET \n"
- "B0\n"
- );
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- TEST(parser, def_while_return_void) {
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- char* lines =
- "def add(a, b):\n"
- " while True:\n"
- " return\n"
- "\n";
- printf("%s", lines);
- char* pikaAsm = Parser_linesToAsm(buffs, lines);
- printf("%s", pikaAsm);
- EXPECT_STREQ(pikaAsm,(char *)
- "B0\n"
- "0 DEF add(a,b)\n"
- "0 JMP 1\n"
- "B1\n"
- "0 REF True\n"
- "0 JEZ 2\n"
- "B2\n"
- "0 RET \n"
- "B1\n"
- "0 JMP -1\n"
- "B1\n"
- "0 RET \n"
- "B0\n"
- );
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- TEST(parser, signed_num) {
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- char* lines = "a = -1\n";
- printf("%s", lines);
- char* pikaAsm = Parser_linesToAsm(buffs, lines);
- char* tokens_print =
- Lexer_printTokenStream(buffs, Lexer_getTokenStream(buffs, lines));
- printf("%s", tokens_print);
- EXPECT_STREQ(tokens_print, "{sym}a{opt}={opt}-{lit}1\n");
- printf("%s", pikaAsm);
- EXPECT_STREQ(pikaAsm,(char *)
- "B0\n"
- "1 NUM 1\n"
- "0 OPT -\n"
- "0 OUT a\n"
- "B0\n"
- );
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- TEST(parser, comp_signed_num) {
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- char* lines = "if a > -1:\n";
- printf("%s", lines);
- char* pikaAsm = Parser_linesToAsm(buffs, lines);
- printf("%s", pikaAsm);
- EXPECT_STREQ(pikaAsm,(char *)
- "B0\n"
- "1 REF a\n"
- "2 NUM 1\n"
- "1 OPT -\n"
- "0 OPT >\n"
- "0 JEZ 1\n"
- "B0\n"
- );
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- TEST(lexser, symbol_add) {
- /* init */
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- /* run */
- char* tokens = Lexer_getTokenStream(buffs, " res = add(1,2)");
- char* printTokenStream = Lexer_printTokenStream(buffs, tokens);
- printf("%s\n", printTokenStream);
- /* assert */
- EXPECT_STREQ(printTokenStream,
- "{sym}res{opt}={sym}add{dvd}({lit}1{dvd},{lit}2{dvd})");
- /* deinit */
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- TEST(lexser, symbol_1) {
- /* init */
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- /* run */
- char* tokens = Lexer_getTokenStream(buffs, "a(");
- char* printTokenStream = Lexer_printTokenStream(buffs, tokens);
- /* assert */
- EXPECT_STREQ(printTokenStream, "{sym}a{dvd}(");
- /* deinit */
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- TEST(lexser, operator_not) {
- /* init */
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- /* run */
- char* tokens = Lexer_getTokenStream(buffs, "not not not ");
- char* printTokenStream = Lexer_printTokenStream(buffs, tokens);
- printf("%s\n", printTokenStream);
- /* assert */
- EXPECT_STREQ(printTokenStream, "{opt} not {opt} not {opt} not ");
- /* deinit */
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- TEST(lexser, symbol_Nag) {
- /* init */
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- /* run */
- char* tokens = Lexer_getTokenStream(buffs, "-10-20");
- char* printTokenStream = Lexer_printTokenStream(buffs, tokens);
- printf("%s\n", printTokenStream);
- /* assert */
- EXPECT_STREQ(printTokenStream, "{opt}-{lit}10{opt}-{lit}20");
- /* deinit */
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- TEST(lexser, operator_all) {
- /* init */
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- /* run */
- char* tokens = Lexer_getTokenStream(buffs,
- "not or and "
- "+ += - -="
- "* ** *= **="
- "/ // /= //="
- "% %= = == !="
- "> >= >>"
- "< <= <<"
- "&|^~");
- char* printTokenStream = Lexer_printTokenStream(buffs, tokens);
- printf("%s\n", printTokenStream);
- /* assert */
- EXPECT_STREQ(
- printTokenStream,
- "{opt} not {opt} or {opt} and {opt}+{opt}+={opt}-{opt}-={opt}*{opt}*"
- "*{opt}*={opt}**={opt}/{opt}//{opt}/={opt}//"
- "={opt}%{opt}%={opt}={opt}=={opt}!={opt}>{opt}>={opt}>>{opt}<{"
- "opt}<={opt}<<{opt}&{opt}|{opt}^{opt}~");
- /* deinit */
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- TEST(lexser, symbol_2) {
- /* init */
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- /* run */
- char* tokens = Lexer_getTokenStream(buffs, "a+b-c(25**=ek)!=-28");
- char* printTokenStream = Lexer_printTokenStream(buffs, tokens);
- printf("%s\n", printTokenStream);
- /* assert */
- EXPECT_STREQ(printTokenStream,
- "{sym}a{opt}+{sym}b{opt}-{sym}c{dvd}({lit}25{opt}**={sym}ek{"
- "dvd}){opt}!={opt}-{lit}28");
- /* deinit */
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- TEST(lexser, symbol_and) {
- /* init */
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- /* run */
- char* tokens = Lexer_getTokenStream(buffs, " res = add(1 and lkj,2)");
- char* printTokenStream = Lexer_printTokenStream(buffs, tokens);
- printf("%s\n", printTokenStream);
- /* assert */
- EXPECT_STREQ(printTokenStream,
- "{sym}res{opt}={sym}add{dvd}({lit}1{opt} and "
- "{sym}lkj{dvd},{lit}2{dvd})");
- /* deinit */
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- TEST(lexser, sting) {
- /* init */
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- /* run */
- char* tokens = Lexer_getTokenStream(buffs, " a= 'elk 2'");
- char* printTokenStream = Lexer_printTokenStream(buffs, tokens);
- printf("%s\n", printTokenStream);
- /* assert */
- EXPECT_STREQ(printTokenStream, "{sym}a{opt}={lit}'elk 2'");
- /* deinit */
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- TEST(lexser, num_1) {
- /* init */
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- /* run */
- char* tokens = Lexer_getTokenStream(buffs, "1");
- char* printTokenStream = Lexer_printTokenStream(buffs, tokens);
- printf("%s\n", printTokenStream);
- /* assert */
- EXPECT_STREQ(printTokenStream, "{lit}1");
- /* deinit */
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- TEST(lexser, jjcc) {
- /* init */
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- /* run */
- char* tokens = Lexer_getTokenStream(buffs, "a = (1 + 1.1) * 3 - 2 /4.0");
- char* printTokenStream = Lexer_printTokenStream(buffs, tokens);
- printf("%s\n", printTokenStream);
- /* assert */
- EXPECT_STREQ(printTokenStream,
- "{sym}a{opt}={dvd}({lit}1{opt}+{lit}1.1{dvd}){opt}*{lit}3{opt}"
- "-{lit}2{opt}/{lit}4.0");
- /* deinit */
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- TEST(parser, pop_by_str) {
- Args* buffs = New_strBuff();
- char* tokens = strsCopy(buffs, "3(>=)2>=29");
- char* token2 = Cursor_popLastToken(buffs, &tokens, ">=");
- char* token1 = tokens;
- /* assert */
- EXPECT_STREQ("3(>=)2", token1);
- EXPECT_STREQ("29", token2);
- args_deinit(buffs);
- }
- TEST(parser, mm) {
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- char* lines = "a = a ** -1\n";
- printf("%s", lines);
- char* pikaAsm = Parser_linesToAsm(buffs, lines);
- printf("%s", pikaAsm);
- EXPECT_STREQ(pikaAsm,
- "B0\n"
- "1 REF a\n"
- "2 NUM 1\n"
- "1 OPT -\n"
- "0 OPT **\n"
- "0 OUT a\n"
- "B0\n");
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- TEST(parser, self_inc) {
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- char* lines =
- "a += -1\n"
- "a -= -1\n"
- "a *= -1\n"
- "a /= -1\n"
- "a **= -1\n"
- "a //= -1\n"
- "a >= -1\n"
- "a <= -1\n"
- "a != -1\n"
- "a %= -1\n";
- printf("%s", lines);
- char* pikaAsm = Parser_linesToAsm(buffs, lines);
- printf("%s", pikaAsm);
- EXPECT_STREQ(pikaAsm,(char *)
- "B0\n"
- "1 REF a\n"
- "3 NUM 1\n"
- "2 OPT -\n"
- "1 RUN \n"
- "0 OPT +\n"
- "0 OUT a\n"
- "B0\n"
- "1 REF a\n"
- "3 NUM 1\n"
- "2 OPT -\n"
- "1 RUN \n"
- "0 OPT -\n"
- "0 OUT a\n"
- "B0\n"
- "1 REF a\n"
- "3 NUM 1\n"
- "2 OPT -\n"
- "1 RUN \n"
- "0 OPT *\n"
- "0 OUT a\n"
- "B0\n"
- "1 REF a\n"
- "3 NUM 1\n"
- "2 OPT -\n"
- "1 RUN \n"
- "0 OPT /\n"
- "0 OUT a\n"
- "B0\n"
- "1 REF a\n"
- "2 NUM 1\n"
- "1 OPT -\n"
- "0 OPT **=\n"
- "B0\n"
- "1 REF a\n"
- "2 NUM 1\n"
- "1 OPT -\n"
- "0 OPT //=\n"
- "B0\n"
- "1 REF a\n"
- "2 NUM 1\n"
- "1 OPT -\n"
- "0 OPT >=\n"
- "B0\n"
- "1 REF a\n"
- "2 NUM 1\n"
- "1 OPT -\n"
- "0 OPT <=\n"
- "B0\n"
- "1 REF a\n"
- "2 NUM 1\n"
- "1 OPT -\n"
- "0 OPT !=\n"
- "B0\n"
- "1 REF a\n"
- "2 NUM 1\n"
- "1 OPT -\n"
- "0 OPT %=\n"
- "B0\n");
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- TEST(parser, n_n1) {
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- char* lines = "a = ~-1\n";
- printf("%s", lines);
- char* pikaAsm = Parser_linesToAsm(buffs, lines);
- printf("%s", pikaAsm);
- EXPECT_STREQ(pikaAsm,
- "B0\n"
- "2 NUM 1\n"
- "1 OPT -\n"
- "0 OPT ~\n"
- "0 OUT a\n"
- "B0\n");
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- TEST(parser, or_) {
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- char* lines = "( a>1) or (b<= 3)\n";
- printf("%s", lines);
- char* pikaAsm = Parser_linesToAsm(buffs, lines);
- printf("%s", pikaAsm);
- EXPECT_STREQ(pikaAsm,(char *)
- "B0\n"
- "3 REF a\n"
- "3 NUM 1\n"
- "2 OPT >\n"
- "1 RUN \n"
- "3 REF b\n"
- "3 NUM 3\n"
- "2 OPT <=\n"
- "1 RUN \n"
- "0 OPT or \n"
- "B0\n");
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- TEST(parser, _or_) {
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- char* lines =
- "if (1>2) and (2>1):\n"
- " b = 1\n"
- "\n";
- printf("%s", lines);
- char* pikaAsm = Parser_linesToAsm(buffs, lines);
- printf("%s", pikaAsm);
- EXPECT_STREQ(pikaAsm,(char *)
- "B0\n"
- "3 NUM 1\n"
- "3 NUM 2\n"
- "2 OPT >\n"
- "1 RUN \n"
- "3 NUM 2\n"
- "3 NUM 1\n"
- "2 OPT >\n"
- "1 RUN \n"
- "0 OPT and \n"
- "0 JEZ 1\n"
- "B1\n"
- "0 NUM 1\n"
- "0 OUT b\n"
- "B0\n"
- );
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- TEST(parser, annotation) {
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- char* lines = "a = t#test\n";
- printf("%s", lines);
- char* pikaAsm = Parser_linesToAsm(buffs, lines);
- printf("%s", pikaAsm);
- EXPECT_STREQ(pikaAsm,(char *)
- "B0\n"
- "0 REF t\n"
- "0 OUT a\n"
- "B0\n");
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- TEST(parser, annotation_block) {
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- char* lines =
- "while True:\n"
- " a = 1";
- printf("%s", lines);
- char* pikaAsm = Parser_linesToAsm(buffs, lines);
- printf("%s", pikaAsm);
- EXPECT_STREQ(pikaAsm,(char *)
- "B0\n"
- "0 REF True\n"
- "0 JEZ 2\n"
- "B1\n"
- "0 NUM 1\n"
- "0 OUT a\n"
- "B0\n"
- "0 JMP -1\n"
- "B0\n"
- );
- lines =
- "while True:\n"
- " a = 1\n"
- "#";
- printf("%s", lines);
- pikaAsm = Parser_linesToAsm(buffs, lines);
- printf("%s", pikaAsm);
- EXPECT_STREQ(pikaAsm,(char *)
- "B0\n"
- "0 REF True\n"
- "0 JEZ 2\n"
- "B1\n"
- "0 NUM 1\n"
- "0 OUT a\n"
- "B0\n"
- "0 JMP -1\n"
- "B0\n"
- );
- lines =
- "while True:\n"
- " a = 1\n"
- "#test\n"
- " b = 2";
- printf("%s", lines);
- pikaAsm = Parser_linesToAsm(buffs, lines);
- printf("%s", pikaAsm);
- EXPECT_STREQ(pikaAsm,(char *)
- "B0\n"
- "0 REF True\n"
- "0 JEZ 2\n"
- "B1\n"
- "0 NUM 1\n"
- "0 OUT a\n"
- "B1\n"
- "0 NUM 2\n"
- "0 OUT b\n"
- "B0\n"
- "0 JMP -1\n"
- "B0\n"
- );
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- TEST(parser, if_elif_else) {
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- char* lines =
- "if a > 1:\n"
- " b = 1\n"
- "elif a > 2:\n"
- " b = 2\n"
- " if a > 1:\n"
- " b = 1\n"
- " elif a > 2:\n"
- " b = 2\n"
- " else:\n"
- " b = 3\n"
- "else:\n"
- " b = 3\n"
- "\n";
- printf("%s", lines);
- char* pikaAsm = Parser_linesToAsm(buffs, lines);
- printf("%s", pikaAsm);
- EXPECT_STREQ(pikaAsm,(char *)
- "B0\n"
- "1 REF a\n"
- "1 NUM 1\n"
- "0 OPT >\n"
- "0 JEZ 1\n"
- "B1\n"
- "0 NUM 1\n"
- "0 OUT b\n"
- "B0\n"
- "0 NEL 1\n"
- "1 REF a\n"
- "1 NUM 2\n"
- "0 OPT >\n"
- "0 JEZ 1\n"
- "B1\n"
- "0 NUM 2\n"
- "0 OUT b\n"
- "B1\n"
- "1 REF a\n"
- "1 NUM 1\n"
- "0 OPT >\n"
- "0 JEZ 1\n"
- "B2\n"
- "0 NUM 1\n"
- "0 OUT b\n"
- "B1\n"
- "0 NEL 1\n"
- "1 REF a\n"
- "1 NUM 2\n"
- "0 OPT >\n"
- "0 JEZ 1\n"
- "B2\n"
- "0 NUM 2\n"
- "0 OUT b\n"
- "B1\n"
- "0 NEL 1\n"
- "B2\n"
- "0 NUM 3\n"
- "0 OUT b\n"
- "B0\n"
- "0 NEL 1\n"
- "B1\n"
- "0 NUM 3\n"
- "0 OUT b\n"
- "B0\n"
- );
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- TEST(parser, for_range) {
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- char* lines =
- "for i in range(0,10):\n"
- " print(i)\n"
- "\n";
- printf("%s", lines);
- char* pikaAsm = Parser_linesToAsm(buffs, lines);
- EXPECT_STREQ(pikaAsm,
- "B0\n"
- "2 NUM 0\n"
- "2 NUM 10\n"
- "1 RUN range\n"
- "0 RUN iter\n"
- "0 OUT $l0\n"
- "B0\n"
- "0 RUN $l0.__next__\n"
- "0 OUT i\n"
- "0 EST i\n"
- "0 JEZ 2\n"
- "B1\n"
- "1 REF i\n"
- "0 RUN print\n"
- "B0\n"
- "0 JMP -1\n"
- "B0\n"
- "0 DEL $l0\n"
- "B0\n");
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- TEST(parser, for_range_rtt) {
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- char* lines =
- "for i in range(0, 3):\n"
- " print('hello PikaScript!')\n"
- " thread.mdelay(500)\n"
- "\n";
- printf("%s", lines);
- char* pikaAsm = Parser_linesToAsm(buffs, lines);
- printf("%s", pikaAsm);
- EXPECT_STREQ(pikaAsm,
- "B0\n"
- "2 NUM 0\n"
- "2 NUM 3\n"
- "1 RUN range\n"
- "0 RUN iter\n"
- "0 OUT $l0\n"
- "B0\n"
- "0 RUN $l0.__next__\n"
- "0 OUT i\n"
- "0 EST i\n"
- "0 JEZ 2\n"
- "B1\n"
- "1 STR hello PikaScript!\n"
- "0 RUN print\n"
- "B1\n"
- "1 NUM 500\n"
- "0 RUN thread.mdelay\n"
- "B0\n"
- "0 JMP -1\n"
- "B0\n"
- "0 DEL $l0\n"
- "B0\n");
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- TEST(parser, for_list) {
- Args* bf = New_strBuff();
- Stack bs;
- stack_init(&bs);
- char* s = strsCopy(bf, "");
- s = parse("for arg in xrange(0,10):", bf, s, &bs);
- s = parse(" print(arg)", bf, s, &bs);
- s = parse("", bf, s, &bs);
- printf("%s", s);
- EXPECT_STREQ(s,
- "B0\n"
- "2 NUM 0\n"
- "2 NUM 10\n"
- "1 RUN xrange\n"
- "0 RUN iter\n"
- "0 OUT $l0\n"
- "B0\n"
- "0 RUN $l0.__next__\n"
- "0 OUT arg\n"
- "0 EST arg\n"
- "0 JEZ 2\n"
- "B1\n"
- "1 REF arg\n"
- "0 RUN print\n"
- "B0\n"
- "0 JMP -1\n"
- "B0\n"
- "0 DEL $l0\n"
- "B0\n");
- stack_deinit(&bs);
- args_deinit(bf);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- TEST(parser, for_for_range) {
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- char* lines =
- "a = 0\n"
- "for i in range(0, 10):\n"
- " for k in range(0, 3):\n"
- " print(k)\n"
- " a = a + k\n"
- "\n";
- printf("%s", lines);
- char* pikaAsm = Parser_linesToAsm(buffs, lines);
- printf("%s", pikaAsm);
- EXPECT_STREQ(pikaAsm,(char *)
- "B0\n"
- "0 NUM 0\n"
- "0 OUT a\n"
- "B0\n"
- "2 NUM 0\n"
- "2 NUM 10\n"
- "1 RUN range\n"
- "0 RUN iter\n"
- "0 OUT $l0\n"
- "B0\n"
- "0 RUN $l0.__next__\n"
- "0 OUT i\n"
- "0 EST i\n"
- "0 JEZ 2\n"
- "B1\n"
- "2 NUM 0\n"
- "2 NUM 3\n"
- "1 RUN range\n"
- "0 RUN iter\n"
- "0 OUT $l1\n"
- "B1\n"
- "0 RUN $l1.__next__\n"
- "0 OUT k\n"
- "0 EST k\n"
- "0 JEZ 2\n"
- "B2\n"
- "1 REF k\n"
- "0 RUN print\n"
- "B2\n"
- "1 REF a\n"
- "1 REF k\n"
- "0 OPT +\n"
- "0 OUT a\n"
- "B1\n"
- "0 JMP -1\n"
- "B1\n"
- "0 DEL $l1\n"
- "B0\n"
- "0 JMP -1\n"
- "B0\n"
- "0 DEL $l0\n"
- "B0\n"
- );
- ByteCodeFrame bytecode_frame;
- byteCodeFrame_init(&bytecode_frame);
- byteCodeFrame_appendFromAsm(&bytecode_frame, pikaAsm);
- byteCodeFrame_print(&bytecode_frame);
- byteCodeFrame_deinit(&bytecode_frame);
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- TEST(parser, break_) {
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- char* lines =
- "for i in range(0, 3):\n"
- " if i = 1:\n"
- " break\n"
- " break \n"
- " continue\n"
- " continue \n"
- "\n";
- printf("%s", lines);
- char* pikaAsm = Parser_linesToAsm(buffs, lines);
- printf("%s", pikaAsm);
- EXPECT_STREQ(pikaAsm,
- "B0\n"
- "2 NUM 0\n"
- "2 NUM 3\n"
- "1 RUN range\n"
- "0 RUN iter\n"
- "0 OUT $l0\n"
- "B0\n"
- "0 RUN $l0.__next__\n"
- "0 OUT i\n"
- "0 EST i\n"
- "0 JEZ 2\n"
- "B1\n"
- "0 NUM 1\n"
- "0 OUT i\n"
- "0 JEZ 1\n"
- "B2\n"
- "0 BRK \n"
- "B2\n"
- "0 BRK \n"
- "B2\n"
- "0 CTN \n"
- "B2\n"
- "0 CTN \n"
- "B0\n"
- "0 JMP -1\n"
- "B0\n"
- "0 DEL $l0\n"
- "B0\n");
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- TEST(parser, prime_100) {
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- char* lines =
- "num = 0\n"
- "i = 2\n"
- "for i in range(2,100):\n"
- " j=2\n"
- " is_prime = 1\n"
- " for j in range(2 , i):\n"
- " if i%j==0:\n"
- " is_prime = 0\n"
- " break\n"
- " if is_prime:\n"
- " num = num + i\n"
- "\n";
- printf("%s", lines);
- char* pikaAsm = Parser_linesToAsm(buffs, lines);
- printf("%s", pikaAsm);
- EXPECT_STREQ(pikaAsm,
- "B0\n"
- "0 NUM 0\n"
- "0 OUT num\n"
- "B0\n"
- "0 NUM 2\n"
- "0 OUT i\n"
- "B0\n"
- "2 NUM 2\n"
- "2 NUM 100\n"
- "1 RUN range\n"
- "0 RUN iter\n"
- "0 OUT $l0\n"
- "B0\n"
- "0 RUN $l0.__next__\n"
- "0 OUT i\n"
- "0 EST i\n"
- "0 JEZ 2\n"
- "B1\n"
- "0 NUM 2\n"
- "0 OUT j\n"
- "B1\n"
- "0 NUM 1\n"
- "0 OUT is_prime\n"
- "B1\n"
- "2 NUM 2\n"
- "2 REF i\n"
- "1 RUN range\n"
- "0 RUN iter\n"
- "0 OUT $l1\n"
- "B1\n"
- "0 RUN $l1.__next__\n"
- "0 OUT j\n"
- "0 EST j\n"
- "0 JEZ 2\n"
- "B2\n"
- "2 REF i\n"
- "2 REF j\n"
- "1 OPT %\n"
- "1 NUM 0\n"
- "0 OPT ==\n"
- "0 JEZ 1\n"
- "B3\n"
- "0 NUM 0\n"
- "0 OUT is_prime\n"
- "B3\n"
- "0 BRK \n"
- "B1\n"
- "0 JMP -1\n"
- "B1\n"
- "0 DEL $l1\n"
- "B1\n"
- "0 REF is_prime\n"
- "0 JEZ 1\n"
- "B2\n"
- "1 REF num\n"
- "1 REF i\n"
- "0 OPT +\n"
- "0 OUT num\n"
- "B0\n"
- "0 JMP -1\n"
- "B0\n"
- "0 DEL $l0\n"
- "B0\n");
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- TEST(parser, __iter__) {
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- char* lines = "__res = __iter__()\n";
- printf("%s", lines);
- char* pikaAsm = Parser_linesToAsm(buffs, lines);
- printf("%s", pikaAsm);
- EXPECT_STREQ(pikaAsm,
- "B0\n"
- "0 RUN __iter__\n"
- "0 OUT __res\n"
- "B0\n");
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- /* not solve yet */
- // TEST(parser, strEqu) {
- // pikaMemInfo.heapUsedMax = 0;
- // Args* buffs = New_strBuff();
- // char* lines =
- // "a = '1ee' == '1ee'\n"
- // "b = '1e' == '1ee'\n"
- // "\n";
- // printf("%s", lines);
- // char* pikaAsm = Parser_multiLineToAsm(buffs, lines);
- // printf("%s", pikaAsm);
- // EXPECT_STREQ(pikaAsm,
- // "a = ('1ee' == '1ee')\n"
- // "b = ('1e' == '1ee')\n"
- // "\n");
- // args_deinit(buffs);
- // EXPECT_EQ(pikaMemNow(), 0);
- // }
- TEST(parser, for_in_string) {
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- char* lines =
- "for b in 'test':\n"
- " a = 1\n"
- "\n";
- printf("%s", lines);
- char* pikaAsm = Parser_linesToAsm(buffs, lines);
- printf("%s", pikaAsm);
- EXPECT_STREQ(pikaAsm,
- "B0\n"
- "1 STR test\n"
- "0 RUN iter\n"
- "0 OUT $l0\n"
- "B0\n"
- "0 RUN $l0.__next__\n"
- "0 OUT b\n"
- "0 EST b\n"
- "0 JEZ 2\n"
- "B1\n"
- "0 NUM 1\n"
- "0 OUT a\n"
- "B0\n"
- "0 JMP -1\n"
- "B0\n"
- "0 DEL $l0\n"
- "B0\n");
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- TEST(parser, print_ddd) {
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- char* lines = "print(\"[Info]: in Python config...\")\n";
- printf("%s", lines);
- char* pikaAsm = Parser_linesToAsm(buffs, lines);
- printf("%s", pikaAsm);
- EXPECT_STREQ(pikaAsm,
- "B0\n"
- "1 STR [Info]: in Python config...\n"
- "0 RUN print\n"
- "B0\n");
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- #if PIKA_SYNTAX_SLICE_ENABLE
- TEST(parser, __getitem__3) {
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- char* lines = "a = b[c+d] + e[f*j]\n";
- printf("%s", lines);
- char* pikaAsm = Parser_linesToAsm(buffs, lines);
- printf("%s", pikaAsm);
- EXPECT_STREQ(pikaAsm,
- "B0\n"
- "2 REF b\n"
- "3 REF c\n"
- "3 REF d\n"
- "2 OPT +\n"
- "1 SLC \n"
- "2 REF e\n"
- "3 REF f\n"
- "3 REF j\n"
- "2 OPT *\n"
- "1 SLC \n"
- "0 OPT +\n"
- "0 OUT a\n"
- "B0\n");
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- #endif
- #if PIKA_SYNTAX_SLICE_ENABLE
- TEST(parser, __getitem__) {
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- char* lines = "a = b[c]\n";
- printf("%s", lines);
- char* pikaAsm = Parser_linesToAsm(buffs, lines);
- printf("%s", pikaAsm);
- EXPECT_STREQ(pikaAsm,
- "B0\n"
- "1 REF b\n"
- "1 REF c\n"
- "0 SLC \n"
- "0 OUT a\n"
- "B0\n");
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- #endif
- #if PIKA_SYNTAX_SLICE_ENABLE
- TEST(parser, __getitem__2) {
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- char* lines = "a = b[c+d]\n";
- printf("%s", lines);
- char* pikaAsm = Parser_linesToAsm(buffs, lines);
- printf("%s", pikaAsm);
- EXPECT_STREQ(pikaAsm,
- "B0\n"
- "1 REF b\n"
- "2 REF c\n"
- "2 REF d\n"
- "1 OPT +\n"
- "0 SLC \n"
- "0 OUT a\n"
- "B0\n");
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- #endif
- #if PIKA_SYNTAX_SLICE_ENABLE
- TEST(parser, __setitem__) {
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- char* lines = "a[b] = c\n";
- printf("%s", lines);
- char* pikaAsm = Parser_linesToAsm(buffs, lines);
- printf("%s", pikaAsm);
- EXPECT_STREQ(pikaAsm,
- "B0\n"
- "1 REF a\n"
- "1 REF b\n"
- "1 REF c\n"
- "0 RUN __setitem__\n"
- "0 OUT a\n"
- "B0\n");
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- #endif
- TEST(parser, str_p_str) {
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- char* lines = "a = str(1) + str(1)\n";
- printf("%s", lines);
- char* pikaAsm = Parser_linesToAsm(buffs, lines);
- printf("%s", pikaAsm);
- EXPECT_STREQ(pikaAsm,
- "B0\n"
- "2 NUM 1\n"
- "1 RUN str\n"
- "2 NUM 1\n"
- "1 RUN str\n"
- "0 OPT +\n"
- "0 OUT a\n"
- "B0\n");
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- TEST(parser, test__) {
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- char* lines =
- "len = __calls.len()\n"
- "mode = 'none'\n"
- "info_index = 0\n"
- "for i in range(0, len):\n"
- " if len == 0:\n"
- " break\n"
- " if info_index == 0:\n"
- " mode = __calls[i]\n"
- " info_index = 1\n"
- " elif info_index == 1:\n"
- " if mode == 'always':\n"
- " todo = __calls[i]\n"
- " todo()\n"
- " info_index = 0\n"
- " elif mode == 'when':\n"
- " when = __calls[i]\n"
- " info_index = 2\n"
- " elif mode == 'period_ms':\n"
- " period_ms = __calls[i]\n"
- " info_index = 2\n"
- " elif info_index == 2:\n"
- " if mode == 'when':\n"
- " if when():\n"
- " todo = __calls[i]\n"
- " todo()\n"
- " info_index = 0\n"
- " elif mode == 'period_ms':\n"
- " todo = __calls[i]\n"
- " info_index = 3\n"
- " elif info_index == 3:\n"
- " if mode == 'period_ms':\n"
- " if __tick > __calls[i]:\n"
- " todo()\n"
- " __calls[i] = __tick + period_ms\n"
- " info_index = 0\n"
- "\n";
- printf("%s", lines);
- char* pikaAsm = Parser_linesToAsm(buffs, lines);
- printf("%s", pikaAsm);
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- TEST(parser, global) {
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- char* lines =
- "def test_global():\n"
- " global x\n"
- " global y, z\n"
- "\n";
- printf("%s", lines);
- char* pikaAsm = Parser_linesToAsm(buffs, lines);
- printf("%s", pikaAsm);
- EXPECT_STREQ(pikaAsm, (char *)
- "B0\n"
- "0 DEF test_global()\n"
- "0 JMP 1\n"
- "B1\n"
- "0 GLB x\n"
- "B1\n"
- "0 GLB y,z\n"
- "B1\n"
- "0 RET \n"
- "B0\n"
- );
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- TEST(parser, mpy_demo_1) {
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- char* lines = "chars = ' .,-:;i+hHM$*#@ '\n";
- printf("%s", lines);
- char* pikaAsm = Parser_linesToAsm(buffs, lines);
- printf("%s", pikaAsm);
- EXPECT_STREQ(pikaAsm,
- "B0\n"
- "0 STR .,-:;i+hHM$*#@ \n"
- "0 OUT chars\n"
- "B0\n");
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- TEST(parser, clean_compled_str) {
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- char* res = Cursor_getCleanStmt(buffs, "chars = ' .,-:;i+hHM$*#@ '\n");
- EXPECT_STREQ(res, "chars=' .,-:;i+hHM$*#@ '\n");
- printf("%s", res);
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- TEST(parser, class_) {
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- char* lines =
- "class Test(TinyObj):\n"
- " x = 1\n"
- "\n";
- printf("%s", lines);
- char* pikaAsm = Parser_linesToAsm(buffs, lines);
- printf("%s", pikaAsm);
- EXPECT_STREQ(pikaAsm, (char* )
- "B0\n"
- "0 CLS Test()\n"
- "0 JMP 1\n"
- "B1\n"
- "0 RUN TinyObj\n"
- "0 OUT self\n"
- "B1\n"
- "0 RAS self\n"
- "B1\n"
- "0 NUM 1\n"
- "0 OUT x\n"
- "B1\n"
- "0 RAS $origin\n"
- "B1\n"
- "0 NEW self\n"
- "0 RET \n"
- "B0\n"
- );
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- TEST(parser, class_def) {
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- char* lines =
- "class Test():\n"
- " x = 1\n"
- " def hello():\n"
- " print('hello')\n"
- "\n";
- printf("%s", lines);
- char* pikaAsm = Parser_linesToAsm(buffs, lines);
- printf("%s", pikaAsm);
- EXPECT_STREQ(pikaAsm,
- "B0\n"
- "0 CLS Test()\n"
- "0 JMP 1\n"
- "B1\n"
- "0 RUN TinyObj\n"
- "0 OUT self\n"
- "B1\n"
- "0 RAS self\n"
- "B1\n"
- "0 NUM 1\n"
- "0 OUT x\n"
- "B1\n"
- "0 DEF hello()\n"
- "0 JMP 1\n"
- "B2\n"
- "1 STR hello\n"
- "0 RUN print\n"
- "B2\n"
- "0 RET \n"
- "B1\n"
- "0 RAS $origin\n"
- "B1\n"
- "0 NEW self\n"
- "0 RET \n"
- "B0\n");
- ByteCodeFrame bytecode_frame;
- byteCodeFrame_init(&bytecode_frame);
- byteCodeFrame_appendFromAsm(&bytecode_frame, pikaAsm);
- byteCodeFrame_print(&bytecode_frame);
- byteCodeFrame_deinit(&bytecode_frame);
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- TEST(parser, nag_a) {
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- char* lines = "print(-a)\n";
- printf("%s", lines);
- char* pikaAsm = Parser_linesToAsm(buffs, lines);
- printf("%s", pikaAsm);
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- TEST(asmer, asmer_to_instructUnit) {
- char* asm_line =
- "B2\n"
- "2 NUM 2\n"
- "2 NUM 3\n"
- "1 RUN add\n"
- "0 RUN test.on\n";
- Args buffs = {0};
- ByteCodeFrame bytecode_frame;
- byteCodeFrame_init(&bytecode_frame);
- byteCodeFrame_appendFromAsm(&bytecode_frame, asm_line);
- byteCodeFrame_print(&bytecode_frame);
- InstructUnit* ins_unit =
- instructArray_getByOffset(&(bytecode_frame.instruct_array), 4);
- instructUnit_print(ins_unit);
- size_t byteCode_size = byteCodeFrame_getSize(&bytecode_frame);
- uint16_t offset_out =
- constPool_getOffsetByData(&(bytecode_frame.const_pool), "add");
- char* data_out =
- constPool_getByOffset(&(bytecode_frame.const_pool), offset_out);
- /* assert */
- EXPECT_STREQ(data_out, "add");
- EXPECT_EQ(byteCode_size, 33);
- EXPECT_STREQ(constPool_getNext(&(bytecode_frame.const_pool)), "2");
- EXPECT_STREQ(constPool_getNext(&(bytecode_frame.const_pool)), "3");
- EXPECT_STREQ(constPool_getNext(&(bytecode_frame.const_pool)), "add");
- EXPECT_STREQ(constPool_getNext(&(bytecode_frame.const_pool)), "test.on");
- EXPECT_EQ((uintptr_t)constPool_getNext(&(bytecode_frame.const_pool)),
- (uintptr_t)NULL);
- /* deinit */
- byteCodeFrame_deinit(&bytecode_frame);
- strsDeinit(&buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- TEST(asmer, asm_to_bytecodeArray) {
- char* pikaAsm =
- "B0\n"
- "0 RUN __init__\n";
- ByteCodeFrame bytecode_frame;
- byteCodeFrame_init(&bytecode_frame);
- byteCodeFrame_appendFromAsm(&bytecode_frame, pikaAsm);
- byteCodeFrame_printAsArray(&bytecode_frame);
- byteCodeFrame_deinit(&bytecode_frame);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- TEST(asmer, asm_to_bytecode_0x0d) {
- char* pikaAsm =
- "B0\n"
- "0 RUN __init__\n";
- char* pikaAsm1 =
- "B0\r\n"
- "0 RUN __init__\r\n";
- ByteCodeFrame bytecode_frame;
- byteCodeFrame_init(&bytecode_frame);
- byteCodeFrame_appendFromAsm(&bytecode_frame, pikaAsm);
- byteCodeFrame_printAsArray(&bytecode_frame);
- ByteCodeFrame bytecode_frame1;
- byteCodeFrame_init(&bytecode_frame1);
- byteCodeFrame_appendFromAsm(&bytecode_frame1, pikaAsm1);
- byteCodeFrame_printAsArray(&bytecode_frame1);
- EXPECT_EQ(bytecode_frame1.const_pool.size, bytecode_frame.const_pool.size);
- EXPECT_EQ(bytecode_frame1.instruct_array.size,
- bytecode_frame.instruct_array.size);
- /* deinit */
- byteCodeFrame_deinit(&bytecode_frame1);
- byteCodeFrame_deinit(&bytecode_frame);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- #if PIKA_SYNTAX_SLICE_ENABLE
- TEST(parser, list_1_2) {
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- char* lines = "print(list[0] + list[1])\n";
- printf("%s", lines);
- char* pikaAsm = Parser_linesToAsm(buffs, lines);
- printf("%s", pikaAsm);
- EXPECT_STREQ(pikaAsm,
- "B0\n"
- "3 REF list\n"
- "3 NUM 0\n"
- "2 SLC \n"
- "3 REF list\n"
- "3 NUM 1\n"
- "2 SLC \n"
- "1 OPT +\n"
- "0 RUN print\n"
- "B0\n");
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- #endif
- TEST(parser, class_def_void_line) {
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- char* lines =
- "class Test():\n"
- " x = 1\n"
- "\n"
- " def hello():\n"
- "#test\n"
- " print('hello')\n"
- " \n"
- "\n";
- printf("%s", lines);
- char* pikaAsm = Parser_linesToAsm(buffs, lines);
- printf("%s", pikaAsm);
- EXPECT_STREQ(pikaAsm,
- "B0\n"
- "0 CLS Test()\n"
- "0 JMP 1\n"
- "B1\n"
- "0 RUN TinyObj\n"
- "0 OUT self\n"
- "B1\n"
- "0 RAS self\n"
- "B1\n"
- "0 NUM 1\n"
- "0 OUT x\n"
- "B1\n"
- "0 DEF hello()\n"
- "0 JMP 1\n"
- "B2\n"
- "1 STR hello\n"
- "0 RUN print\n"
- "B2\n"
- "0 RET \n"
- "B1\n"
- "0 RAS $origin\n"
- "B1\n"
- "0 NEW self\n"
- "0 RET \n"
- "B0\n");
- ByteCodeFrame bytecode_frame;
- byteCodeFrame_init(&bytecode_frame);
- byteCodeFrame_appendFromAsm(&bytecode_frame, pikaAsm);
- byteCodeFrame_print(&bytecode_frame);
- byteCodeFrame_deinit(&bytecode_frame);
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- #if PIKA_SYNTAX_IMPORT_EX_ENABLE
- TEST(parser, multiLine_import) {
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- char* lines =(char *)
- "import TEE\n"
- "from EE import C\n"
- "from PikaStdLib import MemChecker as MC\n"
- "while true:\n"
- " rgb.flow()\n"
- " if false:\n"
- " a=3\n"
- " test.on(add(2,3))\n"
- "\n";
- printf("%s", lines);
- char* pikaAsm = Parser_linesToAsm(buffs, lines);
- printf("%s", pikaAsm);
- EXPECT_STREQ(pikaAsm,
- "B0\n"
- "0 IMP TEE\n"
- "B0\n"
- "0 IMP EE\n"
- "B0\n"
- "0 REF EE.C\n"
- "0 OUT C\n"
- "B0\n"
- "0 IMP PikaStdLib\n"
- "B0\n"
- "0 REF PikaStdLib.MemChecker\n"
- "0 OUT MC\n"
- "B0\n"
- "0 REF true\n"
- "0 JEZ 2\n"
- "B1\n"
- "0 RUN rgb.flow\n"
- "B1\n"
- "0 REF false\n"
- "0 JEZ 1\n"
- "B2\n"
- "0 NUM 3\n"
- "0 OUT a\n"
- "B2\n"
- "2 NUM 2\n"
- "2 NUM 3\n"
- "1 RUN add\n"
- "0 RUN test.on\n"
- "B0\n"
- "0 JMP -1\n"
- "B0\n");
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- #endif
- TEST(parser, multiLine_comment) {
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- char* lines =(char *)
- "'''\n"
- "a = 1\n"
- "'''\n"
- "while true:\n"
- " rgb.flow()\n"
- " ''' \n"
- " a = 1\n"
- " ''' \n"
- " if false:\n"
- " \"\"\" \n"
- " a = 1\n"
- " a = 1\n"
- " \"\"\"\n"
- " a=3\n"
- " test.on(add(2,3))\n"
- "\n";
- printf("%s", lines);
- char* pikaAsm = Parser_linesToAsm(buffs, lines);
- printf("%s", pikaAsm);
- EXPECT_STREQ(pikaAsm,
- "B0\n"
- "0 REF true\n"
- "0 JEZ 2\n"
- "B1\n"
- "0 RUN rgb.flow\n"
- "B1\n"
- "0 REF false\n"
- "0 JEZ 1\n"
- "B2\n"
- "0 NUM 3\n"
- "0 OUT a\n"
- "B2\n"
- "2 NUM 2\n"
- "2 NUM 3\n"
- "1 RUN add\n"
- "0 RUN test.on\n"
- "B0\n"
- "0 JMP -1\n"
- "B0\n");
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- TEST(parser, plus_equ) {
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- char* lines = "a += 1+1\n";
- printf("%s", lines);
- char* pikaAsm = Parser_linesToAsm(buffs, lines);
- printf("%s", pikaAsm);
- EXPECT_STREQ(pikaAsm,
- "B0\n"
- "1 REF a\n"
- "3 NUM 1\n"
- "3 NUM 1\n"
- "2 OPT +\n"
- "1 RUN \n"
- "0 OPT +\n"
- "0 OUT a\n"
- "B0\n");
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- TEST(lexser, a_j) {
- /* init */
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- /* run */
- char* tokens = Lexer_getTokenStream(buffs, "a=");
- char* printTokenStream = Lexer_printTokenStream(buffs, tokens);
- printf("%s\n", printTokenStream);
- /* assert */
- EXPECT_STREQ(printTokenStream, "{sym}a{opt}=");
- /* deinit */
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- TEST(parser, plus_equ_) {
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- char* lines = "a -= (1+1-3)\n";
- printf("%s", lines);
- char* pikaAsm = Parser_linesToAsm(buffs, lines);
- printf("%s", pikaAsm);
- EXPECT_STREQ(pikaAsm,
- "B0\n"
- "1 REF a\n"
- "5 NUM 1\n"
- "5 NUM 1\n"
- "4 OPT +\n"
- "4 NUM 3\n"
- "3 OPT -\n"
- "2 RUN \n"
- "1 RUN \n"
- "0 OPT -\n"
- "0 OUT a\n"
- "B0\n");
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- TEST(parser, class_demo_3) {
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- char* lines =
- "class people:\n"
- " def speak(self):\n"
- " print('i am a people')\n"
- " \n"
- "class student(people):\n"
- " def speak(self):\n"
- " print('i am a student')\n"
- " \n"
- "p = people()\n"
- "s = student()\n"
- "p.speak()\n"
- "s.speak()\n";
- printf("%s", lines);
- char* pikaAsm = Parser_linesToAsm(buffs, lines);
- printf("%s", pikaAsm);
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- TEST(parser, a_a) {
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- char* lines =
- "a = 1\n"
- "a\n"
- "a\n";
- printf("%s", lines);
- char* pikaAsm = Parser_linesToAsm(buffs, lines);
- printf("%s", pikaAsm);
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- TEST(parser, a_cuohao_j) {
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- char* lines = "a = (3 - 4) - 4\n";
- printf("%s\n",
- Lexer_printTokenStream(buffs, Lexer_getTokenStream(buffs, lines)));
- printf("%s", lines);
- char* pikaAsm = Parser_linesToAsm(buffs, lines);
- EXPECT_STREQ(pikaAsm,
- "B0\n"
- "3 NUM 3\n"
- "3 NUM 4\n"
- "2 OPT -\n"
- "1 RUN \n"
- "1 NUM 4\n"
- "0 OPT -\n"
- "0 OUT a\n"
- "B0\n");
- printf("%s", pikaAsm);
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- TEST(parser, _3_3) {
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- char* lines = "-3+3\n";
- printf("%s\n",
- Lexer_printTokenStream(buffs, Lexer_getTokenStream(buffs, lines)));
- printf("%s", lines);
- char* pikaAsm = Parser_linesToAsm(buffs, lines);
- EXPECT_STREQ(pikaAsm,
- "B0\n"
- "2 NUM 3\n"
- "1 OPT -\n"
- "1 NUM 3\n"
- "0 OPT +\n"
- "B0\n");
- printf("%s", pikaAsm);
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- #if PIKA_BUILTIN_STRUCT_ENABLE
- TEST(parser, list_init) {
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- char* lines = "a = [1, 2, 3]\n";
- printf("%s\n",
- Lexer_printTokenStream(buffs, Lexer_getTokenStream(buffs, lines)));
- printf("%s", lines);
- char* pikaAsm = Parser_linesToAsm(buffs, lines);
- EXPECT_STREQ(pikaAsm,
- "B0\n"
- "1 NUM 1\n"
- "1 NUM 2\n"
- "1 NUM 3\n"
- "0 LST \n"
- "0 OUT a\n"
- "B0\n");
- printf("%s", pikaAsm);
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- TEST(parser, list_init_fun) {
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- char* lines = "test([1, 2, 3])\n";
- printf("%s\n",
- Lexer_printTokenStream(buffs, Lexer_getTokenStream(buffs, lines)));
- printf("%s", lines);
- char* pikaAsm = Parser_linesToAsm(buffs, lines);
- EXPECT_STREQ(pikaAsm,
- "B0\n"
- "2 NUM 1\n"
- "2 NUM 2\n"
- "2 NUM 3\n"
- "1 LST \n"
- "0 RUN test\n"
- "B0\n");
- printf("%s", pikaAsm);
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- #endif
- TEST(parser, bytes_iteral) {
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- char* lines = "a = b'\\x00\\x01'\n";
- char* tokens_str =
- Lexer_printTokenStream(buffs, Lexer_getTokenStream(buffs, lines));
- printf("%s\n", tokens_str);
- printf("%s", lines);
- char* pikaAsm = Parser_linesToAsm(buffs, lines);
- printf("%s", pikaAsm);
- EXPECT_STREQ(pikaAsm,
- "B0\n"
- "0 BYT \\x00\\x01\n"
- "0 OUT a\n"
- "B0\n");
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- #if PIKA_SYNTAX_IMPORT_EX_ENABLE
- TEST(parser, import_as) {
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- char* lines = "import PikaStdLib as std\n";
- char* tokens_str =
- Lexer_printTokenStream(buffs, Lexer_getTokenStream(buffs, lines));
- printf("%s\n", tokens_str);
- printf("%s", lines);
- char* pikaAsm = Parser_linesToAsm(buffs, lines);
- printf("%s", pikaAsm);
- EXPECT_STREQ(pikaAsm,
- "B0\n"
- "0 IMP PikaStdLib\n"
- "B0\n"
- "0 REF PikaStdLib\n"
- "0 OUT std\n"
- "B0\n");
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- #endif
- TEST(parser, str_equ) {
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- char* lines = "a = 'num ='\n";
- char* tokens_str =
- Lexer_printTokenStream(buffs, Lexer_getTokenStream(buffs, lines));
- printf("%s\n", tokens_str);
- printf("%s", lines);
- char* pikaAsm = Parser_linesToAsm(buffs, lines);
- printf("%s", pikaAsm);
- EXPECT_STREQ(pikaAsm,
- "B0\n"
- "0 STR num =\n"
- "0 OUT a\n"
- "B0\n");
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- #if PIKA_SYNTAX_SLICE_ENABLE
- TEST(parser, bytes_index) {
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- char* lines = "res2 = b'eqrt'[2]\n";
- char* tokens_str =
- Lexer_printTokenStream(buffs, Lexer_getTokenStream(buffs, lines));
- printf("%s\n", tokens_str);
- printf("%s", lines);
- char* pikaAsm = Parser_linesToAsm(buffs, lines);
- printf("%s", pikaAsm);
- EXPECT_STREQ(pikaAsm,
- "B0\n"
- "1 BYT eqrt\n"
- "1 NUM 2\n"
- "0 SLC \n"
- "0 OUT res2\n"
- "B0\n");
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- #endif
- TEST(parser, hex_iteral) {
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- char* lines = "a = 0b10\n";
- char* tokens_str =
- Lexer_printTokenStream(buffs, Lexer_getTokenStream(buffs, lines));
- printf("%s\n", tokens_str);
- printf("%s", lines);
- char* pikaAsm = Parser_linesToAsm(buffs, lines);
- printf("%s", pikaAsm);
- EXPECT_STREQ(pikaAsm,
- "B0\n"
- "0 NUM 0b10\n"
- "0 OUT a\n"
- "B0\n");
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- TEST(parser, tab) {
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- char* lines =
- "for i in range(0, 100):\n"
- "\tprint(i)\n"
- "\n";
- char* tokens_str =
- Lexer_printTokenStream(buffs, Lexer_getTokenStream(buffs, lines));
- printf("%s\n", tokens_str);
- printf("%s", lines);
- char* pikaAsm = Parser_linesToAsm(buffs, lines);
- printf("%s", pikaAsm);
- EXPECT_STREQ(pikaAsm,
- "B0\n"
- "2 NUM 0\n"
- "2 NUM 100\n"
- "1 RUN range\n"
- "0 RUN iter\n"
- "0 OUT $l0\n"
- "B0\n"
- "0 RUN $l0.__next__\n"
- "0 OUT i\n"
- "0 EST i\n"
- "0 JEZ 2\n"
- "B1\n"
- "1 REF i\n"
- "0 RUN print\n"
- "B0\n"
- "0 JMP -1\n"
- "B0\n"
- "0 DEL $l0\n"
- "B0\n");
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- #if PIKA_SYNTAX_SLICE_ENABLE
- TEST(parser, parse_issue2) {
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- char* lines = " recv_buf[1] = dat \n";
- char* tokens = Lexer_getTokenStream(buffs, lines);
- uint16_t token_size = TokenStream_getSize(tokens);
- EXPECT_EQ(token_size, 8);
- char* tokens_str = Lexer_printTokenStream(buffs, tokens);
- printf("%s\n", tokens_str);
- printf("%s", lines);
- char* pikaAsm = Parser_linesToAsm(buffs, lines);
- printf("%s", pikaAsm);
- EXPECT_STREQ(pikaAsm,
- "B1\n"
- "1 REF recv_buf\n"
- "1 NUM 1\n"
- "1 REF dat\n"
- "0 RUN __setitem__\n"
- "0 OUT recv_buf\n"
- "B0\n");
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- #endif
- TEST(parser, parse_issue3) {
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- char* lines = "recv_buf[1] = dat ";
- char* clean_cmd = Cursor_getCleanStmt(buffs, lines);
- EXPECT_STREQ(clean_cmd, "recv_buf[1]=dat");
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- #if PIKA_SYNTAX_SLICE_ENABLE
- TEST(parser, slice1) {
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- char* lines = "a = recv_buf[1:4]\n";
- printf("%s", lines);
- char* pikaAsm = Parser_linesToAsm(buffs, lines);
- printf("%s", pikaAsm);
- EXPECT_STREQ(pikaAsm,
- "B0\n"
- "1 REF recv_buf\n"
- "1 NUM 1\n"
- "1 NUM 4\n"
- "0 SLC \n"
- "0 OUT a\n"
- "B0\n");
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- #endif
- #if PIKA_SYNTAX_SLICE_ENABLE
- TEST(parser, slice2) {
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- char* lines = "a = recv_buf[1:4:2]\n";
- printf("%s", lines);
- char* pikaAsm = Parser_linesToAsm(buffs, lines);
- printf("%s", pikaAsm);
- EXPECT_STREQ(pikaAsm,
- "B0\n"
- "1 REF recv_buf\n"
- "1 NUM 1\n"
- "1 NUM 4\n"
- "1 NUM 2\n"
- "0 SLC \n"
- "0 OUT a\n"
- "B0\n");
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- #endif
- TEST(parser, str_add1) {
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- char* lines = "msg = \"device_names[\" + str(i) + \"]:\"";
- printf("%s\r\n", lines);
- char* pikaAsm = Parser_linesToAsm(buffs, lines);
- char* tokens_print =
- Lexer_printTokenStream(buffs, Lexer_getTokenStream(buffs, lines));
- printf("%s\r\n", tokens_print);
- EXPECT_STREQ(tokens_print,
- "{sym}msg{opt}={lit}\"device_names[\"{opt}+{sym}str{dvd}({sym}"
- "i{dvd}){opt}+{lit}\"]:\"");
- printf("%s", pikaAsm);
- EXPECT_STREQ(pikaAsm,(char *)
- "B0\n"
- "2 STR device_names[\n"
- "3 REF i\n"
- "2 RUN str\n"
- "1 OPT +\n"
- "1 STR ]:\n"
- "0 OPT +\n"
- "0 OUT msg\n"
- "B0\n");
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- TEST(parser, str_add2) {
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- char* lines = "msg = \"device_names[\" + str(i)";
- printf("%s\r\n", lines);
- char* pikaAsm = Parser_linesToAsm(buffs, lines);
- char* tokens_print =
- Lexer_printTokenStream(buffs, Lexer_getTokenStream(buffs, lines));
- printf("%s\r\n", tokens_print);
- EXPECT_STREQ(tokens_print,
- "{sym}msg{opt}={lit}\"device_names[\"{opt}+{sym}str{dvd}({sym}"
- "i{dvd})");
- printf("%s", pikaAsm);
- EXPECT_STREQ(pikaAsm,(char *)
- "B0\n"
- "1 STR device_names[\n"
- "2 REF i\n"
- "1 RUN str\n"
- "0 OPT +\n"
- "0 OUT msg\n"
- "B0\n");
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- TEST(parser, mpy1) {
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- char* lines =
- "# Pong!\n"
- "# Using emulated hardware i2c, we can push enough frames for\n"
- "# rough animations. Performance for this project is reduced\n"
- "# using chromium.\n"
- "\n"
- "import machine\n"
- "import framebuf\n"
- "import time\n"
- "import pyb\n"
- "\n"
- "SCREEN_WIDTH = 64\n"
- "SCREEN_HEIGHT = 32\n"
- "\n"
- "game_over = False\n"
- "score = 0\n"
- "\n"
- "class Entity:\n"
- " def __init__(self, x, y, w, h, vx, vy):\n"
- " self.x = x\n"
- " self.y = y\n"
- " self.w = w\n"
- " self.h = h\n"
- " self.vx = vx\n"
- " self.vy = vy\n"
- "\n"
- " def draw(self, fbuf):\n"
- " fbuf.fill_rect(int(self.x), int(self.y), self.w, self.h, 1)\n"
- "\n"
- "class Ball(Entity):\n"
- " def update(self, dt, player):\n"
- " self.x += self.vx * dt\n"
- " if (self.x <= 0):\n"
- " self.x = 0\n"
- " self.vx = -self.vx\n"
- " if (self.x >= SCREEN_WIDTH - self.w):\n"
- " self.x = SCREEN_WIDTH - self.w\n"
- " self.vx = -self.vx\n"
- " self.y += self.vy * dt\n"
- " if (self.y <= 0):\n"
- " self.y = 0\n"
- " self.vy = -self.vy\n"
- " if (self.y >= SCREEN_HEIGHT - self.h - player.h):\n"
- " if (self.x >= player.x and self.x <= player.x + "
- "player.w):\n"
- " self.y = SCREEN_HEIGHT - self.h - player.h\n"
- " self.vy = -self.vy\n"
- " global score\n"
- " score += 1\n"
- " if score % 2 == 0:\n"
- " self.vx += (self.vx/abs(self.vx)) * 1\n"
- " if score % 3 == 0:\n"
- " self.vy += (self.vy/abs(self.vy)) * 1\n"
- " else:\n"
- " global game_over\n"
- " game_over = True\n"
- "\n"
- "class Player(Entity):\n"
- " pass\n"
- "\n"
- "ball = Ball(32, 16, 1, 1, 2, -2)\n"
- "player = Player(30, 31, 10, 1, 0, 0)\n"
- "\n"
- "y4 = machine.Pin('Y4')\n"
- "adc = pyb.ADC(y4)\n"
- "i2c = machine.I2C('X')\n"
- "fbuf = framebuf.FrameBuffer(bytearray(64 * 32 // 8), 64, 32, "
- "framebuf.MONO_HLSB)\n"
- "tick = time.ticks_ms()\n"
- "\n"
- "while not game_over:\n"
- " ntick = time.ticks_ms()\n"
- " ball.update(time.ticks_diff(ntick, tick) // 100, player)\n"
- " tick = ntick\n"
- " player.x = adc.read() * 58 / 255\n"
- " fbuf.fill(0)\n"
- " ball.draw(fbuf)\n"
- " player.draw(fbuf)\n"
- " i2c.writeto(8, fbuf)\n"
- " time.sleep_ms(50) # Adjust this for performance boosts\n"
- "\n"
- "fbuf.fill(0)\n"
- "fbuf.text('GAME', 15, 8)\n"
- "fbuf.text('OVER', 15, 18)\n"
- "i2c.writeto(8, fbuf)\n"
- "\n"
- "print('Score: ', score)\n";
- printf("%s\r\n", lines);
- char* pikaAsm = Parser_linesToAsm(buffs, lines);
- printf("%s", pikaAsm);
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- #if PIKA_SYNTAX_SLICE_ENABLE
- TEST(parser, slice_12lkj) {
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- char* lines = "a = b[:6]\n";
- printf("%s", lines);
- char* pikaAsm = Parser_linesToAsm(buffs, lines);
- printf("%s", pikaAsm);
- EXPECT_STREQ(pikaAsm,
- "B0\n"
- "1 REF b\n"
- "1 NUM 0\n"
- "1 NUM 6\n"
- "0 SLC \n"
- "0 OUT a\n"
- "B0\n");
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- TEST(parser, slice_oifjlk) {
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- char* lines = "a = b[6:]\n";
- printf("%s", lines);
- char* pikaAsm = Parser_linesToAsm(buffs, lines);
- printf("%s", pikaAsm);
- EXPECT_STREQ(pikaAsm,
- "B0\n"
- "1 REF b\n"
- "1 NUM 6\n"
- "2 NUM 99999\n"
- "1 OPT -\n"
- "0 SLC \n"
- "0 OUT a\n"
- "B0\n");
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- #endif
- TEST(parser, str_string) {
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- char* lines = "a = str(String('test'))\n";
- printf("%s", lines);
- char* pikaAsm = Parser_linesToAsm(buffs, lines);
- printf("%s", pikaAsm);
- EXPECT_STREQ(pikaAsm,
- "B0\n"
- "2 STR test\n"
- "1 RUN String\n"
- "0 RUN str\n"
- "0 OUT a\n"
- "B0\n");
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- TEST(parser, json_literal) {
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- char* lines =
- "a = '"
- "{"
- "\"name\": \"mculover666\","
- "\"age\": 22,"
- "\"weight\": 55.5,"
- "\"address\":"
- "{"
- " \"country\": \"China\","
- " \"zip-code\": 111111"
- "},"
- "\"skill\": [\"c\", \"Java\", \"Python\"],"
- "\"student\": false"
- "}'";
- printf("%s\r\n", lines);
- char* tokens_print =
- Lexer_printTokenStream(buffs, Lexer_getTokenStream(buffs, lines));
- printf("%s\r\n", tokens_print);
- EXPECT_STREQ(tokens_print,
- "{sym}a{opt}={lit}'{\"name\": \"mculover666\",\"age\": "
- "22,\"weight\": 55.5,\"address\":{ \"country\": \"China\", "
- " \"zip-code\": 111111},\"skill\": [\"c\", \"Java\", "
- "\"Python\"],\"student\": false}'");
- char* pikaAsm = Parser_linesToAsm(buffs, lines);
- printf("%s", pikaAsm);
- EXPECT_STREQ(
- pikaAsm,
- "B0\n"
- "0 STR {\"name\": \"mculover666\",\"age\": 22,\"weight\": "
- "55.5,\"address\":{ \"country\": \"China\", \"zip-code\": "
- "111111},\"skill\": [\"c\", \"Java\", \"Python\"],\"student\": false}\n"
- "0 OUT a\n"
- "B0\n");
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- TEST(parser, issuekd) {
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- char* lines =
- "recv_buf = PikaStdData.List()\n"
- "RECV_MAX_SIZE=128\n"
- "iteri = 0\n"
- "for i in range(0, int(RECV_MAX_SIZE)):\n"
- " recv_buf.append(0)\n"
- " iteri += 1\n"
- "\n";
- printf("%s", lines);
- char* pikaAsm = Parser_linesToAsm(buffs, lines);
- printf("%s", pikaAsm);
- EXPECT_STREQ(pikaAsm,
- "B0\n"
- "0 RUN PikaStdData.List\n"
- "0 OUT recv_buf\n"
- "B0\n"
- "0 NUM 128\n"
- "0 OUT RECV_MAX_SIZE\n"
- "B0\n"
- "0 NUM 0\n"
- "0 OUT iteri\n"
- "B0\n"
- "2 NUM 0\n"
- "3 REF RECV_MAX_SIZE\n"
- "2 RUN int\n"
- "1 RUN range\n"
- "0 RUN iter\n"
- "0 OUT $l0\n"
- "B0\n"
- "0 RUN $l0.__next__\n"
- "0 OUT i\n"
- "0 EST i\n"
- "0 JEZ 2\n"
- "B1\n"
- "1 NUM 0\n"
- "0 RUN recv_buf.append\n"
- "B1\n"
- "1 REF iteri\n"
- "2 NUM 1\n"
- "1 RUN \n"
- "0 OPT +\n"
- "0 OUT iteri\n"
- "B0\n"
- "0 JMP -1\n"
- "B0\n"
- "0 DEL $l0\n"
- "B0\n");
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- TEST(parser, cjson_test4) {
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- Arg* lines_buff = arg_loadFile(NULL, "../../examples/cJSON/test4.py");
- char* lines = (char*)arg_getBytes(lines_buff);
- printf("%s", lines);
- char* pikaAsm = Parser_linesToAsm(buffs, lines);
- printf("%s", pikaAsm);
- EXPECT_STREQ(pikaAsm,
- "B0\n0 IMP pika_cjson\nB0\n0 STR "
- "{\"data\":{\"requestSocialInsuranceFromYangCheng\":\"\","
- "\"authenticationComparison\":\"no\",\"startupLogo\":\"4\","
- "\"cardType\":\"00,01,02,03,04\",\"synfromhis\":\"no\","
- "\"alarmThresholdValue\":\"37.2\",\"hospitalName\":\"jell\","
- "\"facediscernMode\":\"01\",\"hospitalCode\":\"102\"},"
- "\"success\":true,\"resultCode\":\"0000\",\"time\":\"2022-05-"
- "20 14:10:27\",\"message\":\"ok\"}\n0 OUT data1\nB0\n1 REF "
- "data1\n0 RUN pika_cjson.Parse\n0 OUT a\nB0\n0 RUN a.print\n"
- "B0\n");
- args_deinit(buffs);
- arg_deinit(lines_buff);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- TEST(parser, connection) {
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- char* lines =
- "print('\\\n"
- "test')\n";
- printf("%s", lines);
- char* pikaAsm = Parser_linesToAsm(buffs, lines);
- printf("%s", pikaAsm);
- EXPECT_STREQ(pikaAsm,
- "B0\n"
- "1 STR test\n"
- "0 RUN print\n"
- "B0\n");
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- TEST(parser, connection2) {
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- char* lines =
- "a = \\\n"
- "3\n"
- "print\\\n"
- "(a)\n";
- printf("%s", lines);
- char* pikaAsm = Parser_linesToAsm(buffs, lines);
- printf("%s", pikaAsm);
- EXPECT_STREQ(pikaAsm,
- "B0\n"
- "0 NUM 3\n"
- "0 OUT a\n"
- "B0\n"
- "1 REF a\n"
- "0 RUN print\n"
- "B0\n");
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- #if PIKA_SYNTAX_FORMAT_ENABLE
- TEST(parser, format1) {
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- char* lines = "s = 'res:%d' % 23";
- printf("%s", lines);
- char* pikaAsm = Parser_linesToAsm(buffs, lines);
- printf("%s", pikaAsm);
- EXPECT_STREQ(pikaAsm,
- "B0\n"
- "1 STR res:%d\n"
- "1 NUM 23\n"
- "0 RUN cformat\n"
- "0 OUT s\n"
- "B0\n");
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- #endif
- #if PIKA_SYNTAX_FORMAT_ENABLE
- TEST(parser, format2) {
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- char* lines = "'res:%d:%d' % (23, 25)";
- printf("%s\n", lines);
- char* pikaAsm = Parser_linesToAsm(buffs, lines);
- printf("%s", pikaAsm);
- EXPECT_STREQ(pikaAsm,
- "B0\n"
- "1 STR res:%d:%d\n"
- "1 NUM 23\n"
- "1 NUM 25\n"
- "0 RUN cformat\n"
- "B0\n");
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- #endif
- #if PIKA_SYNTAX_EXCEPTION_ENABLE
- TEST(parser, try1) {
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- char* lines =
- "try:\n"
- " a = 1\n"
- " raise 0x25 + 256\n"
- " raise\n"
- "except:\n"
- " print('in except')\n"
- "\n";
- printf("%s\n", lines);
- char* pikaAsm = Parser_linesToAsm(buffs, lines);
- printf("%s", pikaAsm);
- EXPECT_STREQ(pikaAsm,
- "B0\n"
- "0 TRY \n"
- "B1\n"
- "0 NUM 1\n"
- "0 OUT a\n"
- "B1\n"
- "1 NUM 0x25\n"
- "1 NUM 256\n"
- "0 OPT +\n"
- "0 RIS \n"
- "B1\n"
- "0 REF RuntimeError\n"
- "0 RIS \n"
- "B0\n"
- "0 NTR \n"
- "0 GER \n"
- "0 JEZ 2\n"
- "B0\n"
- "0 EXP \n"
- "B1\n"
- "1 STR in except\n"
- "0 RUN print\n"
- "0 SER 0\n"
- "B0\n");
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- #endif
- TEST(parser, optissue1) {
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- char* lines = "~-1";
- printf("%s\n", lines);
- char* pikaAsm = Parser_linesToAsm(buffs, lines);
- printf("%s", pikaAsm);
- EXPECT_STREQ(pikaAsm,
- "B0\n"
- "2 NUM 1\n"
- "1 OPT -\n"
- "0 OPT ~\n"
- "B0\n");
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- TEST(parser, optissue2) {
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- char* lines = "test(not get())";
- printf("%s\n", lines);
- char* pikaAsm = Parser_linesToAsm(buffs, lines);
- printf("%s", pikaAsm);
- EXPECT_STREQ(pikaAsm,
- "B0\n"
- "2 RUN get\n"
- "1 OPT not \n"
- "0 RUN test\n"
- "B0\n");
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- TEST(lexser, import_issue1) {
- /* init */
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- /* run */
- char* tokens = Lexer_getTokenStream(buffs, "my_import = import_test");
- char* printTokenStream = Lexer_printTokenStream(buffs, tokens);
- printf("%s\n", printTokenStream);
- /* assert */
- EXPECT_STREQ(printTokenStream, "{sym}my_import{opt}={sym}import_test");
- /* deinit */
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- TEST(lexser, dict_literal1) {
- /* init */
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- /* run */
- char* tokens = Lexer_getTokenStream(
- buffs,
- "tinydict = {'name': 'runoob', 'likes': 123, 'url': 'www.runoob.com'}");
- char* printTokenStream = Lexer_printTokenStream(buffs, tokens);
- printf("%s\n", printTokenStream);
- /* assert */
- EXPECT_STREQ(printTokenStream,
- "{sym}tinydict{opt}={dvd}{{lit}'name'{dvd}:{lit}'runoob'{dvd},"
- "{lit}'likes'{dvd}:{lit}123{dvd},{lit}'url'{dvd}:{lit}'www."
- "runoob.com'{dvd}}");
- /* deinit */
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- #if PIKA_BUILTIN_STRUCT_ENABLE
- TEST(parser, dict_literal1) {
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- char* lines =
- "tinydict = {'name': 'runoob', 'likes': 123, 'url': "
- "'www.runoob.com'}";
- printf("%s\n", lines);
- char* pikaAsm = Parser_linesToAsm(buffs, lines);
- printf("%s", pikaAsm);
- EXPECT_STREQ(pikaAsm,
- "B0\n"
- "1 STR name\n"
- "1 STR runoob\n"
- "1 STR likes\n"
- "1 NUM 123\n"
- "1 STR url\n"
- "1 STR www.runoob.com\n"
- "0 DCT \n"
- "0 OUT tinydict\n"
- "B0\n");
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- #endif
- TEST(parser, common_issue1) {
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- char* lines =
- "class ConfigParser():\n"
- " def options(self):\n"
- " # print(type(self.content)\n"
- " # print(self.content.split('['))\n"
- " print('test')\n"
- "\n";
- printf("%s\n", lines);
- char* pikaAsm = Parser_linesToAsm(buffs, lines);
- printf("%s", pikaAsm);
- EXPECT_STREQ(pikaAsm,
- "B0\n"
- "0 CLS ConfigParser()\n"
- "0 JMP 1\n"
- "B1\n"
- "0 RUN TinyObj\n"
- "0 OUT self\n"
- "B1\n"
- "0 RAS self\n"
- "B1\n"
- "0 DEF options(self)\n"
- "0 JMP 1\n"
- "B2\n"
- "1 STR test\n"
- "0 RUN print\n"
- "B2\n"
- "0 RET \n"
- "B1\n"
- "0 RAS $origin\n"
- "B1\n"
- "0 NEW self\n"
- "0 RET \n"
- "B0\n");
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- TEST(parser, def_issue1) {
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- char* lines =
- "def options(self):\n"
- " ...\n"
- "\n";
- printf("%s\n", lines);
- char* pikaAsm = Parser_linesToAsm(buffs, lines);
- printf("%s", pikaAsm);
- EXPECT_STREQ(pikaAsm,
- "B0\n"
- "0 DEF options(self)\n"
- "0 JMP 1\n"
- "B1\n"
- "B1\n"
- "0 RET \n"
- "B0\n");
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- TEST(parser, configparser) {
- Args buffs = {0};
- Parser_fileToAsm(&buffs, "package/pikascript/configparser.py");
- strsDeinit(&buffs);
- }
- TEST(parser, unittest) {
- Args buffs = {0};
- char* ASM = Parser_fileToAsm(&buffs, "package/pikascript/unittest.py");
- printf("%s\r\n", ASM);
- strsDeinit(&buffs);
- }
- TEST(lexser, function_chain) {
- /* init */
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- /* run */
- char* tokens = Lexer_getTokenStream(buffs, "String('a,b,c').split(',')");
- char* printTokenStream = Lexer_printTokenStream(buffs, tokens);
- printf("%s\n", printTokenStream);
- /* assert */
- EXPECT_STREQ(
- printTokenStream,
- "{sym}String{dvd}({lit}'a,b,c'{dvd}){sym}.split{dvd}({lit}','{dvd})");
- /* deinit */
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- TEST(parser, function_chain) {
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- char* lines = "a = String('a,b,c').split(',')\n";
- __platform_printf("%s\n", lines);
- char* pikaAsm = Parser_linesToAsm(buffs, lines);
- __platform_printf("%s", pikaAsm);
- EXPECT_STREQ(pikaAsm,
- "B0\n"
- "2 STR a,b,c\n"
- "1 RUN String\n"
- "1 STR ,\n"
- "0 RUN .split\n"
- "0 OUT a\n"
- "B0\n");
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- TEST(parser, str_issue1) {
- char* lines =
- "if str(type(data)) == \"<class 'str'>\" and str(type(included_data)) "
- "== \"<class 'str'>\":\n"
- "\n";
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- __platform_printf("%s\n", lines);
- char* pikaAsm = Parser_linesToAsm(buffs, lines);
- __platform_printf("%s", pikaAsm);
- EXPECT_STREQ(pikaAsm,
- "B0\n"
- "4 REF data\n"
- "3 RUN type\n"
- "2 RUN str\n"
- "2 STR <class 'str'>\n"
- "1 OPT ==\n"
- "4 REF included_data\n"
- "3 RUN type\n"
- "2 RUN str\n"
- "2 STR <class 'str'>\n"
- "1 OPT ==\n"
- "0 OPT and \n"
- "0 JEZ 1\n"
- "B0\n");
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- #if PIKA_SYNTAX_FORMAT_ENABLE
- TEST(parser, str_issue2) {
- char* lines = "print('ret = %s' % str(ret))\n";
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- __platform_printf("%s\n", lines);
- char* pikaAsm = Parser_linesToAsm(buffs, lines);
- __platform_printf("%s", pikaAsm);
- EXPECT_STREQ(pikaAsm,
- "B0\n"
- "2 STR ret = %s\n"
- "3 REF ret\n"
- "2 RUN str\n"
- "1 RUN cformat\n"
- "0 RUN print\n"
- "B0\n");
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- #endif
- TEST(parser, num_issue) {
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- char* lines = "(((1 + (2 * 3)/(4 + 5))*(6 - 7) + (8 + 9) * 10)/11) - 12\n";
- __platform_printf("%s\n", lines);
- char* pikaAsm = Parser_linesToAsm(buffs, lines);
- __platform_printf("%s", pikaAsm);
- EXPECT_STREQ(pikaAsm,
- "B0\n"
- "8 NUM 1\n"
- "11 NUM 2\n"
- "11 NUM 3\n"
- "10 OPT *\n"
- "9 RUN \n"
- "11 NUM 4\n"
- "11 NUM 5\n"
- "10 OPT +\n"
- "9 RUN \n"
- "8 OPT /\n"
- "7 OPT +\n"
- "6 RUN \n"
- "8 NUM 6\n"
- "8 NUM 7\n"
- "7 OPT -\n"
- "6 RUN \n"
- "5 OPT *\n"
- "8 NUM 8\n"
- "8 NUM 9\n"
- "7 OPT +\n"
- "6 RUN \n"
- "6 NUM 10\n"
- "5 OPT *\n"
- "4 OPT +\n"
- "3 RUN \n"
- "3 NUM 11\n"
- "2 OPT /\n"
- "1 RUN \n"
- "1 NUM 12\n"
- "0 OPT -\n"
- "B0\n");
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- #if PIKA_SYNTAX_SLICE_ENABLE
- TEST(parser, branket_issue2) {
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- char* lines = "temp = hex(int('12'))[0:2]\n";
- __platform_printf("%s\n", lines);
- char* pikaAsm = Parser_linesToAsm(buffs, lines);
- EXPECT_STREQ(pikaAsm,
- "B0\n"
- "3 STR 12\n"
- "2 RUN int\n"
- "1 RUN hex\n"
- "1 NUM 0\n"
- "1 NUM 2\n"
- "0 SLC \n"
- "0 OUT temp\n"
- "B0\n");
- __platform_printf("%s", pikaAsm);
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- #endif
- #if PIKA_SYNTAX_SLICE_ENABLE
- TEST(parser, branket_issue3) {
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- char* lines = "a = b[x][y]\n";
- __platform_printf("%s\n", lines);
- char* pikaAsm = Parser_linesToAsm(buffs, lines);
- __platform_printf("%s", pikaAsm);
- EXPECT_STREQ(pikaAsm,
- "B0\n"
- "2 REF b\n"
- "2 REF x\n"
- "1 SLC \n"
- "1 REF y\n"
- "0 SLC \n"
- "0 OUT a\n"
- "B0\n");
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- #endif
- #if PIKA_SYNTAX_SLICE_ENABLE
- TEST(parser, branket_issue4) {
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- char* lines = "a = b[c[y]]\n";
- __platform_printf("%s\n", lines);
- char* pikaAsm = Parser_linesToAsm(buffs, lines);
- __platform_printf("%s", pikaAsm);
- EXPECT_STREQ(pikaAsm,
- "B0\n"
- "1 REF b\n"
- "2 REF c\n"
- "2 REF y\n"
- "1 SLC \n"
- "0 SLC \n"
- "0 OUT a\n"
- "B0\n");
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- #endif
- TEST(parser, tuple1) {
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- char* lines = "(a,b)\n";
- __platform_printf("%s\n", lines);
- char* pikaAsm = Parser_linesToAsm(buffs, lines);
- __platform_printf("%s", pikaAsm);
- EXPECT_STREQ(pikaAsm,
- "B0\n"
- "1 REF a\n"
- "1 REF b\n"
- "0 RUN \n"
- "B0\n");
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- TEST(parser, _del) {
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- char* lines = "del a\n";
- __platform_printf("%s\n", lines);
- char* pikaAsm = Parser_linesToAsm(buffs, lines);
- __platform_printf("%s", pikaAsm);
- EXPECT_STREQ(pikaAsm,
- "B0\n"
- "0 DEL a\n"
- "B0\n");
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- TEST(parser, _del_issue1) {
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- char* lines = "del(a)\n";
- __platform_printf("%s\n", lines);
- char* pikaAsm = Parser_linesToAsm(buffs, lines);
- __platform_printf("%s", pikaAsm);
- EXPECT_STREQ(pikaAsm,
- "B0\n"
- "0 DEL a\n"
- "B0\n");
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- #if PIKA_SYNTAX_SLICE_ENABLE
- TEST(parser, issue_fa13f4) {
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- char* lines = "d['language'].append('Java')\n";
- __platform_printf("%s\n", lines);
- char* pikaAsm = Parser_linesToAsm(buffs, lines);
- __platform_printf("%s", pikaAsm);
- EXPECT_STREQ(pikaAsm,
- "B0\n"
- "2 REF d\n"
- "2 STR language\n"
- "1 SLC \n"
- "1 STR Java\n"
- "0 RUN .append\n"
- "B0\n");
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- #endif
- TEST(parser, _is) {
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- char* lines = "a is b\n";
- __platform_printf("%s\n", lines);
- char* pikaAsm = Parser_linesToAsm(buffs, lines);
- __platform_printf("%s", pikaAsm);
- EXPECT_STREQ(pikaAsm,
- "B0\n"
- "1 REF a\n"
- "1 REF b\n"
- "0 OPT is \n"
- "B0\n");
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- TEST(parser, _in) {
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- char* lines = "a in b\n";
- __platform_printf("%s\n", lines);
- char* pikaAsm = Parser_linesToAsm(buffs, lines);
- __platform_printf("%s", pikaAsm);
- EXPECT_STREQ(pikaAsm,
- "B0\n"
- "1 REF a\n"
- "1 REF b\n"
- "0 OPT in \n"
- "B0\n");
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- TEST(parser, _in2) {
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- char* lines =
- "res1 = 'a' in 'aaa'\n"
- "res2 = 'aaa' in 'a'\n";
- __platform_printf("%s\n", lines);
- char* pikaAsm = Parser_linesToAsm(buffs, lines);
- __platform_printf("%s", pikaAsm);
- EXPECT_STREQ(pikaAsm,
- "B0\n"
- "1 STR a\n"
- "1 STR aaa\n"
- "0 OPT in \n"
- "0 OUT res1\n"
- "B0\n"
- "1 STR aaa\n"
- "1 STR a\n"
- "0 OPT in \n"
- "0 OUT res2\n"
- "B0\n");
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- #if PIKA_SYNTAX_EXCEPTION_ENABLE
- TEST(parser, assert_) {
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- char* lines =
- "assert True\n"
- "assert 1 == 1, 'testparser'\n";
- __platform_printf("%s\n", lines);
- char* pikaAsm = Parser_linesToAsm(buffs, lines);
- __platform_printf("%s", pikaAsm);
- EXPECT_STREQ(pikaAsm,
- "B0\n"
- "1 REF True\n"
- "0 ASS \n"
- "B0\n"
- "2 NUM 1\n"
- "2 NUM 1\n"
- "1 OPT ==\n"
- "1 STR testparser\n"
- "0 ASS \n"
- "B0\n");
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- #endif
- #if PIKA_SYNTAX_EXCEPTION_ENABLE
- TEST(parser, except_for) {
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- char* lines =
- "for i in range(0, 10):\n"
- " try:\n"
- " a\n"
- " except:\n"
- " b";
- __platform_printf("%s\n", lines);
- char* pikaAsm = Parser_linesToAsm(buffs, lines);
- __platform_printf("%s", pikaAsm);
- EXPECT_STREQ(pikaAsm,
- "B0\n"
- "2 NUM 0\n"
- "2 NUM 10\n"
- "1 RUN range\n"
- "0 RUN iter\n"
- "0 OUT $l0\n"
- "B0\n"
- "0 RUN $l0.__next__\n"
- "0 OUT i\n"
- "0 EST i\n"
- "0 JEZ 2\n"
- "B1\n"
- "0 TRY \n"
- "B2\n"
- "0 REF a\n"
- "B1\n"
- "0 NTR \n"
- "0 GER \n"
- "0 JEZ 2\n"
- "B1\n"
- "0 EXP \n"
- "B2\n"
- "0 REF b\n"
- "0 SER 0\n"
- "B0\n"
- "0 JMP -1\n"
- "B0\n"
- "0 DEL $l0\n"
- "B0\n");
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- #endif
- TEST(parser, line_void_issue$l1k2i) {
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- char* lines = "mem = PikaStdLib.MemChecker()";
- __platform_printf("%s\n", lines);
- char* pikaAsm = Parser_linesToAsm(buffs, lines);
- __platform_printf("%s", pikaAsm);
- EXPECT_STREQ(pikaAsm,
- "B0\n"
- "0 RUN PikaStdLib.MemChecker\n"
- "0 OUT mem\n"
- "B0\n");
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- TEST(parser, while_void_novoid) {
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- char* lines = "while True:\n";
- __platform_printf("%s\n", lines);
- char* pikaAsm = Parser_linesToAsm(buffs, lines);
- __platform_printf("%s", pikaAsm);
- EXPECT_STREQ(pikaAsm,
- "B0\n"
- "0 REF True\n"
- "0 JEZ 2\n"
- "B0\n"
- "0 JMP -1\n"
- "B0\n");
- {
- char* lines = "while True:";
- __platform_printf("%s\n", lines);
- char* pikaAsm = Parser_linesToAsm(buffs, lines);
- __platform_printf("%s", pikaAsm);
- EXPECT_STREQ(pikaAsm,
- "B0\n"
- "0 REF True\n"
- "0 JEZ 2\n"
- "B0\n"
- "0 JMP -1\n"
- "B0\n");
- }
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- TEST(parser, connect_auto) {
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- char* lines =
- "method(a,\n"
- " b)";
- __platform_printf("%s\n", lines);
- char* pikaAsm = Parser_linesToAsm(buffs, lines);
- __platform_printf("%s", pikaAsm);
- EXPECT_STREQ(pikaAsm,
- "B0\n"
- "1 REF a\n"
- "1 REF b\n"
- "0 RUN method\n"
- "B0\n");
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- TEST(lexser, connet_part1) {
- /* init */
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- /* run */
- char* tokens = Lexer_getTokenStream(buffs, "method(a,");
- char* printTokenStream = Lexer_printTokenStream(buffs, tokens);
- printf("%s\n", printTokenStream);
- /* assert */
- EXPECT_STREQ(printTokenStream, "{sym}method{dvd}({sym}a{dvd},");
- /* deinit */
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- TEST(parser, vars_runtime) {
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- char* lines =
- "def testvars(a, *b):\n"
- " sum = 0\n"
- " for i in b:\n"
- " sum += i\n"
- " return a * sum";
- __platform_printf("%s\n", lines);
- char* pikaAsm = Parser_linesToAsm(buffs, lines);
- __platform_printf("%s", pikaAsm);
- EXPECT_STREQ(pikaAsm,
- "B0\n"
- "0 DEF testvars(a,*b)\n"
- "0 JMP 1\n"
- "B1\n"
- "0 NUM 0\n"
- "0 OUT sum\n"
- "B1\n"
- "1 REF b\n"
- "0 RUN iter\n"
- "0 OUT $l1\n"
- "B1\n"
- "0 RUN $l1.__next__\n"
- "0 OUT i\n"
- "0 EST i\n"
- "0 JEZ 2\n"
- "B2\n"
- "1 REF sum\n"
- "2 REF i\n"
- "1 RUN \n"
- "0 OPT +\n"
- "0 OUT sum\n"
- "B1\n"
- "0 JMP -1\n"
- "B1\n"
- "0 DEL $l1\n"
- "B1\n"
- "1 REF a\n"
- "1 REF sum\n"
- "0 OPT *\n"
- "0 RET \n"
- "B1\n"
- "0 RET \n"
- "B0\n");
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- #if PIKA_BUILTIN_STRUCT_ENABLE
- TEST(parser, issues_I5MIFO) {
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- char* lines = "[1, 2, 3] + [4, 5, 6]";
- __platform_printf("%s\n", lines);
- char* pikaAsm = Parser_linesToAsm(buffs, lines);
- __platform_printf("%s", pikaAsm);
- EXPECT_STREQ(pikaAsm,
- "B0\n"
- "2 NUM 1\n"
- "2 NUM 2\n"
- "2 NUM 3\n"
- "1 LST \n"
- "2 NUM 4\n"
- "2 NUM 5\n"
- "2 NUM 6\n"
- "1 LST \n"
- "0 OPT +\n"
- "B0\n");
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- #endif
- TEST(lexser, science_num) {
- /* init */
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- /* run */
- char* tokens =
- Lexer_getTokenStream(buffs, "1.0e-2, 10e2, 0.1e-2, aie2, aie-2");
- char* printTokenStream = Lexer_printTokenStream(buffs, tokens);
- printf("%s\n", printTokenStream);
- /* assert */
- EXPECT_STREQ(printTokenStream,
- "{lit}1.0e-2{dvd},{lit}10e2{dvd},{lit}0.1e-2{dvd},{sym}aie2{"
- "dvd},{sym}aie{opt}-{lit}2");
- /* deinit */
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- TEST(lexser, issues_I5OJQB) {
- /* init */
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- /* run */
- char* tokens = Lexer_getTokenStream(buffs, "s = '\\\\'");
- char* printTokenStream = Lexer_printTokenStream(buffs, tokens);
- printf("%s\n", printTokenStream);
- /* assert */
- EXPECT_STREQ(printTokenStream, "{sym}s{opt}={lit}'\\\\'");
- /* deinit */
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- TEST(parser, issues_I5OJQB) {
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- char* lines = "s = '\\\\'";
- __platform_printf("%s\n", lines);
- char* pikaAsm = Parser_linesToAsm(buffs, lines);
- __platform_printf("%s", pikaAsm);
- EXPECT_STREQ(pikaAsm,
- "B0\n"
- "0 STR \\\\\n"
- "0 OUT s\n"
- "B0\n");
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- TEST(parser, keyword1) {
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- char* lines = "test(a=1, b ='test')";
- __platform_printf("%s\n", lines);
- char* pikaAsm = Parser_linesToAsm(buffs, lines);
- __platform_printf("%s", pikaAsm);
- EXPECT_STREQ(pikaAsm,
- "B0\n"
- "1 NUM 1\n"
- "1 OUT a\n"
- "1 STR test\n"
- "1 OUT b\n"
- "0 RUN test\n"
- "B0\n");
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- TEST(parser, keyword_class) {
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- char* lines = "t = Test(0, b = 3)\n";
- __platform_printf("%s\n", lines);
- char* pikaAsm = Parser_linesToAsm(buffs, lines);
- __platform_printf("%s", pikaAsm);
- EXPECT_STREQ(pikaAsm,
- "B0\n"
- "1 NUM 0\n"
- "1 NUM 3\n"
- "1 OUT b\n"
- "0 RUN Test\n"
- "0 OUT t\n"
- "B0\n");
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- TEST(parser, keyword_class_mqtt) {
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- char* lines =
- "class MQTT:\n"
- " def __init__(self,\n"
- " ip: str,\n"
- " port=1883,\n"
- " clinetID='mac',\n"
- " username='',\n"
- " password='',\n"
- " version='3.1.1',\n"
- " ca='',\n"
- " keepalive=60):\n"
- " print('MQTT init')\n"
- " print(port)\n"
- " print('ip:', ip)\n"
- "c = MQTT('test')\n";
- __platform_printf("%s\n", lines);
- char* pikaAsm = Parser_linesToAsm(buffs, lines);
- __platform_printf("%s", pikaAsm);
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- #if !PIKA_NANO_ENABLE
- TEST(parser, except_dict) {
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- char* lines =
- "dict = {'a':1, 'b':2, 'c':3}\n"
- "try: \n"
- " print(dict['a'])\n"
- " print(dict['d'])\n"
- " print(dict['b'])\n"
- "except :\n"
- " print('in except')\n";
- __platform_printf("%s\n", lines);
- char* pikaAsm = Parser_linesToAsm(buffs, lines);
- __platform_printf("%s", pikaAsm);
- EXPECT_STREQ(pikaAsm,
- "B0\n"
- "1 STR a\n"
- "1 NUM 1\n"
- "1 STR b\n"
- "1 NUM 2\n"
- "1 STR c\n"
- "1 NUM 3\n"
- "0 DCT \n"
- "0 OUT dict\n"
- "B0\n"
- "0 TRY \n"
- "B1\n"
- "2 REF dict\n"
- "2 STR a\n"
- "1 SLC \n"
- "0 RUN print\n"
- "B1\n"
- "2 REF dict\n"
- "2 STR d\n"
- "1 SLC \n"
- "0 RUN print\n"
- "B1\n"
- "2 REF dict\n"
- "2 STR b\n"
- "1 SLC \n"
- "0 RUN print\n"
- "B0\n"
- "0 NTR \n"
- "0 GER \n"
- "0 JEZ 2\n"
- "B0\n"
- "0 EXP \n"
- "B1\n"
- "1 STR in except\n"
- "0 RUN print\n"
- "0 SER 0\n"
- "B0\n");
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- #endif
- #if !PIKA_NANO_ENABLE
- TEST(parser, default_fn_1) {
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- char* lines =
- "def test(a=1, b='test'):\n"
- " print(a)";
- __platform_printf("%s\n", lines);
- char* pikaAsm = Parser_linesToAsm(buffs, lines);
- __platform_printf("%s", pikaAsm);
- EXPECT_STREQ(pikaAsm,
- "B0\n"
- "0 DEF test(a=,b=)\n"
- "0 JMP 1\n"
- "B1\n"
- "0 EST a\n"
- "0 JNZ 2\n"
- "B1\n"
- "0 NUM 1\n"
- "0 OUT a\n"
- "B1\n"
- "0 EST b\n"
- "0 JNZ 2\n"
- "B1\n"
- "0 STR test\n"
- "0 OUT b\n"
- "B1\n"
- "1 REF a\n"
- "0 RUN print\n"
- "B1\n"
- "0 RET \n"
- "B0\n");
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- #endif
- #if !PIKA_NANO_ENABLE
- TEST(parser, multi_return) {
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- char* lines = "a , b = c";
- __platform_printf("%s\n", lines);
- char* pikaAsm = Parser_linesToAsm(buffs, lines);
- __platform_printf("%s", pikaAsm);
- EXPECT_STREQ(pikaAsm,
- "B0\n"
- "0 REF c\n"
- "0 OUT $tmp\n"
- "B0\n"
- "1 REF $tmp\n"
- "1 NUM 0\n"
- "0 SLC \n"
- "0 OUT a\n"
- "B0\n"
- "1 REF $tmp\n"
- "1 NUM 1\n"
- "0 SLC \n"
- "0 OUT b\n"
- "B0\n"
- "0 DEL $tmp\n"
- "B0\n");
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- TEST(parser, multi_return_) {
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- char* lines = "test['a , b'] = c";
- __platform_printf("%s\n", lines);
- char* pikaAsm = Parser_linesToAsm(buffs, lines);
- __platform_printf("%s", pikaAsm);
- EXPECT_STREQ(pikaAsm,
- "B0\n"
- "1 REF test\n"
- "1 STR a , b\n"
- "1 REF c\n"
- "0 RUN __setitem__\n"
- "0 OUT test\n"
- "B0\n");
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- TEST(parser, multi_return_2) {
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- char* lines = "'test,q'[0] = c";
- __platform_printf("%s\n", lines);
- char* pikaAsm = Parser_linesToAsm(buffs, lines);
- __platform_printf("%s", pikaAsm);
- EXPECT_STREQ(pikaAsm,
- "B0\n"
- "1 STR test,q\n"
- "1 NUM 0\n"
- "1 REF c\n"
- "0 RUN __setitem__\n"
- "0 OUT 'test,q'\n"
- "B0\n");
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- #endif
- #if !PIKA_NANO_ENABLE
- TEST(parser, multi_return_3) {
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- char* lines = "return a,b";
- __platform_printf("%s\n", lines);
- char* pikaAsm = Parser_linesToAsm(buffs, lines);
- __platform_printf("%s", pikaAsm);
- EXPECT_STREQ(pikaAsm,
- "B0\n"
- "1 REF a\n"
- "1 REF b\n"
- "0 RUN \n"
- "0 RET \n"
- "B0\n");
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- TEST(parser, multi_return_4) {
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- char* lines =
- "for a,b in c:\n"
- " print(a,b)";
- __platform_printf("%s\n", lines);
- char* pikaAsm = Parser_linesToAsm(buffs, lines);
- __platform_printf("%s", pikaAsm);
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- TEST(parser, for_multi) {
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- char* lines =
- "d = {'a':1, 'b':2}\n"
- "for k, v in d.items():\n"
- " print(k, v)\n";
- __platform_printf("%s\n", lines);
- char* pikaAsm = Parser_linesToAsm(buffs, lines);
- __platform_printf("%s", pikaAsm);
- EXPECT_STREQ(pikaAsm,
- "B0\n"
- "1 STR a\n"
- "1 NUM 1\n"
- "1 STR b\n"
- "1 NUM 2\n"
- "0 DCT \n"
- "0 OUT d\n"
- "B0\n"
- "1 RUN d.items\n"
- "0 RUN iter\n"
- "0 OUT $l0\n"
- "B0\n"
- "0 RUN $l0.__next__\n"
- "0 OUT $tmp\n"
- "0 EST $tmp\n"
- "0 JEZ 2\n"
- "B1\n"
- "1 REF $tmp\n"
- "1 NUM 0\n"
- "0 SLC \n"
- "0 OUT k\n"
- "B1\n"
- "1 REF $tmp\n"
- "1 NUM 1\n"
- "0 SLC \n"
- "0 OUT v\n"
- "B1\n"
- "0 DEL $tmp\n"
- "B1\n"
- "1 REF k\n"
- "1 REF v\n"
- "0 RUN print\n"
- "B0\n"
- "0 JMP -1\n"
- "B0\n"
- "0 DEL $l0\n"
- "B0\n"
- );
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- TEST(parser, pass_) {
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- char* lines =
- "pass\n"
- "def testpass():\n"
- " pass\n"
- "for i in range(10):\n"
- " pass\n";
- __platform_printf("%s\n", lines);
- char* pikaAsm = Parser_linesToAsm(buffs, lines);
- __platform_printf("%s", pikaAsm);
- EXPECT_STREQ(pikaAsm,
- "B0\n"
- "B0\n"
- "0 DEF testpass()\n"
- "0 JMP 1\n"
- "B1\n"
- "B1\n"
- "0 RET \n"
- "B0\n"
- "2 NUM 10\n"
- "1 RUN range\n"
- "0 RUN iter\n"
- "0 OUT $l0\n"
- "B0\n"
- "0 RUN $l0.__next__\n"
- "0 OUT i\n"
- "0 EST i\n"
- "0 JEZ 2\n"
- "B1\n"
- "B0\n"
- "0 JMP -1\n"
- "B0\n"
- "0 DEL $l0\n"
- "B0\n");
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- TEST(parser, modbus_1) {
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- char* lines = "dest[i + 1] * 256\n";
- __platform_printf("%s\n", lines);
- char* pikaAsm = Parser_linesToAsm(buffs, lines);
- __platform_printf("%s", pikaAsm);
- EXPECT_STREQ(pikaAsm,
- "B0\n"
- "2 REF dest\n"
- "3 REF i\n"
- "3 NUM 1\n"
- "2 OPT +\n"
- "1 SLC \n"
- "1 NUM 256\n"
- "0 OPT *\n"
- "B0\n");
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- TEST(parser, issue_big_dict) {
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- char* pikaAsm =
- Parser_fileToAsm(buffs, "test/python/issue/issue_big_dict.py");
- __platform_printf("%s", pikaAsm);
- EXPECT_STREQ(pikaAsm,
- "B0\n"
- "3 STR type\n"
- "3 STR div\n"
- "3 STR attributes\n"
- "4 STR class\n"
- "4 STR container\n"
- "4 STR style\n"
- "5 STR width\n"
- "5 NUM 240\n"
- "5 STR height\n"
- "5 NUM 240\n"
- "5 STR margin\n"
- "5 NUM 0\n"
- "5 STR padding\n"
- "5 NUM 0\n"
- "5 STR border-radius\n"
- "5 NUM 0\n"
- "5 STR border-width\n"
- "5 NUM 0\n"
- "5 STR border-color\n"
- "5 STR red\n"
- "5 STR background-color\n"
- "5 NUM 37864\n"
- "4 DCT \n"
- "3 DCT \n"
- "3 STR nodes\n"
- "5 STR type\n"
- "5 STR text\n"
- "5 STR attributes\n"
- "6 STR font-size\n"
- "6 STR 30\n"
- "6 STR class\n"
- "6 STR result-text\n"
- "6 STR style\n"
- "7 STR top\n"
- "7 NUM 5\n"
- "7 STR left\n"
- "7 NUM 5\n"
- "7 STR width\n"
- "7 NUM 220\n"
- "7 STR text-align\n"
- "7 STR right\n"
- "7 STR height\n"
- "7 NUM 30\n"
- "7 STR color\n"
- "7 STR white\n"
- "7 STR text-overflow\n"
- "7 STR longbreak\n"
- "7 STR border-width\n"
- "7 NUM 0\n"
- "7 STR border-color\n"
- "7 STR red\n"
- "7 STR background-color\n"
- "7 STR transparent\n"
- "6 DCT \n"
- "5 DCT \n"
- "5 STR nodes\n"
- "5 LST \n"
- "5 STR bindings\n"
- "7 STR attrName\n"
- "7 STR text\n"
- "7 STR key\n"
- "7 STR result\n"
- "7 STR isText\n"
- "7 REF true\n"
- "6 DCT \n"
- "5 LST \n"
- "5 STR events\n"
- "5 LST \n"
- "5 STR value\n"
- "5 STR 0\n"
- "5 STR widgetName\n"
- "5 STR widget1\n"
- "4 DCT \n"
- "5 STR type\n"
- "5 STR div\n"
- "5 STR attributes\n"
- "6 STR class\n"
- "6 STR key-wrapper\n"
- "6 STR onclick\n"
- "6 STR onclick\n"
- "6 STR style\n"
- "7 STR width\n"
- "7 NUM 60\n"
- "7 STR height\n"
- "7 NUM 50\n"
- "7 STR border-width\n"
- "7 NUM 0\n"
- "7 STR border-color\n"
- "7 STR red\n"
- "7 STR background-color\n"
- "7 STR transparent\n"
- "7 STR top\n"
- "7 NUM 40\n"
- "7 STR left\n"
- "7 NUM 10\n"
- "6 DCT \n"
- "5 DCT \n"
- "5 STR nodes\n"
- "7 STR type\n"
- "7 STR text\n"
- "7 STR attributes\n"
- "8 STR font-size\n"
- "8 STR 30\n"
- "8 STR class\n"
- "8 STR key\n"
- "8 STR style\n"
- "9 STR left\n"
- "9 NUM 0\n"
- "9 STR top\n"
- "9 NUM 0\n"
- "9 STR width\n"
- "9 NUM 50\n"
- "9 STR height\n"
- "9 NUM 40\n"
- "9 STR margin\n"
- "9 NUM 0\n"
- "9 STR padding\n"
- "9 NUM 0\n"
- "9 STR color\n"
- "9 STR white\n"
- "9 STR font-size\n"
- "9 NUM 30\n"
- "9 STR text-align\n"
- "9 STR center\n"
- "9 STR background-color\n"
- "9 STR transparent\n"
- "8 DCT \n"
- "7 DCT \n"
- "7 STR nodes\n"
- "7 LST \n"
- "7 STR bindings\n"
- "7 LST \n"
- "7 STR events\n"
- "7 LST \n"
- "7 STR value\n"
- "7 STR 1\n"
- "7 STR widgetName\n"
- "7 STR widget3\n"
- "6 DCT \n"
- "5 LST \n"
- "5 STR bindings\n"
- "5 LST \n"
- "5 STR events\n"
- "7 STR onclick\n"
- "7 STR onclick\n"
- "6 DCT \n"
- "5 LST \n"
- "5 STR widgetName\n"
- "5 STR widget2\n"
- "4 DCT \n"
- "5 STR type\n"
- "5 STR div\n"
- "5 STR attributes\n"
- "6 STR class\n"
- "6 STR key-wrapper\n"
- "6 STR onclick\n"
- "6 STR onclick\n"
- "6 STR style\n"
- "7 STR width\n"
- "7 NUM 60\n"
- "7 STR height\n"
- "7 NUM 50\n"
- "7 STR border-width\n"
- "7 NUM 0\n"
- "7 STR border-color\n"
- "7 STR red\n"
- "7 STR background-color\n"
- "7 STR transparent\n"
- "7 STR top\n"
- "7 NUM 40\n"
- "7 STR left\n"
- "7 NUM 60\n"
- "6 DCT \n"
- "5 DCT \n"
- "5 STR nodes\n"
- "7 STR type\n"
- "7 STR text\n"
- "7 STR attributes\n"
- "8 STR font-size\n"
- "8 STR 30\n"
- "8 STR class\n"
- "8 STR key\n"
- "8 STR style\n"
- "9 STR left\n"
- "9 NUM 0\n"
- "9 STR top\n"
- "9 NUM 0\n"
- "9 STR width\n"
- "9 NUM 50\n"
- "9 STR height\n"
- "9 NUM 40\n"
- "9 STR margin\n"
- "9 NUM 0\n"
- "9 STR padding\n"
- "9 NUM 0\n"
- "9 STR color\n"
- "9 STR white\n"
- "9 STR font-size\n"
- "9 NUM 30\n"
- "9 STR text-align\n"
- "9 STR center\n"
- "9 STR background-color\n"
- "9 STR transparent\n"
- "8 DCT \n"
- "7 DCT \n"
- "7 STR nodes\n"
- "7 LST \n"
- "7 STR bindings\n"
- "7 LST \n"
- "7 STR events\n"
- "7 LST \n"
- "7 STR value\n"
- "7 STR 2\n"
- "7 STR widgetName\n"
- "7 STR widget5\n"
- "6 DCT \n"
- "5 LST \n"
- "5 STR bindings\n"
- "5 LST \n"
- "5 STR events\n"
- "7 STR onclick\n"
- "7 STR onclick\n"
- "6 DCT \n"
- "5 LST \n"
- "5 STR widgetName\n"
- "5 STR widget4\n"
- "4 DCT \n"
- "5 STR type\n"
- "5 STR div\n"
- "5 STR attributes\n"
- "6 STR class\n"
- "6 STR key-wrapper\n"
- "6 STR onclick\n"
- "6 STR onclick\n"
- "6 STR style\n"
- "7 STR width\n"
- "7 NUM 60\n"
- "7 STR height\n"
- "7 NUM 50\n"
- "7 STR border-width\n"
- "7 NUM 0\n"
- "7 STR border-color\n"
- "7 STR red\n"
- "7 STR background-color\n"
- "7 STR transparent\n"
- "7 STR top\n"
- "7 NUM 40\n"
- "7 STR left\n"
- "7 NUM 110\n"
- "6 DCT \n"
- "5 DCT \n"
- "5 STR nodes\n"
- "7 STR type\n"
- "7 STR text\n"
- "7 STR attributes\n"
- "8 STR font-size\n"
- "8 STR 30\n"
- "8 STR class\n"
- "8 STR key\n"
- "8 STR style\n"
- "9 STR left\n"
- "9 NUM 0\n"
- "9 STR top\n"
- "9 NUM 0\n"
- "9 STR width\n"
- "9 NUM 50\n"
- "9 STR height\n"
- "9 NUM 40\n"
- "9 STR margin\n"
- "9 NUM 0\n"
- "9 STR padding\n"
- "9 NUM 0\n"
- "9 STR color\n"
- "9 STR white\n"
- "9 STR font-size\n"
- "9 NUM 30\n"
- "9 STR text-align\n"
- "9 STR center\n"
- "9 STR background-color\n"
- "9 STR transparent\n"
- "8 DCT \n"
- "7 DCT \n"
- "7 STR nodes\n"
- "7 LST \n"
- "7 STR bindings\n"
- "7 LST \n"
- "7 STR events\n"
- "7 LST \n"
- "7 STR value\n"
- "7 STR 3\n"
- "7 STR widgetName\n"
- "7 STR widget7\n"
- "6 DCT \n"
- "5 LST \n"
- "5 STR bindings\n"
- "5 LST \n"
- "5 STR events\n"
- "7 STR onclick\n"
- "7 STR onclick\n"
- "6 DCT \n"
- "5 LST \n"
- "5 STR widgetName\n"
- "5 STR widget6\n"
- "4 DCT \n"
- "5 STR type\n"
- "5 STR div\n"
- "5 STR attributes\n"
- "6 STR class\n"
- "6 STR key-wrapper\n"
- "6 STR onclick\n"
- "6 STR onclick\n"
- "6 STR style\n"
- "7 STR width\n"
- "7 NUM 60\n"
- "7 STR height\n"
- "7 NUM 50\n"
- "7 STR border-width\n"
- "7 NUM 0\n"
- "7 STR border-color\n"
- "7 STR red\n"
- "7 STR background-color\n"
- "7 STR transparent\n"
- "7 STR top\n"
- "7 NUM 40\n"
- "7 STR left\n"
- "7 NUM 160\n"
- "6 DCT \n"
- "5 DCT \n"
- "5 STR nodes\n"
- "7 STR type\n"
- "7 STR text\n"
- "7 STR attributes\n"
- "8 STR font-size\n"
- "8 STR 30\n"
- "8 STR class\n"
- "8 STR key\n"
- "8 STR style\n"
- "9 STR left\n"
- "9 NUM 0\n"
- "9 STR top\n"
- "9 NUM 0\n"
- "9 STR width\n"
- "9 NUM 50\n"
- "9 STR height\n"
- "9 NUM 40\n"
- "9 STR margin\n"
- "9 NUM 0\n"
- "9 STR padding\n"
- "9 NUM 0\n"
- "9 STR color\n"
- "9 STR white\n"
- "9 STR font-size\n"
- "9 NUM 30\n"
- "9 STR text-align\n"
- "9 STR center\n"
- "9 STR background-color\n"
- "9 STR transparent\n"
- "8 DCT \n"
- "7 DCT \n"
- "7 STR nodes\n"
- "7 LST \n"
- "7 STR bindings\n"
- "7 LST \n"
- "7 STR events\n"
- "7 LST \n"
- "7 STR value\n"
- "7 STR +\n"
- "7 STR widgetName\n"
- "7 STR widget9\n"
- "6 DCT \n"
- "5 LST \n"
- "5 STR bindings\n"
- "5 LST \n"
- "5 STR events\n"
- "7 STR onclick\n"
- "7 STR onclick\n"
- "6 DCT \n"
- "5 LST \n"
- "5 STR widgetName\n"
- "5 STR widget8\n"
- "4 DCT \n"
- "3 LST \n"
- "3 STR bindings\n"
- "3 LST \n"
- "3 STR events\n"
- "3 LST \n"
- "3 STR widgetName\n"
- "3 STR widget0\n"
- "2 DCT \n"
- "1 DCT \n"
- "0 RUN nodes.update\n"
- "B0\n");
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- TEST(parser, issue_dict_update) {
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- char* pikaAsm =
- Parser_fileToAsm(buffs, "test/python/issue/issue_dict_update.py");
- __platform_printf("%s", pikaAsm);
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- TEST(parser, object_test2) {
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- char* lines = (char*)"hello(name = 'world', isShow = isShow)";
- printf("%s", lines);
- char* pikaAsm = Parser_linesToAsm(buffs, lines);
- printf("%s", pikaAsm);
- EXPECT_STREQ(pikaAsm,
- "B0\n"
- "1 STR world\n"
- "1 OUT name\n"
- "1 REF isShow\n"
- "1 OUT isShow\n"
- "0 RUN hello\n"
- "B0\n");
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- TEST(parser, i_pp) {
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- char* lines =
- "i = 0\n"
- "while i < 10000:\n"
- " i += 1\n";
- printf("%s", lines);
- char* pikaAsm = Parser_linesToAsm(buffs, lines);
- printf("%s", pikaAsm);
- EXPECT_STREQ(pikaAsm,
- "B0\n"
- "0 NUM 0\n"
- "0 OUT i\n"
- "B0\n"
- "1 REF i\n"
- "1 NUM 10000\n"
- "0 OPT <\n"
- "0 JEZ 2\n"
- "B1\n"
- "1 REF i\n"
- "2 NUM 1\n"
- "1 RUN \n"
- "0 OPT +\n"
- "0 OUT i\n"
- "B0\n"
- "0 JMP -1\n"
- "B0\n");
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- TEST(parser, multi_num) {
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- char* lines = "a,b ,c = 1, 2, 3\n";
- printf("%s\r\n", lines);
- char* pikaAsm = Parser_linesToAsm(buffs, lines);
- printf("%s", pikaAsm);
- EXPECT_STREQ(pikaAsm,
- "B0\n"
- "1 NUM 1\n"
- "1 NUM 2\n"
- "1 NUM 3\n"
- "0 RUN \n"
- "0 OUT $tmp\n"
- "B0\n"
- "1 REF $tmp\n"
- "1 NUM 0\n"
- "0 SLC \n"
- "0 OUT a\n"
- "B0\n"
- "1 REF $tmp\n"
- "1 NUM 1\n"
- "0 SLC \n"
- "0 OUT b\n"
- "B0\n"
- "1 REF $tmp\n"
- "1 NUM 2\n"
- "0 SLC \n"
- "0 OUT c\n"
- "B0\n"
- "0 DEL $tmp\n"
- "B0\n");
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- TEST(parser, multi_import) {
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- char* lines =
- "import a,b ,c\n"
- "import a,b ,c as d, e ,f\n"
- "from a import b, c, d\n";
- printf("%s\r\n", lines);
- char* pikaAsm = Parser_linesToAsm(buffs, lines);
- printf("%s", pikaAsm);
- EXPECT_STREQ(pikaAsm,
- "B0\n"
- "0 IMP a\n"
- "B0\n"
- "0 IMP b\n"
- "B0\n"
- "0 IMP c\n"
- "B0\n"
- "0 IMP a\n"
- "B0\n"
- "0 IMP b\n"
- "B0\n"
- "0 IMP c\n"
- "B0\n"
- "1 REF a\n"
- "1 REF b\n"
- "1 REF c\n"
- "0 RUN \n"
- "0 OUT $tmp\n"
- "B0\n"
- "1 REF $tmp\n"
- "1 NUM 0\n"
- "0 SLC \n"
- "0 OUT d\n"
- "B0\n"
- "1 REF $tmp\n"
- "1 NUM 1\n"
- "0 SLC \n"
- "0 OUT e\n"
- "B0\n"
- "1 REF $tmp\n"
- "1 NUM 2\n"
- "0 SLC \n"
- "0 OUT f\n"
- "B0\n"
- "0 DEL $tmp\n"
- "B0\n"
- "0 IMP a\n"
- "B0\n"
- "1 REF a.b\n"
- "1 REF a.c\n"
- "1 REF a.d\n"
- "0 RUN \n"
- "0 OUT $tmp\n"
- "B0\n"
- "1 REF $tmp\n"
- "1 NUM 0\n"
- "0 SLC \n"
- "0 OUT b\n"
- "B0\n"
- "1 REF $tmp\n"
- "1 NUM 1\n"
- "0 SLC \n"
- "0 OUT c\n"
- "B0\n"
- "1 REF $tmp\n"
- "1 NUM 2\n"
- "0 SLC \n"
- "0 OUT d\n"
- "B0\n"
- "0 DEL $tmp\n"
- "B0\n");
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- TEST(parser, from_import_as) {
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- char* lines = "from PikaStdData import String as string";
- printf("%s\r\n", lines);
- char* pikaAsm = Parser_linesToAsm(buffs, lines);
- printf("%s", pikaAsm);
- EXPECT_STREQ(pikaAsm,
- "B0\n"
- "0 IMP PikaStdData\n"
- "B0\n"
- "0 REF PikaStdData.String\n"
- "0 OUT string\n"
- "B0\n");
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- TEST(parser, multi_from_import_as) {
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- char* lines = "from a import b, c, d as e, f, g\n";
- printf("%s\r\n", lines);
- char* pikaAsm = Parser_linesToAsm(buffs, lines);
- printf("%s", pikaAsm);
- EXPECT_STREQ(pikaAsm,
- "B0\n"
- "0 IMP a\n"
- "B0\n"
- "1 REF a.b\n"
- "1 REF a.c\n"
- "1 REF a.d\n"
- "0 RUN \n"
- "0 OUT $tmp\n"
- "B0\n"
- "1 REF $tmp\n"
- "1 NUM 0\n"
- "0 SLC \n"
- "0 OUT e\n"
- "B0\n"
- "1 REF $tmp\n"
- "1 NUM 1\n"
- "0 SLC \n"
- "0 OUT f\n"
- "B0\n"
- "1 REF $tmp\n"
- "1 NUM 2\n"
- "0 SLC \n"
- "0 OUT g\n"
- "B0\n"
- "0 DEL $tmp\n"
- "B0\n");
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- TEST(parser, print_ssa) {
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- char* lines = "print(**a)\n";
- printf("%s\r\n", lines);
- char* pikaAsm = Parser_linesToAsm(buffs, lines);
- printf("%s", pikaAsm);
- EXPECT_STREQ(pikaAsm,
- "B0\n"
- "2 REF a\n"
- "1 OPT **\n"
- "0 RUN print\n"
- "B0\n");
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- TEST(parser, not_in) {
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- char* lines = "1 not in a\n";
- printf("%s\r\n", lines);
- char* pikaAsm = Parser_linesToAsm(buffs, lines);
- printf("%s", pikaAsm);
- EXPECT_STREQ(pikaAsm,
- "B0\n"
- "2 NUM 1\n"
- "2 REF a\n"
- "1 OPT in \n"
- "0 OPT not \n"
- "B0\n");
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- // TEST(parser, def_not_in) {
- // pikaMemInfo.heapUsedMax = 0;
- // Args* buffs = New_strBuff();
- // char* lines =
- // "def test(a=\"hmac-md5\"):\n"
- // " print(\"input:\",a)\n"
- // " print(\"table:\"t )\n"
- // " if a not in t:\n"
- // " print(\"a not in t\")else:\n"
- // " print(\"a in t\")\n"
- // "test()\n";
- // printf("%s\r\n", lines);
- // char* pikaAsm = Parser_linesToAsm(buffs, lines);
- // printf("%s", pikaAsm);
- // EXPECT_STREQ(pikaAsm, "");
- // args_deinit(buffs);
- // EXPECT_EQ(pikaMemNow(), 0);
- // }
- TEST(parser, syntex_issue_lwekj) {
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- char* lines = "json.loads('{a:1}'}";
- EXPECT_EQ((uintptr_t)Parser_linesToAsm(buffs, lines), 0);
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- TEST(parser, syntex_issue_lekj) {
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- char* lines = "a[b()] = 1";
- printf("%s\r\n", lines);
- char* pikaAsm = Parser_linesToAsm(buffs, lines);
- printf("%s", pikaAsm);
- EXPECT_STREQ(pikaAsm,
- "B0\n"
- "1 REF a\n"
- "1 RUN b\n"
- "1 NUM 1\n"
- "0 RUN __setitem__\n"
- "0 OUT a\n"
- "B0\n");
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- TEST(parser, syntex_issue_l1l2) {
- pikaMemInfo.heapUsedMax = 0;
- Args* buffs = New_strBuff();
- char* lines = "test(a=1, b= 2)";
- printf("%s\r\n", lines);
- char* pikaAsm = Parser_linesToAsm(buffs, lines);
- printf("%s", pikaAsm);
- EXPECT_STREQ(pikaAsm,
- "B0\n"
- "1 NUM 1\n"
- "1 OUT a\n"
- "1 NUM 2\n"
- "1 OUT b\n"
- "0 RUN test\n"
- "B0\n");
- args_deinit(buffs);
- EXPECT_EQ(pikaMemNow(), 0);
- }
- #endif
- TEST_END
|