123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751752753754755756757758759760761762763764765766767768769770771772773774775776777778779780781782783784785786787788789790791792793794795796797798799800801802803804805806807808809810811812813814815816817818819820821822823824825826827828829830831832833834835836837838839840841842843844845846847848849850851852853854855856857858859860861862863864865866867868869870871872873874875876877878879880881882883884885886887888889890891892893894895896897898899900901902903904905906907908909910911912913914915916917918919920921922923924925926927928929930931932933934935936937938939940941942943944945946947948949950951952953954955956957958959960961962963964965966967968969970971972973974975976977978979980981982983984985986987988989990991992993994995996997998999100010011002100310041005100610071008100910101011101210131014101510161017101810191020102110221023102410251026102710281029103010311032103310341035103610371038103910401041104210431044104510461047104810491050105110521053105410551056105710581059106010611062106310641065106610671068106910701071107210731074107510761077107810791080108110821083108410851086108710881089109010911092109310941095109610971098109911001101110211031104110511061107110811091110111111121113111411151116111711181119112011211122112311241125112611271128112911301131113211331134113511361137113811391140114111421143114411451146114711481149115011511152115311541155115611571158115911601161116211631164116511661167116811691170117111721173117411751176117711781179118011811182118311841185118611871188118911901191119211931194119511961197119811991200120112021203120412051206120712081209121012111212121312141215121612171218121912201221122212231224122512261227122812291230123112321233123412351236123712381239124012411242124312441245124612471248124912501251125212531254125512561257125812591260126112621263126412651266126712681269127012711272127312741275127612771278127912801281128212831284128512861287128812891290129112921293129412951296129712981299130013011302130313041305130613071308130913101311131213131314131513161317131813191320132113221323132413251326132713281329133013311332133313341335133613371338133913401341134213431344134513461347134813491350135113521353135413551356135713581359136013611362136313641365136613671368136913701371137213731374137513761377137813791380138113821383138413851386138713881389139013911392139313941395139613971398139914001401140214031404140514061407140814091410141114121413141414151416141714181419142014211422142314241425142614271428142914301431143214331434143514361437143814391440144114421443144414451446144714481449145014511452145314541455145614571458145914601461146214631464146514661467146814691470147114721473147414751476147714781479148014811482148314841485148614871488148914901491149214931494149514961497149814991500150115021503150415051506150715081509151015111512151315141515151615171518151915201521152215231524152515261527152815291530153115321533153415351536153715381539154015411542154315441545154615471548154915501551155215531554155515561557155815591560156115621563156415651566156715681569157015711572157315741575157615771578157915801581158215831584158515861587158815891590159115921593159415951596159715981599160016011602160316041605160616071608160916101611161216131614161516161617161816191620162116221623162416251626162716281629163016311632163316341635163616371638163916401641164216431644164516461647164816491650165116521653165416551656165716581659166016611662166316641665166616671668166916701671167216731674167516761677167816791680168116821683168416851686168716881689169016911692169316941695169616971698169917001701170217031704170517061707170817091710171117121713171417151716171717181719172017211722172317241725172617271728172917301731173217331734173517361737173817391740174117421743174417451746174717481749175017511752175317541755175617571758175917601761176217631764176517661767176817691770177117721773177417751776177717781779178017811782178317841785178617871788178917901791179217931794179517961797179817991800180118021803180418051806180718081809181018111812181318141815181618171818181918201821182218231824182518261827182818291830183118321833183418351836183718381839184018411842184318441845184618471848184918501851185218531854185518561857185818591860186118621863186418651866186718681869187018711872187318741875187618771878187918801881188218831884188518861887188818891890189118921893189418951896189718981899190019011902190319041905190619071908190919101911191219131914191519161917191819191920192119221923192419251926192719281929193019311932193319341935193619371938193919401941194219431944194519461947194819491950195119521953195419551956195719581959196019611962196319641965196619671968196919701971197219731974197519761977197819791980198119821983198419851986198719881989199019911992199319941995199619971998199920002001200220032004200520062007200820092010201120122013201420152016201720182019202020212022202320242025202620272028202920302031203220332034203520362037203820392040204120422043204420452046204720482049205020512052205320542055205620572058205920602061206220632064206520662067206820692070207120722073207420752076207720782079208020812082208320842085208620872088208920902091209220932094209520962097209820992100210121022103210421052106210721082109211021112112211321142115211621172118211921202121212221232124212521262127212821292130213121322133213421352136213721382139214021412142214321442145214621472148214921502151215221532154215521562157215821592160216121622163216421652166216721682169217021712172217321742175217621772178217921802181218221832184218521862187218821892190219121922193219421952196219721982199220022012202220322042205220622072208220922102211221222132214221522162217221822192220222122222223222422252226222722282229223022312232223322342235223622372238223922402241224222432244224522462247224822492250225122522253225422552256225722582259226022612262226322642265226622672268226922702271227222732274227522762277227822792280228122822283228422852286228722882289229022912292229322942295229622972298229923002301230223032304230523062307230823092310231123122313231423152316231723182319232023212322232323242325232623272328232923302331233223332334233523362337233823392340234123422343234423452346234723482349235023512352235323542355235623572358235923602361236223632364236523662367236823692370237123722373237423752376237723782379238023812382238323842385238623872388238923902391239223932394239523962397239823992400240124022403240424052406240724082409241024112412241324142415241624172418241924202421242224232424242524262427242824292430243124322433243424352436243724382439244024412442244324442445244624472448244924502451245224532454245524562457245824592460246124622463246424652466246724682469247024712472247324742475247624772478247924802481248224832484248524862487248824892490249124922493249424952496249724982499250025012502250325042505250625072508250925102511251225132514251525162517251825192520252125222523252425252526252725282529253025312532253325342535253625372538253925402541254225432544254525462547254825492550255125522553255425552556255725582559256025612562256325642565256625672568256925702571257225732574257525762577257825792580258125822583258425852586258725882589259025912592259325942595259625972598259926002601260226032604260526062607260826092610261126122613261426152616261726182619262026212622262326242625262626272628262926302631263226332634263526362637263826392640264126422643264426452646264726482649265026512652265326542655265626572658265926602661266226632664266526662667266826692670267126722673267426752676267726782679268026812682268326842685268626872688268926902691269226932694269526962697269826992700270127022703270427052706270727082709271027112712271327142715271627172718271927202721272227232724272527262727272827292730273127322733273427352736273727382739274027412742274327442745274627472748274927502751275227532754275527562757275827592760276127622763276427652766276727682769277027712772277327742775277627772778277927802781278227832784278527862787278827892790279127922793279427952796279727982799280028012802280328042805280628072808280928102811281228132814281528162817281828192820282128222823282428252826282728282829283028312832283328342835283628372838283928402841284228432844284528462847284828492850285128522853285428552856285728582859286028612862286328642865286628672868286928702871287228732874287528762877287828792880288128822883288428852886288728882889289028912892289328942895289628972898289929002901290229032904290529062907290829092910291129122913291429152916291729182919292029212922292329242925292629272928292929302931293229332934293529362937293829392940294129422943294429452946294729482949295029512952295329542955295629572958295929602961296229632964296529662967296829692970297129722973297429752976297729782979298029812982298329842985298629872988298929902991299229932994299529962997299829993000300130023003300430053006300730083009301030113012301330143015301630173018301930203021302230233024302530263027302830293030303130323033303430353036303730383039304030413042304330443045304630473048304930503051305230533054305530563057305830593060306130623063306430653066306730683069307030713072307330743075307630773078307930803081308230833084308530863087308830893090309130923093309430953096309730983099310031013102310331043105310631073108310931103111311231133114311531163117311831193120312131223123312431253126312731283129313031313132313331343135313631373138313931403141314231433144314531463147314831493150315131523153315431553156315731583159316031613162316331643165316631673168316931703171317231733174317531763177317831793180318131823183318431853186318731883189319031913192319331943195319631973198319932003201320232033204320532063207320832093210321132123213321432153216321732183219322032213222322332243225322632273228322932303231323232333234323532363237323832393240324132423243324432453246324732483249325032513252325332543255325632573258325932603261326232633264326532663267326832693270327132723273327432753276327732783279328032813282328332843285328632873288328932903291329232933294329532963297329832993300330133023303330433053306330733083309331033113312331333143315331633173318331933203321332233233324332533263327332833293330333133323333333433353336333733383339334033413342334333443345334633473348334933503351335233533354335533563357335833593360336133623363336433653366336733683369337033713372337333743375337633773378337933803381338233833384338533863387338833893390339133923393339433953396339733983399340034013402340334043405340634073408340934103411341234133414341534163417341834193420342134223423342434253426342734283429343034313432343334343435343634373438343934403441344234433444344534463447344834493450345134523453345434553456345734583459346034613462346334643465346634673468346934703471347234733474347534763477347834793480348134823483348434853486348734883489349034913492349334943495349634973498349935003501350235033504350535063507350835093510351135123513351435153516351735183519352035213522352335243525352635273528352935303531353235333534353535363537353835393540354135423543354435453546354735483549355035513552355335543555355635573558355935603561356235633564356535663567356835693570357135723573357435753576357735783579358035813582358335843585358635873588358935903591359235933594359535963597359835993600360136023603360436053606360736083609361036113612361336143615361636173618361936203621362236233624362536263627362836293630363136323633363436353636363736383639364036413642364336443645364636473648364936503651365236533654365536563657365836593660366136623663366436653666366736683669367036713672367336743675367636773678367936803681368236833684368536863687368836893690369136923693369436953696369736983699370037013702370337043705370637073708370937103711371237133714371537163717371837193720372137223723372437253726372737283729373037313732373337343735373637373738373937403741374237433744374537463747374837493750375137523753375437553756375737583759376037613762376337643765376637673768376937703771377237733774377537763777377837793780378137823783378437853786378737883789379037913792379337943795379637973798379938003801380238033804380538063807380838093810381138123813381438153816381738183819382038213822382338243825382638273828382938303831383238333834383538363837383838393840384138423843384438453846384738483849385038513852385338543855385638573858385938603861386238633864386538663867386838693870387138723873387438753876387738783879388038813882388338843885388638873888388938903891389238933894389538963897389838993900390139023903390439053906390739083909391039113912391339143915391639173918391939203921392239233924392539263927392839293930393139323933393439353936393739383939394039413942394339443945394639473948394939503951395239533954395539563957395839593960396139623963396439653966396739683969397039713972397339743975397639773978397939803981398239833984398539863987398839893990399139923993399439953996399739983999400040014002400340044005400640074008400940104011401240134014401540164017401840194020402140224023402440254026402740284029403040314032403340344035403640374038403940404041404240434044404540464047404840494050405140524053405440554056405740584059406040614062406340644065406640674068406940704071407240734074407540764077407840794080408140824083408440854086408740884089409040914092409340944095409640974098409941004101410241034104410541064107410841094110411141124113411441154116411741184119412041214122412341244125412641274128412941304131413241334134413541364137413841394140414141424143414441454146414741484149415041514152415341544155415641574158415941604161416241634164416541664167416841694170417141724173417441754176417741784179418041814182418341844185418641874188418941904191419241934194419541964197419841994200420142024203420442054206420742084209421042114212421342144215421642174218421942204221422242234224422542264227422842294230423142324233423442354236423742384239424042414242424342444245424642474248424942504251425242534254425542564257425842594260426142624263426442654266426742684269427042714272427342744275427642774278427942804281428242834284428542864287428842894290429142924293429442954296429742984299430043014302430343044305430643074308430943104311431243134314431543164317431843194320432143224323432443254326432743284329433043314332433343344335433643374338433943404341434243434344434543464347434843494350435143524353435443554356435743584359436043614362436343644365436643674368436943704371437243734374437543764377437843794380438143824383438443854386438743884389439043914392439343944395439643974398439944004401440244034404440544064407440844094410441144124413441444154416441744184419442044214422442344244425442644274428442944304431443244334434443544364437443844394440444144424443444444454446444744484449445044514452445344544455445644574458445944604461446244634464446544664467446844694470447144724473447444754476447744784479448044814482448344844485448644874488448944904491449244934494449544964497449844994500450145024503450445054506450745084509451045114512451345144515451645174518451945204521452245234524452545264527452845294530453145324533453445354536453745384539454045414542454345444545454645474548454945504551455245534554455545564557455845594560456145624563456445654566456745684569457045714572457345744575457645774578457945804581458245834584458545864587458845894590459145924593459445954596459745984599460046014602460346044605460646074608460946104611461246134614461546164617461846194620462146224623462446254626462746284629463046314632463346344635463646374638463946404641464246434644464546464647464846494650465146524653465446554656465746584659466046614662466346644665466646674668466946704671467246734674467546764677467846794680468146824683468446854686468746884689469046914692469346944695469646974698469947004701470247034704470547064707470847094710471147124713471447154716471747184719472047214722472347244725472647274728472947304731473247334734473547364737473847394740474147424743474447454746474747484749475047514752475347544755475647574758475947604761476247634764476547664767476847694770477147724773477447754776477747784779478047814782478347844785478647874788478947904791479247934794479547964797479847994800480148024803480448054806480748084809481048114812481348144815481648174818481948204821482248234824482548264827482848294830483148324833483448354836483748384839484048414842484348444845484648474848484948504851485248534854485548564857485848594860486148624863486448654866486748684869487048714872487348744875487648774878487948804881488248834884488548864887488848894890489148924893489448954896489748984899490049014902490349044905490649074908490949104911491249134914491549164917491849194920492149224923492449254926492749284929493049314932493349344935493649374938493949404941494249434944494549464947494849494950495149524953495449554956495749584959496049614962496349644965496649674968496949704971497249734974497549764977497849794980498149824983498449854986498749884989499049914992499349944995499649974998499950005001500250035004500550065007500850095010501150125013501450155016501750185019502050215022502350245025502650275028502950305031503250335034503550365037503850395040504150425043504450455046504750485049505050515052505350545055505650575058505950605061506250635064506550665067506850695070507150725073507450755076507750785079508050815082508350845085508650875088508950905091509250935094509550965097509850995100510151025103510451055106510751085109511051115112511351145115511651175118511951205121512251235124512551265127512851295130513151325133513451355136513751385139514051415142514351445145514651475148514951505151515251535154515551565157515851595160516151625163516451655166516751685169517051715172517351745175517651775178517951805181518251835184518551865187518851895190519151925193519451955196519751985199520052015202520352045205520652075208520952105211521252135214521552165217521852195220522152225223522452255226522752285229523052315232523352345235523652375238523952405241524252435244524552465247524852495250525152525253525452555256525752585259526052615262526352645265526652675268526952705271527252735274527552765277527852795280528152825283528452855286528752885289529052915292529352945295529652975298529953005301530253035304530553065307530853095310531153125313531453155316531753185319532053215322532353245325532653275328532953305331533253335334533553365337533853395340534153425343534453455346534753485349535053515352535353545355535653575358535953605361536253635364536553665367536853695370537153725373537453755376537753785379538053815382538353845385538653875388538953905391539253935394539553965397539853995400540154025403540454055406540754085409541054115412541354145415541654175418541954205421542254235424542554265427542854295430543154325433543454355436543754385439544054415442544354445445544654475448544954505451545254535454545554565457545854595460546154625463546454655466546754685469547054715472547354745475547654775478547954805481548254835484548554865487548854895490549154925493549454955496549754985499550055015502550355045505550655075508550955105511551255135514551555165517551855195520552155225523552455255526552755285529553055315532553355345535553655375538553955405541554255435544554555465547554855495550555155525553555455555556555755585559556055615562556355645565556655675568556955705571557255735574557555765577557855795580558155825583558455855586558755885589559055915592559355945595559655975598559956005601560256035604560556065607560856095610561156125613561456155616561756185619562056215622562356245625562656275628562956305631563256335634563556365637563856395640564156425643564456455646564756485649565056515652565356545655565656575658565956605661566256635664566556665667566856695670567156725673567456755676567756785679568056815682568356845685568656875688568956905691569256935694569556965697569856995700570157025703570457055706570757085709571057115712571357145715571657175718571957205721572257235724572557265727572857295730573157325733573457355736573757385739574057415742574357445745574657475748574957505751575257535754575557565757575857595760576157625763576457655766576757685769577057715772577357745775577657775778577957805781578257835784578557865787578857895790579157925793579457955796579757985799580058015802580358045805580658075808580958105811581258135814581558165817581858195820582158225823582458255826582758285829583058315832583358345835583658375838583958405841584258435844584558465847584858495850585158525853585458555856585758585859586058615862586358645865586658675868586958705871587258735874587558765877587858795880588158825883588458855886588758885889589058915892589358945895589658975898589959005901590259035904590559065907590859095910591159125913591459155916591759185919592059215922592359245925592659275928592959305931593259335934593559365937593859395940594159425943594459455946594759485949595059515952595359545955595659575958595959605961596259635964596559665967596859695970597159725973597459755976597759785979598059815982598359845985598659875988598959905991599259935994599559965997599859996000600160026003600460056006600760086009601060116012601360146015601660176018601960206021602260236024602560266027602860296030603160326033603460356036603760386039604060416042604360446045604660476048604960506051605260536054605560566057605860596060606160626063606460656066606760686069607060716072607360746075607660776078607960806081608260836084608560866087608860896090609160926093609460956096609760986099610061016102610361046105610661076108610961106111611261136114611561166117611861196120612161226123612461256126612761286129613061316132613361346135613661376138613961406141614261436144614561466147614861496150615161526153615461556156615761586159616061616162616361646165616661676168616961706171617261736174617561766177617861796180618161826183618461856186618761886189619061916192619361946195619661976198619962006201620262036204620562066207620862096210621162126213621462156216621762186219622062216222622362246225622662276228622962306231623262336234623562366237623862396240624162426243624462456246624762486249625062516252625362546255625662576258625962606261626262636264626562666267626862696270627162726273627462756276627762786279628062816282628362846285628662876288628962906291629262936294629562966297629862996300630163026303630463056306630763086309631063116312631363146315631663176318631963206321632263236324632563266327632863296330633163326333633463356336633763386339634063416342634363446345634663476348634963506351635263536354635563566357635863596360636163626363636463656366636763686369637063716372637363746375637663776378637963806381638263836384638563866387638863896390639163926393639463956396639763986399640064016402640364046405640664076408640964106411641264136414641564166417641864196420642164226423642464256426642764286429643064316432643364346435643664376438643964406441644264436444644564466447644864496450645164526453645464556456645764586459646064616462646364646465646664676468646964706471647264736474647564766477647864796480648164826483648464856486648764886489649064916492649364946495649664976498649965006501650265036504650565066507650865096510651165126513651465156516651765186519652065216522652365246525652665276528652965306531653265336534653565366537653865396540654165426543654465456546654765486549655065516552655365546555655665576558655965606561656265636564656565666567656865696570657165726573657465756576657765786579658065816582658365846585658665876588658965906591659265936594659565966597659865996600660166026603660466056606660766086609661066116612661366146615661666176618661966206621662266236624662566266627662866296630663166326633663466356636663766386639664066416642664366446645664666476648664966506651665266536654665566566657665866596660666166626663666466656666666766686669667066716672667366746675667666776678667966806681668266836684668566866687668866896690669166926693669466956696669766986699670067016702670367046705670667076708670967106711671267136714671567166717671867196720672167226723672467256726672767286729673067316732673367346735673667376738673967406741674267436744674567466747674867496750675167526753675467556756675767586759676067616762676367646765676667676768676967706771677267736774677567766777677867796780678167826783678467856786678767886789679067916792679367946795679667976798679968006801680268036804680568066807680868096810681168126813681468156816681768186819682068216822682368246825682668276828682968306831683268336834683568366837683868396840684168426843684468456846684768486849685068516852685368546855685668576858685968606861686268636864686568666867686868696870687168726873687468756876687768786879688068816882688368846885688668876888688968906891689268936894689568966897689868996900690169026903690469056906690769086909691069116912691369146915691669176918691969206921692269236924692569266927692869296930693169326933693469356936693769386939694069416942694369446945694669476948694969506951695269536954695569566957695869596960696169626963696469656966696769686969697069716972697369746975697669776978697969806981698269836984698569866987698869896990699169926993699469956996699769986999700070017002700370047005700670077008700970107011701270137014701570167017701870197020702170227023702470257026702770287029703070317032703370347035703670377038703970407041704270437044704570467047704870497050705170527053705470557056705770587059706070617062706370647065706670677068706970707071707270737074707570767077707870797080708170827083708470857086708770887089709070917092709370947095709670977098709971007101710271037104710571067107710871097110711171127113711471157116711771187119712071217122712371247125712671277128712971307131713271337134713571367137713871397140714171427143714471457146714771487149715071517152715371547155715671577158715971607161716271637164716571667167716871697170717171727173717471757176717771787179718071817182718371847185718671877188718971907191719271937194719571967197719871997200720172027203720472057206720772087209721072117212721372147215721672177218721972207221722272237224722572267227722872297230723172327233723472357236723772387239724072417242724372447245724672477248724972507251725272537254725572567257725872597260726172627263726472657266726772687269727072717272727372747275727672777278727972807281728272837284728572867287728872897290729172927293729472957296729772987299730073017302730373047305730673077308730973107311731273137314731573167317731873197320732173227323732473257326732773287329733073317332733373347335733673377338733973407341734273437344734573467347734873497350735173527353735473557356735773587359736073617362736373647365736673677368736973707371737273737374737573767377737873797380738173827383738473857386738773887389739073917392739373947395739673977398739974007401740274037404740574067407740874097410741174127413741474157416741774187419742074217422742374247425742674277428742974307431743274337434743574367437743874397440744174427443744474457446744774487449745074517452745374547455745674577458745974607461746274637464746574667467746874697470747174727473747474757476747774787479748074817482748374847485748674877488748974907491749274937494749574967497749874997500750175027503750475057506750775087509751075117512751375147515751675177518751975207521752275237524752575267527752875297530753175327533753475357536753775387539754075417542754375447545754675477548754975507551755275537554755575567557755875597560756175627563756475657566756775687569757075717572757375747575757675777578757975807581758275837584758575867587758875897590759175927593759475957596759775987599760076017602760376047605760676077608760976107611761276137614761576167617761876197620762176227623762476257626762776287629763076317632763376347635763676377638763976407641764276437644764576467647764876497650765176527653765476557656765776587659766076617662766376647665766676677668766976707671767276737674767576767677767876797680768176827683768476857686768776887689769076917692769376947695769676977698769977007701770277037704770577067707770877097710771177127713771477157716771777187719772077217722772377247725772677277728772977307731773277337734773577367737773877397740774177427743774477457746774777487749775077517752775377547755775677577758775977607761776277637764776577667767776877697770777177727773777477757776777777787779778077817782778377847785778677877788778977907791779277937794779577967797779877997800780178027803780478057806780778087809781078117812781378147815781678177818781978207821782278237824782578267827782878297830783178327833783478357836783778387839784078417842784378447845784678477848784978507851785278537854785578567857785878597860786178627863786478657866786778687869787078717872787378747875787678777878787978807881788278837884788578867887788878897890789178927893789478957896789778987899790079017902790379047905790679077908790979107911791279137914791579167917791879197920792179227923792479257926792779287929793079317932793379347935793679377938793979407941794279437944794579467947794879497950795179527953795479557956795779587959796079617962796379647965796679677968796979707971797279737974797579767977797879797980798179827983798479857986798779887989799079917992799379947995799679977998799980008001800280038004800580068007800880098010801180128013801480158016801780188019802080218022802380248025802680278028802980308031803280338034803580368037803880398040804180428043804480458046804780488049805080518052805380548055805680578058805980608061806280638064806580668067806880698070807180728073807480758076807780788079808080818082808380848085808680878088808980908091809280938094809580968097809880998100810181028103810481058106810781088109811081118112811381148115811681178118811981208121812281238124812581268127812881298130813181328133813481358136813781388139814081418142814381448145814681478148814981508151815281538154815581568157815881598160816181628163816481658166816781688169817081718172817381748175817681778178817981808181818281838184818581868187818881898190819181928193819481958196819781988199820082018202820382048205820682078208820982108211821282138214821582168217821882198220822182228223822482258226822782288229823082318232823382348235823682378238823982408241824282438244824582468247824882498250825182528253825482558256825782588259826082618262826382648265826682678268826982708271827282738274827582768277827882798280828182828283828482858286828782888289829082918292829382948295829682978298829983008301830283038304830583068307830883098310831183128313831483158316831783188319832083218322832383248325832683278328832983308331833283338334833583368337833883398340834183428343834483458346834783488349835083518352835383548355835683578358835983608361836283638364836583668367836883698370837183728373837483758376837783788379838083818382838383848385838683878388838983908391839283938394839583968397839883998400840184028403840484058406840784088409841084118412841384148415841684178418841984208421842284238424842584268427842884298430843184328433843484358436843784388439844084418442844384448445844684478448844984508451845284538454845584568457845884598460846184628463846484658466846784688469847084718472847384748475847684778478847984808481848284838484848584868487848884898490849184928493849484958496849784988499850085018502850385048505850685078508850985108511851285138514851585168517851885198520852185228523852485258526852785288529853085318532853385348535853685378538853985408541854285438544854585468547854885498550855185528553855485558556855785588559856085618562856385648565856685678568856985708571857285738574857585768577857885798580858185828583858485858586858785888589859085918592859385948595859685978598859986008601860286038604860586068607860886098610861186128613861486158616861786188619862086218622862386248625862686278628862986308631863286338634863586368637863886398640864186428643864486458646864786488649865086518652865386548655865686578658865986608661866286638664866586668667866886698670867186728673867486758676867786788679868086818682868386848685868686878688868986908691869286938694869586968697869886998700870187028703870487058706870787088709871087118712871387148715871687178718871987208721872287238724872587268727872887298730873187328733873487358736873787388739874087418742874387448745874687478748874987508751875287538754875587568757875887598760876187628763876487658766876787688769877087718772877387748775877687778778877987808781878287838784878587868787878887898790879187928793879487958796879787988799880088018802880388048805880688078808880988108811881288138814881588168817881888198820882188228823882488258826882788288829883088318832883388348835883688378838883988408841884288438844884588468847884888498850885188528853885488558856885788588859886088618862886388648865886688678868886988708871887288738874887588768877887888798880888188828883888488858886888788888889889088918892889388948895889688978898889989008901890289038904890589068907890889098910891189128913891489158916891789188919892089218922892389248925892689278928892989308931893289338934893589368937893889398940894189428943894489458946894789488949895089518952895389548955895689578958895989608961896289638964896589668967896889698970897189728973897489758976897789788979898089818982898389848985898689878988898989908991899289938994899589968997899889999000900190029003900490059006900790089009901090119012901390149015901690179018901990209021902290239024902590269027902890299030903190329033903490359036903790389039904090419042904390449045904690479048904990509051905290539054905590569057905890599060906190629063906490659066906790689069907090719072907390749075907690779078907990809081908290839084908590869087908890899090909190929093909490959096909790989099910091019102910391049105910691079108910991109111911291139114911591169117911891199120912191229123912491259126912791289129913091319132913391349135913691379138913991409141914291439144914591469147914891499150915191529153915491559156915791589159916091619162916391649165916691679168916991709171917291739174917591769177917891799180918191829183918491859186918791889189919091919192919391949195919691979198919992009201920292039204920592069207920892099210921192129213921492159216921792189219922092219222922392249225922692279228922992309231923292339234923592369237923892399240924192429243924492459246924792489249925092519252925392549255925692579258925992609261926292639264926592669267926892699270927192729273927492759276927792789279928092819282928392849285928692879288928992909291929292939294929592969297929892999300930193029303930493059306930793089309931093119312931393149315931693179318931993209321932293239324932593269327932893299330933193329333933493359336933793389339934093419342934393449345934693479348934993509351935293539354935593569357935893599360936193629363936493659366936793689369937093719372937393749375937693779378937993809381938293839384938593869387938893899390939193929393939493959396939793989399940094019402940394049405940694079408940994109411941294139414941594169417941894199420942194229423942494259426942794289429943094319432943394349435943694379438943994409441944294439444944594469447944894499450945194529453945494559456945794589459946094619462946394649465946694679468946994709471947294739474947594769477947894799480948194829483948494859486948794889489949094919492949394949495949694979498949995009501950295039504950595069507950895099510951195129513951495159516951795189519952095219522952395249525952695279528952995309531953295339534953595369537953895399540954195429543954495459546954795489549955095519552955395549555955695579558955995609561956295639564956595669567956895699570957195729573957495759576957795789579958095819582958395849585958695879588958995909591959295939594959595969597959895999600960196029603960496059606960796089609961096119612961396149615961696179618961996209621962296239624962596269627962896299630963196329633963496359636963796389639964096419642964396449645964696479648964996509651965296539654965596569657965896599660966196629663966496659666966796689669967096719672967396749675967696779678967996809681968296839684968596869687968896899690969196929693969496959696969796989699970097019702970397049705970697079708970997109711971297139714971597169717971897199720972197229723972497259726972797289729973097319732973397349735973697379738973997409741974297439744974597469747974897499750975197529753975497559756975797589759976097619762976397649765976697679768976997709771977297739774977597769777977897799780978197829783978497859786978797889789979097919792979397949795979697979798979998009801980298039804980598069807980898099810981198129813981498159816981798189819982098219822982398249825982698279828982998309831983298339834983598369837983898399840984198429843984498459846984798489849985098519852985398549855985698579858985998609861986298639864986598669867986898699870987198729873987498759876987798789879988098819882988398849885988698879888988998909891989298939894989598969897989898999900990199029903990499059906990799089909991099119912991399149915991699179918991999209921992299239924992599269927992899299930993199329933993499359936993799389939994099419942994399449945994699479948994999509951995299539954995599569957995899599960996199629963996499659966996799689969997099719972997399749975997699779978997999809981998299839984998599869987998899899990999199929993999499959996999799989999100001000110002100031000410005100061000710008100091001010011100121001310014100151001610017100181001910020100211002210023100241002510026100271002810029100301003110032100331003410035100361003710038100391004010041100421004310044100451004610047100481004910050100511005210053100541005510056100571005810059100601006110062100631006410065100661006710068100691007010071100721007310074100751007610077100781007910080100811008210083100841008510086100871008810089100901009110092100931009410095100961009710098100991010010101101021010310104101051010610107101081010910110101111011210113101141011510116101171011810119101201012110122101231012410125101261012710128101291013010131101321013310134101351013610137101381013910140101411014210143101441014510146101471014810149101501015110152101531015410155101561015710158101591016010161101621016310164101651016610167101681016910170101711017210173101741017510176101771017810179101801018110182101831018410185101861018710188101891019010191101921019310194101951019610197101981019910200102011020210203102041020510206102071020810209102101021110212102131021410215102161021710218102191022010221102221022310224102251022610227102281022910230102311023210233102341023510236102371023810239102401024110242102431024410245102461024710248102491025010251102521025310254102551025610257102581025910260102611026210263102641026510266102671026810269102701027110272102731027410275102761027710278102791028010281102821028310284102851028610287102881028910290102911029210293102941029510296102971029810299103001030110302103031030410305103061030710308103091031010311103121031310314103151031610317103181031910320103211032210323103241032510326103271032810329103301033110332103331033410335103361033710338103391034010341103421034310344103451034610347103481034910350103511035210353103541035510356103571035810359103601036110362103631036410365103661036710368103691037010371103721037310374103751037610377103781037910380103811038210383103841038510386103871038810389103901039110392103931039410395103961039710398103991040010401104021040310404104051040610407104081040910410104111041210413104141041510416104171041810419104201042110422104231042410425104261042710428104291043010431104321043310434104351043610437104381043910440104411044210443104441044510446104471044810449104501045110452104531045410455104561045710458104591046010461104621046310464104651046610467104681046910470104711047210473104741047510476104771047810479104801048110482104831048410485104861048710488104891049010491104921049310494104951049610497104981049910500105011050210503105041050510506105071050810509105101051110512105131051410515105161051710518105191052010521105221052310524105251052610527105281052910530105311053210533105341053510536105371053810539105401054110542105431054410545105461054710548105491055010551105521055310554105551055610557105581055910560105611056210563105641056510566105671056810569105701057110572105731057410575105761057710578105791058010581105821058310584105851058610587105881058910590105911059210593105941059510596105971059810599106001060110602106031060410605106061060710608106091061010611106121061310614106151061610617106181061910620106211062210623106241062510626106271062810629106301063110632106331063410635106361063710638106391064010641106421064310644106451064610647106481064910650106511065210653106541065510656106571065810659106601066110662106631066410665106661066710668106691067010671106721067310674106751067610677106781067910680106811068210683106841068510686106871068810689106901069110692106931069410695106961069710698106991070010701107021070310704107051070610707107081070910710107111071210713107141071510716107171071810719107201072110722107231072410725107261072710728107291073010731107321073310734107351073610737107381073910740107411074210743107441074510746107471074810749107501075110752107531075410755107561075710758107591076010761107621076310764107651076610767107681076910770107711077210773107741077510776107771077810779107801078110782107831078410785107861078710788107891079010791107921079310794107951079610797107981079910800108011080210803108041080510806108071080810809108101081110812108131081410815108161081710818108191082010821108221082310824108251082610827108281082910830108311083210833108341083510836108371083810839108401084110842108431084410845108461084710848108491085010851108521085310854108551085610857108581085910860108611086210863108641086510866108671086810869108701087110872108731087410875108761087710878108791088010881108821088310884108851088610887108881088910890108911089210893108941089510896108971089810899109001090110902109031090410905109061090710908109091091010911109121091310914109151091610917109181091910920109211092210923109241092510926109271092810929109301093110932109331093410935109361093710938109391094010941109421094310944109451094610947109481094910950109511095210953109541095510956109571095810959109601096110962109631096410965109661096710968109691097010971109721097310974109751097610977109781097910980109811098210983109841098510986109871098810989109901099110992109931099410995109961099710998109991100011001110021100311004110051100611007110081100911010110111101211013110141101511016110171101811019110201102111022110231102411025110261102711028110291103011031110321103311034110351103611037110381103911040110411104211043110441104511046110471104811049110501105111052110531105411055110561105711058110591106011061110621106311064110651106611067110681106911070110711107211073110741107511076110771107811079110801108111082110831108411085110861108711088110891109011091110921109311094110951109611097110981109911100111011110211103111041110511106111071110811109111101111111112111131111411115111161111711118111191112011121111221112311124111251112611127111281112911130111311113211133111341113511136111371113811139111401114111142111431114411145111461114711148111491115011151111521115311154111551115611157111581115911160111611116211163111641116511166111671116811169111701117111172111731117411175111761117711178111791118011181111821118311184111851118611187111881118911190111911119211193111941119511196111971119811199112001120111202112031120411205112061120711208112091121011211112121121311214112151121611217112181121911220112211122211223112241122511226112271122811229112301123111232112331123411235112361123711238112391124011241112421124311244112451124611247112481124911250112511125211253112541125511256112571125811259112601126111262112631126411265112661126711268112691127011271112721127311274112751127611277112781127911280112811128211283112841128511286112871128811289112901129111292112931129411295112961129711298112991130011301113021130311304113051130611307113081130911310113111131211313113141131511316113171131811319113201132111322113231132411325113261132711328113291133011331113321133311334113351133611337113381133911340113411134211343113441134511346113471134811349113501135111352113531135411355113561135711358113591136011361113621136311364113651136611367113681136911370113711137211373113741137511376113771137811379113801138111382113831138411385113861138711388113891139011391113921139311394113951139611397113981139911400114011140211403114041140511406114071140811409114101141111412114131141411415114161141711418114191142011421114221142311424114251142611427114281142911430114311143211433114341143511436114371143811439114401144111442114431144411445114461144711448114491145011451114521145311454114551145611457114581145911460114611146211463114641146511466114671146811469114701147111472114731147411475114761147711478114791148011481114821148311484114851148611487114881148911490114911149211493114941149511496114971149811499115001150111502115031150411505115061150711508115091151011511115121151311514115151151611517115181151911520115211152211523115241152511526115271152811529115301153111532115331153411535115361153711538115391154011541115421154311544115451154611547115481154911550115511155211553115541155511556115571155811559115601156111562115631156411565115661156711568115691157011571115721157311574115751157611577115781157911580115811158211583115841158511586115871158811589115901159111592115931159411595115961159711598115991160011601116021160311604116051160611607116081160911610116111161211613116141161511616116171161811619116201162111622116231162411625116261162711628116291163011631116321163311634116351163611637116381163911640116411164211643116441164511646116471164811649116501165111652116531165411655116561165711658116591166011661116621166311664116651166611667116681166911670116711167211673116741167511676116771167811679116801168111682116831168411685116861168711688116891169011691116921169311694116951169611697116981169911700117011170211703117041170511706117071170811709117101171111712117131171411715117161171711718117191172011721117221172311724117251172611727117281172911730117311173211733117341173511736117371173811739117401174111742117431174411745117461174711748117491175011751117521175311754117551175611757117581175911760117611176211763117641176511766117671176811769117701177111772117731177411775117761177711778117791178011781117821178311784117851178611787117881178911790117911179211793117941179511796117971179811799118001180111802118031180411805118061180711808118091181011811118121181311814118151181611817118181181911820118211182211823118241182511826118271182811829118301183111832118331183411835118361183711838118391184011841118421184311844118451184611847118481184911850118511185211853118541185511856118571185811859118601186111862118631186411865118661186711868118691187011871118721187311874118751187611877118781187911880118811188211883118841188511886118871188811889118901189111892118931189411895118961189711898118991190011901119021190311904119051190611907119081190911910119111191211913119141191511916119171191811919119201192111922119231192411925119261192711928119291193011931119321193311934119351193611937119381193911940119411194211943119441194511946119471194811949119501195111952119531195411955119561195711958119591196011961119621196311964119651196611967119681196911970119711197211973119741197511976119771197811979119801198111982119831198411985119861198711988119891199011991119921199311994119951199611997119981199912000120011200212003120041200512006120071200812009120101201112012120131201412015120161201712018120191202012021120221202312024120251202612027120281202912030120311203212033120341203512036120371203812039120401204112042120431204412045120461204712048120491205012051120521205312054120551205612057120581205912060120611206212063120641206512066120671206812069120701207112072120731207412075120761207712078120791208012081120821208312084120851208612087120881208912090120911209212093120941209512096120971209812099121001210112102121031210412105121061210712108121091211012111121121211312114121151211612117121181211912120121211212212123121241212512126121271212812129121301213112132121331213412135121361213712138121391214012141121421214312144121451214612147121481214912150121511215212153121541215512156121571215812159121601216112162121631216412165121661216712168121691217012171121721217312174121751217612177121781217912180121811218212183121841218512186121871218812189121901219112192121931219412195121961219712198121991220012201122021220312204122051220612207122081220912210122111221212213122141221512216122171221812219122201222112222122231222412225122261222712228122291223012231122321223312234122351223612237122381223912240122411224212243122441224512246122471224812249122501225112252122531225412255122561225712258122591226012261122621226312264122651226612267122681226912270122711227212273122741227512276122771227812279122801228112282122831228412285122861228712288122891229012291122921229312294122951229612297122981229912300123011230212303123041230512306123071230812309123101231112312123131231412315123161231712318123191232012321123221232312324123251232612327123281232912330123311233212333123341233512336123371233812339123401234112342123431234412345123461234712348123491235012351123521235312354123551235612357123581235912360123611236212363123641236512366123671236812369123701237112372123731237412375123761237712378123791238012381123821238312384123851238612387123881238912390123911239212393123941239512396123971239812399124001240112402124031240412405124061240712408124091241012411124121241312414124151241612417124181241912420124211242212423124241242512426124271242812429124301243112432124331243412435124361243712438124391244012441124421244312444124451244612447124481244912450124511245212453124541245512456124571245812459124601246112462124631246412465124661246712468124691247012471124721247312474124751247612477124781247912480124811248212483124841248512486124871248812489124901249112492124931249412495124961249712498124991250012501125021250312504125051250612507125081250912510125111251212513125141251512516125171251812519125201252112522125231252412525125261252712528125291253012531125321253312534125351253612537125381253912540125411254212543125441254512546125471254812549125501255112552125531255412555125561255712558125591256012561125621256312564125651256612567125681256912570125711257212573125741257512576125771257812579125801258112582125831258412585125861258712588125891259012591125921259312594125951259612597125981259912600126011260212603126041260512606126071260812609126101261112612126131261412615126161261712618126191262012621126221262312624126251262612627126281262912630126311263212633126341263512636126371263812639126401264112642126431264412645126461264712648126491265012651126521265312654126551265612657126581265912660126611266212663126641266512666126671266812669126701267112672126731267412675126761267712678126791268012681126821268312684126851268612687126881268912690126911269212693126941269512696126971269812699127001270112702127031270412705127061270712708127091271012711127121271312714127151271612717127181271912720127211272212723127241272512726127271272812729127301273112732127331273412735127361273712738127391274012741127421274312744127451274612747127481274912750127511275212753127541275512756127571275812759127601276112762127631276412765127661276712768127691277012771127721277312774127751277612777127781277912780127811278212783127841278512786127871278812789127901279112792127931279412795127961279712798127991280012801128021280312804128051280612807128081280912810128111281212813128141281512816128171281812819128201282112822128231282412825128261282712828128291283012831128321283312834128351283612837128381283912840128411284212843128441284512846128471284812849128501285112852128531285412855128561285712858128591286012861128621286312864128651286612867128681286912870128711287212873128741287512876128771287812879128801288112882128831288412885128861288712888128891289012891128921289312894128951289612897128981289912900129011290212903129041290512906129071290812909129101291112912129131291412915129161291712918129191292012921129221292312924129251292612927129281292912930129311293212933129341293512936129371293812939129401294112942129431294412945129461294712948129491295012951129521295312954129551295612957129581295912960129611296212963129641296512966129671296812969129701297112972129731297412975129761297712978129791298012981129821298312984129851298612987129881298912990129911299212993129941299512996129971299812999130001300113002130031300413005130061300713008130091301013011130121301313014130151301613017130181301913020130211302213023130241302513026130271302813029130301303113032130331303413035130361303713038130391304013041130421304313044130451304613047130481304913050130511305213053130541305513056130571305813059130601306113062130631306413065130661306713068130691307013071130721307313074130751307613077130781307913080130811308213083130841308513086130871308813089130901309113092130931309413095130961309713098130991310013101131021310313104131051310613107131081310913110131111311213113131141311513116131171311813119131201312113122131231312413125131261312713128131291313013131131321313313134131351313613137131381313913140131411314213143131441314513146131471314813149131501315113152131531315413155131561315713158131591316013161131621316313164131651316613167131681316913170131711317213173131741317513176131771317813179131801318113182131831318413185131861318713188131891319013191131921319313194131951319613197131981319913200132011320213203132041320513206132071320813209132101321113212132131321413215132161321713218132191322013221132221322313224132251322613227132281322913230132311323213233132341323513236132371323813239132401324113242132431324413245132461324713248132491325013251132521325313254132551325613257132581325913260132611326213263132641326513266132671326813269132701327113272132731327413275132761327713278132791328013281132821328313284132851328613287132881328913290132911329213293132941329513296132971329813299133001330113302133031330413305133061330713308133091331013311133121331313314133151331613317133181331913320133211332213323133241332513326133271332813329133301333113332133331333413335133361333713338133391334013341133421334313344133451334613347133481334913350133511335213353133541335513356133571335813359133601336113362133631336413365133661336713368133691337013371133721337313374133751337613377133781337913380133811338213383133841338513386133871338813389133901339113392133931339413395133961339713398133991340013401134021340313404134051340613407134081340913410134111341213413134141341513416134171341813419134201342113422134231342413425134261342713428134291343013431134321343313434134351343613437134381343913440134411344213443134441344513446134471344813449134501345113452134531345413455134561345713458134591346013461134621346313464134651346613467134681346913470134711347213473134741347513476134771347813479134801348113482134831348413485134861348713488134891349013491134921349313494134951349613497134981349913500135011350213503135041350513506135071350813509135101351113512135131351413515135161351713518135191352013521135221352313524135251352613527135281352913530135311353213533135341353513536135371353813539135401354113542135431354413545135461354713548135491355013551135521355313554135551355613557135581355913560135611356213563135641356513566135671356813569135701357113572135731357413575135761357713578135791358013581135821358313584135851358613587135881358913590135911359213593135941359513596135971359813599136001360113602136031360413605136061360713608136091361013611136121361313614136151361613617136181361913620136211362213623136241362513626136271362813629136301363113632136331363413635136361363713638136391364013641136421364313644136451364613647136481364913650136511365213653136541365513656136571365813659136601366113662136631366413665136661366713668136691367013671136721367313674136751367613677136781367913680136811368213683136841368513686136871368813689136901369113692136931369413695136961369713698136991370013701137021370313704137051370613707137081370913710137111371213713137141371513716137171371813719137201372113722137231372413725137261372713728137291373013731137321373313734137351373613737137381373913740137411374213743137441374513746137471374813749137501375113752137531375413755137561375713758137591376013761137621376313764137651376613767137681376913770137711377213773137741377513776137771377813779137801378113782137831378413785137861378713788137891379013791137921379313794137951379613797137981379913800138011380213803138041380513806138071380813809138101381113812138131381413815138161381713818138191382013821138221382313824138251382613827138281382913830138311383213833138341383513836138371383813839138401384113842138431384413845138461384713848138491385013851138521385313854138551385613857138581385913860138611386213863138641386513866138671386813869138701387113872138731387413875138761387713878138791388013881138821388313884138851388613887138881388913890138911389213893138941389513896138971389813899139001390113902139031390413905139061390713908139091391013911139121391313914139151391613917139181391913920139211392213923139241392513926139271392813929139301393113932139331393413935139361393713938139391394013941139421394313944139451394613947139481394913950139511395213953139541395513956139571395813959139601396113962139631396413965139661396713968139691397013971139721397313974139751397613977139781397913980139811398213983139841398513986139871398813989139901399113992139931399413995139961399713998139991400014001140021400314004140051400614007140081400914010140111401214013140141401514016140171401814019140201402114022140231402414025140261402714028140291403014031140321403314034140351403614037140381403914040140411404214043140441404514046140471404814049140501405114052140531405414055140561405714058140591406014061140621406314064140651406614067140681406914070140711407214073140741407514076140771407814079140801408114082140831408414085140861408714088140891409014091140921409314094140951409614097140981409914100141011410214103141041410514106141071410814109141101411114112141131411414115141161411714118141191412014121141221412314124141251412614127141281412914130141311413214133141341413514136141371413814139141401414114142141431414414145141461414714148141491415014151141521415314154141551415614157141581415914160141611416214163141641416514166141671416814169141701417114172141731417414175141761417714178141791418014181141821418314184141851418614187141881418914190141911419214193141941419514196141971419814199142001420114202142031420414205142061420714208142091421014211142121421314214142151421614217142181421914220142211422214223142241422514226142271422814229142301423114232142331423414235142361423714238142391424014241142421424314244142451424614247142481424914250142511425214253142541425514256142571425814259142601426114262142631426414265142661426714268142691427014271142721427314274142751427614277142781427914280142811428214283142841428514286142871428814289142901429114292142931429414295142961429714298142991430014301143021430314304143051430614307143081430914310143111431214313143141431514316143171431814319143201432114322143231432414325143261432714328143291433014331143321433314334143351433614337143381433914340143411434214343143441434514346143471434814349143501435114352143531435414355143561435714358143591436014361143621436314364143651436614367143681436914370143711437214373143741437514376143771437814379143801438114382143831438414385143861438714388143891439014391143921439314394143951439614397143981439914400144011440214403144041440514406144071440814409144101441114412144131441414415144161441714418144191442014421144221442314424144251442614427144281442914430144311443214433144341443514436144371443814439144401444114442144431444414445144461444714448144491445014451144521445314454144551445614457144581445914460144611446214463144641446514466144671446814469144701447114472144731447414475144761447714478144791448014481144821448314484144851448614487144881448914490144911449214493144941449514496144971449814499145001450114502145031450414505145061450714508145091451014511145121451314514145151451614517145181451914520145211452214523145241452514526145271452814529145301453114532145331453414535145361453714538145391454014541145421454314544145451454614547145481454914550145511455214553145541455514556145571455814559145601456114562145631456414565145661456714568145691457014571145721457314574145751457614577145781457914580145811458214583145841458514586145871458814589145901459114592145931459414595 |
- #include "BeefySysLib/util/AllocDebug.h"
- #include "BfCompiler.h"
- #include "BfSystem.h"
- #include "BfParser.h"
- #include "BfReducer.h"
- #include "BfCodeGen.h"
- #include "BfExprEvaluator.h"
- #include <fcntl.h>
- #include "BfConstResolver.h"
- #include "BfMangler.h"
- #include "BeefySysLib/util/PerfTimer.h"
- #include "BeefySysLib/util/BeefPerf.h"
- #include "BfSourceClassifier.h"
- #include "BfAutoComplete.h"
- #include "BfDemangler.h"
- #include "BfResolvePass.h"
- #include "BfFixits.h"
- #include "BfIRCodeGen.h"
- #include "BfDefBuilder.h"
- #include "CeMachine.h"
- //////////////////////////////////////////////////////////////////////////
- int32 GetNumLowZeroBits(int32 n)
- {
- if (n == 0)
- return 32;
- int i = 0;
- while ((n & 1) == 0)
- {
- n = (int32)((uint32)n >> 1);
- i++;
- }
- return i;
- }
- //////////////////////////////////////////////////////////////////////////
- USING_NS_BF;
- BfGenericExtensionEntry* BfModule::BuildGenericExtensionInfo(BfTypeInstance* genericTypeInst, BfTypeDef* partialTypeDef)
- {
- if (!partialTypeDef->IsExtension())
- return NULL;
- if (partialTypeDef->mGenericParamDefs.size() != genericTypeInst->mGenericTypeInfo->mTypeGenericArguments.size())
- {
- AssertErrorState();
- return NULL;
- }
- BfGenericExtensionInfo* genericExtensionInfo = genericTypeInst->mGenericTypeInfo->mGenericExtensionInfo;
- if (genericExtensionInfo == NULL)
- {
- genericExtensionInfo = new BfGenericExtensionInfo();
- genericTypeInst->mGenericTypeInfo->mGenericExtensionInfo = genericExtensionInfo;
- }
- BfTypeState typeState;
- typeState.mPrevState = mContext->mCurTypeState;
- typeState.mType = genericTypeInst;
- typeState.mCurTypeDef = partialTypeDef;
- SetAndRestoreValue<BfTypeState*> prevTypeState(mContext->mCurTypeState, &typeState);
- BfGenericExtensionEntry* genericExEntry;
- genericExtensionInfo->mExtensionMap.TryAdd(partialTypeDef, NULL, &genericExEntry);
- int startDefGenericParamIdx = (int)genericExEntry->mGenericParams.size();
- for (int paramIdx = startDefGenericParamIdx; paramIdx < (int)genericTypeInst->mGenericTypeInfo->mTypeGenericArguments.size(); paramIdx++)
- {
- auto genericParamInstance = new BfGenericTypeParamInstance(partialTypeDef, paramIdx);
- genericParamInstance->mExternType = GetGenericParamType(BfGenericParamKind_Type, paramIdx);
- auto prevPtr = genericExEntry->mGenericParams.mVals;
- genericExEntry->mGenericParams.push_back(genericParamInstance);
- }
- for (int externConstraintIdx = 0; externConstraintIdx < (int)partialTypeDef->mExternalConstraints.size(); externConstraintIdx++)
- {
- auto& genericConstraint = partialTypeDef->mExternalConstraints[externConstraintIdx];
- auto genericParamInstance = new BfGenericTypeParamInstance(partialTypeDef, externConstraintIdx + (int)partialTypeDef->mGenericParamDefs.size());
- genericParamInstance->mExternType = ResolveTypeRef(genericConstraint.mTypeRef, BfPopulateType_Identity);
- auto autoComplete = mCompiler->GetAutoComplete();
- if (autoComplete != NULL)
- autoComplete->CheckTypeRef(genericConstraint.mTypeRef, false);
- if (genericParamInstance->mExternType == NULL)
- genericParamInstance->mExternType = GetPrimitiveType(BfTypeCode_Var);
- ResolveGenericParamConstraints(genericParamInstance, genericTypeInst->IsUnspecializedType());
- genericExEntry->mGenericParams.push_back(genericParamInstance);
- }
- for (int paramIdx = startDefGenericParamIdx; paramIdx < (int)genericTypeInst->mGenericTypeInfo->mTypeGenericArguments.size(); paramIdx++)
- {
- auto genericParamInstance = genericExEntry->mGenericParams[paramIdx];
- auto rootGenericParamInstance = genericTypeInst->mGenericTypeInfo->mGenericParams[paramIdx];
- genericParamInstance->mTypeConstraint = rootGenericParamInstance->mTypeConstraint;
- genericParamInstance->mInterfaceConstraints = rootGenericParamInstance->mInterfaceConstraints;
- genericParamInstance->mGenericParamFlags = (BfGenericParamFlags)(genericParamInstance->mGenericParamFlags | rootGenericParamInstance->mGenericParamFlags);
- ResolveGenericParamConstraints(genericParamInstance, genericTypeInst->IsUnspecializedType());
- }
- for (auto genericParam : genericExEntry->mGenericParams)
- AddDependency(genericParam, mCurTypeInstance);
- return genericExEntry;
- }
- bool BfModule::InitGenericParams(BfType* resolvedTypeRef)
- {
- BfTypeState typeState;
- typeState.mPrevState = mContext->mCurTypeState;
- typeState.mResolveKind = BfTypeState::ResolveKind_BuildingGenericParams;
- typeState.mType = resolvedTypeRef;
- SetAndRestoreValue<BfTypeState*> prevTypeState(mContext->mCurTypeState, &typeState);
- BF_ASSERT(mCurMethodInstance == NULL);
- auto genericTypeInst = resolvedTypeRef->ToGenericTypeInstance();
- genericTypeInst->mGenericTypeInfo->mInitializedGenericParams = true;
- if (genericTypeInst->mGenericTypeInfo->mTypeGenericArguments.IsEmpty())
- return true;
- if (genericTypeInst->mGenericTypeInfo->mTypeGenericArguments[0]->IsGenericParam())
- {
- BF_ASSERT(genericTypeInst->mGenericTypeInfo->mIsUnspecialized);
- }
- auto typeDef = genericTypeInst->mTypeDef;
- int startDefGenericParamIdx = (int)genericTypeInst->mGenericTypeInfo->mGenericParams.size();
- for (int paramIdx = startDefGenericParamIdx; paramIdx < (int)genericTypeInst->mGenericTypeInfo->mTypeGenericArguments.size(); paramIdx++)
- {
- auto genericParamInstance = new BfGenericTypeParamInstance(typeDef, paramIdx);
- genericParamInstance->mExternType = GetGenericParamType(BfGenericParamKind_Type, paramIdx);
- genericTypeInst->mGenericTypeInfo->mGenericParams.push_back(genericParamInstance);
- }
- for (int externConstraintIdx = 0; externConstraintIdx < (int)typeDef->mExternalConstraints.size(); externConstraintIdx++)
- {
- auto genericParamInstance = new BfGenericTypeParamInstance(typeDef, externConstraintIdx + (int)typeDef->mGenericParamDefs.size());
- genericTypeInst->mGenericTypeInfo->mGenericParams.push_back(genericParamInstance);
- }
-
- return true;
- }
- bool BfModule::FinishGenericParams(BfType* resolvedTypeRef)
- {
- BfTypeState typeState;
- typeState.mPrevState = mContext->mCurTypeState;
- typeState.mResolveKind = BfTypeState::ResolveKind_BuildingGenericParams;
- typeState.mType = resolvedTypeRef;
- SetAndRestoreValue<BfTypeState*> prevTypeState(mContext->mCurTypeState, &typeState);
- Array<BfTypeReference*> deferredResolveTypes;
- BF_ASSERT(mCurMethodInstance == NULL);
- auto genericTypeInst = resolvedTypeRef->ToGenericTypeInstance();
- genericTypeInst->mGenericTypeInfo->mFinishedGenericParams = true;
- if (genericTypeInst->mGenericTypeInfo->mTypeGenericArguments[0]->IsGenericParam())
- {
- BF_ASSERT(genericTypeInst->mGenericTypeInfo->mIsUnspecialized);
- }
- auto typeDef = genericTypeInst->mTypeDef;
- int startDefGenericParamIdx = (int)genericTypeInst->mGenericTypeInfo->mGenericParams.size();
- if ((!resolvedTypeRef->IsTuple()) && (!resolvedTypeRef->IsDelegateFromTypeRef()) && (!resolvedTypeRef->IsFunctionFromTypeRef()))
- {
- startDefGenericParamIdx = startDefGenericParamIdx -
- (int)genericTypeInst->mGenericTypeInfo->mTypeGenericArguments.size() -
- (int)typeDef->mExternalConstraints.size();
- }
- BF_ASSERT(startDefGenericParamIdx >= 0);
- if (!typeDef->mPartials.empty())
- {
- BitSet prevConstraintsPassedSet;
- if (!genericTypeInst->IsUnspecializedType())
- {
- if (genericTypeInst->mGenericTypeInfo->mGenericExtensionInfo != NULL)
- {
- auto genericExtensionInfo = genericTypeInst->mGenericTypeInfo->mGenericExtensionInfo;
- prevConstraintsPassedSet = genericExtensionInfo->mConstraintsPassedSet;
- genericExtensionInfo->mConstraintsPassedSet.Clear();
- }
- }
- int extensionCount = 0;
- BfLogSysM("BfModule::FinishGenericParams %p\n", resolvedTypeRef);
- for (auto partialTypeDef : typeDef->mPartials)
- {
- if (!partialTypeDef->IsExtension())
- {
- typeState.mCurTypeDef = partialTypeDef;
- for (int paramIdx = startDefGenericParamIdx; paramIdx < (int)genericTypeInst->mGenericTypeInfo->mGenericParams.size(); paramIdx++)
- {
- auto genericParamInstance = genericTypeInst->mGenericTypeInfo->mGenericParams[paramIdx];
- auto genericParamDef = genericParamInstance->GetGenericParamDef();
- if (paramIdx < (int)typeDef->mGenericParamDefs.size())
- {
- genericParamInstance->mExternType = GetGenericParamType(BfGenericParamKind_Type, paramIdx);
- }
- else
- {
- auto externConstraintDef = genericParamInstance->GetExternConstraintDef();
- genericParamInstance->mExternType = ResolveTypeRef(externConstraintDef->mTypeRef);
- if (genericParamInstance->mExternType == NULL)
- genericParamInstance->mExternType = GetPrimitiveType(BfTypeCode_Var);
- }
- ResolveGenericParamConstraints(genericParamInstance, genericTypeInst->IsUnspecializedType(), &deferredResolveTypes);
- if (genericParamDef != NULL)
- {
- for (auto nameNode : genericParamDef->mNameNodes)
- {
- HandleTypeGenericParamRef(nameNode, typeDef, paramIdx);
- }
- }
- }
- }
- else
- {
- auto genericExEntry = BuildGenericExtensionInfo(genericTypeInst, partialTypeDef);
- if (genericExEntry == NULL)
- continue;
- auto genericExtensionInfo = genericTypeInst->mGenericTypeInfo->mGenericExtensionInfo;
- if (extensionCount == 0)
- genericExtensionInfo->mConstraintsPassedSet.Resize(typeDef->mPartials.mSize);
- extensionCount++;
-
- if (!genericTypeInst->IsUnspecializedType())
- {
- SetAndRestoreValue<bool> prevIgnoreErrors(mIgnoreErrors, true);
- for (int paramIdx = 0; paramIdx < genericExEntry->mGenericParams.size(); paramIdx++)
- {
- auto genericParamInstance = genericExEntry->mGenericParams[paramIdx];
- BfGenericParamSource genericParamSource;
- genericParamSource.mCheckAccessibility = false;
- genericParamSource.mTypeInstance = genericTypeInst;
- BfError* error = NULL;
- BfType* genericArg;
- if (paramIdx < (int)genericTypeInst->mGenericTypeInfo->mTypeGenericArguments.size())
- {
- genericArg = genericTypeInst->mGenericTypeInfo->mTypeGenericArguments[paramIdx];
- }
- else
- {
- genericArg = genericParamInstance->mExternType;
- }
- if ((genericArg == NULL) || (!CheckGenericConstraints(genericParamSource, genericArg, NULL, genericParamInstance, NULL, &error)))
- {
- genericExEntry->mConstraintsPassed = false;
- }
- }
- }
- if (genericExEntry->mConstraintsPassed)
- genericExtensionInfo->mConstraintsPassedSet.Set(partialTypeDef->mPartialIdx);
- BfLogSysM("BfModule::FinishGenericParams %p partialTypeDef:%p passed:%d\n", resolvedTypeRef, partialTypeDef, genericExEntry->mConstraintsPassed);
- }
- }
- auto genericExtensionInfo = genericTypeInst->mGenericTypeInfo->mGenericExtensionInfo;
- if ((extensionCount > 0) && (!prevConstraintsPassedSet.IsEmpty()) && (genericExtensionInfo->mConstraintsPassedSet != prevConstraintsPassedSet))
- {
- mContext->RebuildDependentTypes_MidCompile(genericTypeInst, "mConstraintsPassedSet changed");
- }
- }
- else
- {
- for (int paramIdx = startDefGenericParamIdx; paramIdx < (int)genericTypeInst->mGenericTypeInfo->mGenericParams.size(); paramIdx++)
- {
- auto genericParamInstance = genericTypeInst->mGenericTypeInfo->mGenericParams[paramIdx];
- if (paramIdx < (int)typeDef->mGenericParamDefs.size())
- {
- genericParamInstance->mExternType = GetGenericParamType(BfGenericParamKind_Type, paramIdx);
- }
- else
- {
- auto externConstraintDef = genericParamInstance->GetExternConstraintDef();
- genericParamInstance->mExternType = ResolveTypeRef(externConstraintDef->mTypeRef);
- auto autoComplete = mCompiler->GetAutoComplete();
- if (autoComplete != NULL)
- autoComplete->CheckTypeRef(externConstraintDef->mTypeRef, false);
- if (genericParamInstance->mExternType != NULL)
- {
- //
- }
- else
- genericParamInstance->mExternType = GetPrimitiveType(BfTypeCode_Var);
- }
- ResolveGenericParamConstraints(genericParamInstance, genericTypeInst->IsUnspecializedType(), &deferredResolveTypes);
- auto genericParamDef = genericParamInstance->GetGenericParamDef();
- if (genericParamDef != NULL)
- {
- for (auto nameNode : genericParamDef->mNameNodes)
- {
- HandleTypeGenericParamRef(nameNode, typeDef, paramIdx);
- }
- }
- }
- }
- for (auto typeRef : deferredResolveTypes)
- auto constraintType = ResolveTypeRef(typeRef, BfPopulateType_Declaration, BfResolveTypeRefFlag_None);
- for (auto genericParam : genericTypeInst->mGenericTypeInfo->mGenericParams)
- AddDependency(genericParam, mCurTypeInstance);
- return true;
- }
- bool BfModule::ValidateGenericConstraints(BfAstNode* typeRef, BfTypeInstance* genericTypeInst, bool ignoreErrors)
- {
- if ((mCurTypeInstance != NULL) && (mCurTypeInstance->IsTypeAlias()) && (mCurTypeInstance->IsGenericTypeInstance()))
- {
- // Don't validate constraints during the population of a concrete generic type alias instance, we want to
- // throw those errors at the usage sites
- return true;
- }
- // We don't validate constraints for things like Tuples/Delegates
- if (genericTypeInst->IsOnDemand())
- return true;
- SetAndRestoreValue<bool> prevIgnoreErrors(mIgnoreErrors, mIgnoreErrors || ignoreErrors);
- genericTypeInst->mGenericTypeInfo->mValidatedGenericConstraints = true;
- if (!genericTypeInst->mGenericTypeInfo->mFinishedGenericParams)
- PopulateType(genericTypeInst, BfPopulateType_Interfaces);
- if (genericTypeInst->IsTypeAlias())
- {
- auto underlyingType = genericTypeInst->GetUnderlyingType();
- if ((underlyingType != NULL) && (underlyingType->IsGenericTypeInstance()))
- {
- auto underlyingGenericType = underlyingType->ToGenericTypeInstance();
- PopulateType(underlyingType, BfPopulateType_Declaration);
- bool result = ValidateGenericConstraints(typeRef, underlyingGenericType, ignoreErrors);
- if (underlyingGenericType->mGenericTypeInfo->mHadValidateErrors)
- genericTypeInst->mGenericTypeInfo->mHadValidateErrors = true;
- return result;
- }
- return true;
- }
- for (auto typeArg : genericTypeInst->mGenericTypeInfo->mTypeGenericArguments)
- {
- auto genericArg = typeArg->ToGenericTypeInstance();
- if (genericArg != NULL)
- genericTypeInst->mGenericTypeInfo->mMaxGenericDepth = BF_MAX(genericTypeInst->mGenericTypeInfo->mMaxGenericDepth, genericArg->mGenericTypeInfo->mMaxGenericDepth + 1);
- }
-
- auto typeDef = genericTypeInst->mTypeDef;
- int startGenericParamIdx = 0;
- if (typeDef->mOuterType != NULL)
- {
- startGenericParamIdx = typeDef->mOuterType->mGenericParamDefs.mSize + typeDef->mOuterType->mExternalConstraints.mSize;
- auto outerType = GetOuterType(genericTypeInst);
- PopulateType(outerType, BfPopulateType_Declaration);
- if ((outerType->mGenericTypeInfo != NULL) && (outerType->mGenericTypeInfo->mHadValidateErrors))
- genericTypeInst->mGenericTypeInfo->mHadValidateErrors = true;
- }
- for (int paramIdx = startGenericParamIdx; paramIdx < (int)genericTypeInst->mGenericTypeInfo->mGenericParams.size(); paramIdx++)
- {
- auto genericParamInstance = genericTypeInst->mGenericTypeInfo->mGenericParams[paramIdx];
-
- BfType* genericArg;
- if (paramIdx < (int)genericTypeInst->mGenericTypeInfo->mTypeGenericArguments.size())
- {
- genericArg = genericTypeInst->mGenericTypeInfo->mTypeGenericArguments[paramIdx];
- }
- else
- {
- genericArg = genericParamInstance->mExternType;
- }
- BfError* error = NULL;
- if ((genericArg == NULL) || (!CheckGenericConstraints(BfGenericParamSource(genericTypeInst), genericArg, typeRef, genericParamInstance, NULL, &error)))
- {
- if (!genericTypeInst->IsUnspecializedTypeVariation())
- genericTypeInst->mGenericTypeInfo->mHadValidateErrors = true;
- return false;
- }
- }
- return true;
- }
- BfType* BfModule::ResolveGenericMethodTypeRef(BfTypeReference* typeRef, BfMethodInstance* methodInstance, BfGenericParamInstance* genericParamInstance, BfTypeVector* methodGenericArgsOverride)
- {
- BfConstraintState constraintSet;
- constraintSet.mPrevState = mContext->mCurConstraintState;
- constraintSet.mGenericParamInstance = genericParamInstance;
- constraintSet.mMethodInstance = methodInstance;
- constraintSet.mMethodGenericArgsOverride = methodGenericArgsOverride;
- SetAndRestoreValue<BfConstraintState*> prevConstraintSet(mContext->mCurConstraintState, &constraintSet);
- if (!CheckConstraintState(NULL))
- return NULL;
- SetAndRestoreValue<BfMethodInstance*> prevMethodInstance(mCurMethodInstance, methodInstance);
- SetAndRestoreValue<BfTypeInstance*> prevTypeInstance(mCurTypeInstance, methodInstance->GetOwner());
- SetAndRestoreValue<bool> prevIgnoreErrors(mIgnoreErrors, true);
- BfType* type = ResolveTypeRef(typeRef);
- if (type == NULL)
- type = GetPrimitiveType(BfTypeCode_Var);
- return type;
- }
- bool BfModule::AreConstraintsSubset(BfGenericParamInstance* checkInner, BfGenericParamInstance* checkOuter)
- {
- if (checkOuter == NULL)
- return false;
- if (checkInner == NULL)
- return true;
- // Added new flags?
- if ((checkInner->mGenericParamFlags | checkOuter->mGenericParamFlags) != checkOuter->mGenericParamFlags)
- {
- // If the outer had a type flag and the inner has a specific type constraint, then see if those are compatible
- auto outerFlags = checkOuter->mGenericParamFlags;
- if ((outerFlags & BfGenericParamFlag_Enum) != 0)
- outerFlags = (BfGenericParamFlags)(outerFlags | BfGenericParamFlag_Struct);
- if (checkOuter->mTypeConstraint != NULL)
- {
- if (checkOuter->mTypeConstraint->IsStruct())
- outerFlags = (BfGenericParamFlags)(outerFlags | BfGenericParamFlag_Struct);
- else if (checkOuter->mTypeConstraint->IsStructOrStructPtr())
- outerFlags = (BfGenericParamFlags)(outerFlags | BfGenericParamFlag_StructPtr);
- else if (checkOuter->mTypeConstraint->IsObject())
- outerFlags = (BfGenericParamFlags)(outerFlags | BfGenericParamFlag_Class);
- else if (checkOuter->mTypeConstraint->IsEnum())
- outerFlags = (BfGenericParamFlags)(outerFlags | BfGenericParamFlag_Enum | BfGenericParamFlag_Struct);
- else if (checkOuter->mTypeConstraint->IsInterface())
- outerFlags = (BfGenericParamFlags)(outerFlags | BfGenericParamFlag_Interface);
- }
- auto innerFlags = checkInner->mGenericParamFlags;
- if ((innerFlags & BfGenericParamFlag_Enum) != 0)
- innerFlags = (BfGenericParamFlags)(innerFlags | BfGenericParamFlag_Struct);
- if (((innerFlags | outerFlags) & ~BfGenericParamFlag_Var) != (outerFlags & ~BfGenericParamFlag_Var))
- return false;
- }
- if (checkInner->mTypeConstraint != NULL)
- {
- if (checkOuter->mTypeConstraint == NULL)
- return false;
- if (!TypeIsSubTypeOf(checkOuter->mTypeConstraint->ToTypeInstance(), checkInner->mTypeConstraint->ToTypeInstance()))
- return false;
- }
-
- for (auto innerIFace : checkInner->mInterfaceConstraints)
- {
- if (checkOuter->mInterfaceConstraints.IsEmpty())
- return false;
- if (checkOuter->mInterfaceConstraintSet == NULL)
- {
- std::function<void(BfTypeInstance*)> _AddInterface = [&](BfTypeInstance* ifaceType)
- {
- if (!checkOuter->mInterfaceConstraintSet->Add(ifaceType))
- return;
- if (ifaceType->mDefineState < BfTypeDefineState_HasInterfaces)
- PopulateType(ifaceType);
- for (auto& ifaceEntry : ifaceType->mInterfaces)
- _AddInterface(ifaceEntry.mInterfaceType);
- };
-
- checkOuter->mInterfaceConstraintSet = new HashSet<BfTypeInstance*>();
- for (auto outerIFace : checkOuter->mInterfaceConstraints)
- _AddInterface(outerIFace);
- }
- if (!checkOuter->mInterfaceConstraintSet->Contains(innerIFace))
- return false;
- }
- for (auto& innerOp : checkInner->mOperatorConstraints)
- {
- if (!checkOuter->mOperatorConstraints.Contains(innerOp))
- return false;
- }
- return true;
- }
- bool BfModule::CheckConstraintState(BfAstNode* refNode)
- {
- if (mContext->mCurConstraintState == NULL)
- return true;
- auto checkState = mContext->mCurConstraintState->mPrevState;
- while (checkState != NULL)
- {
- if (*checkState == *mContext->mCurConstraintState)
- {
- if (refNode != NULL)
- {
- Fail("Constraints cause circular operator invocations", refNode);
- }
- return false;
- }
- checkState = checkState->mPrevState;
- }
- return true;
- }
- bool BfModule::ShouldAllowMultipleDefinitions(BfTypeInstance* typeInst, BfTypeDef* firstDeclaringTypeDef, BfTypeDef* secondDeclaringTypeDef)
- {
- if (firstDeclaringTypeDef == secondDeclaringTypeDef)
- return false;
- // Since we will use shared debugging info, we won't be able to differentiate between these two fields.
- // If we created per-target debug info then we could "fix" this.
- // Can these projects even see each other?
- if ((!firstDeclaringTypeDef->mProject->ContainsReference(secondDeclaringTypeDef->mProject)) &&
- (!secondDeclaringTypeDef->mProject->ContainsReference(firstDeclaringTypeDef->mProject)))
- return true;
- if (typeInst->IsUnspecializedType())
- {
- bool alwaysCoincide = true;
- auto genericTypeInst = (BfTypeInstance*)typeInst;
- if (genericTypeInst->mGenericTypeInfo->mGenericExtensionInfo != NULL)
- {
- auto firstConstraints = genericTypeInst->GetGenericParamsVector(firstDeclaringTypeDef);
- auto secondConstraints = genericTypeInst->GetGenericParamsVector(secondDeclaringTypeDef);
- for (int genericIdx = 0; genericIdx < (int)firstConstraints->size(); genericIdx++)
- {
- auto firstConstraint = (*firstConstraints)[genericIdx];
- auto secondConstraint = (*secondConstraints)[genericIdx];
- if ((!AreConstraintsSubset(firstConstraint, secondConstraint)) &&
- (!AreConstraintsSubset(secondConstraint, firstConstraint)))
- alwaysCoincide = false;
- }
- }
- // Only show an error if we are certain both members will always appear at the same time
- if (!alwaysCoincide)
- return true;
- }
- return false;
- }
- void BfModule::CheckInjectNewRevision(BfTypeInstance* typeInstance)
- {
- if ((typeInstance != NULL) && (typeInstance->mTypeDef != NULL))
- {
- auto typeDef = typeInstance->mTypeDef;
- if (typeDef->mEmitParent != NULL)
- typeDef = typeDef->mEmitParent;
- if (typeDef->mNextRevision != NULL)
- {
- // It's possible that our main compiler thread is generating a new typedef while we're autocompleting. This handles that case...
- if (typeInstance->mDefineState == BfTypeDefineState_Undefined)
- {
- if (typeInstance->IsBoxed())
- {
- BfBoxedType* boxedType = (BfBoxedType*)typeInstance;
- BfTypeInstance* innerType = boxedType->mElementType->ToTypeInstance();
- PopulateType(innerType, BfPopulateType_Data);
- }
- else
- {
- mContext->HandleChangedTypeDef(typeDef);
- mSystem->InjectNewRevision(typeDef);
- }
- }
- else
- {
- BF_ASSERT(mCompiler->IsAutocomplete());
- }
- }
- if ((!typeInstance->IsDeleting()) && (!mCompiler->IsAutocomplete()))
- BF_ASSERT((typeDef->mDefState == BfTypeDef::DefState_Defined) || (typeDef->mDefState == BfTypeDef::DefState_New));
- if ((typeInstance->mTypeDef->mDefState == BfTypeDef::DefState_EmittedDirty) && (typeInstance->mTypeDef->mEmitParent->mNextRevision == NULL))
- mSystem->UpdateEmittedTypeDef(typeInstance->mTypeDef);
- }
- }
- void BfModule::InitType(BfType* resolvedTypeRef, BfPopulateType populateType)
- {
- BP_ZONE("BfModule::InitType");
-
- if (auto depType = resolvedTypeRef->ToDependedType())
- {
- if ((mCurMethodInstance != NULL) && (mCurMethodInstance->mMethodInfoEx != NULL))
- {
- depType->mDependencyMap.mMinDependDepth = mCurMethodInstance->mMethodInfoEx->mMinDependDepth + 1;
- }
- else if (mCurTypeInstance != NULL)
- {
- depType->mDependencyMap.mMinDependDepth = mCurTypeInstance->mDependencyMap.mMinDependDepth + 1;
- }
- }
- SetAndRestoreValue<BfTypeInstance*> prevTypeInstance(mCurTypeInstance, resolvedTypeRef->ToTypeInstance());
- SetAndRestoreValue<BfMethodInstance*> prevMethodInstance(mCurMethodInstance, NULL);
- if (mCompiler->mHotState != NULL)
- mCompiler->mHotState->mHasNewTypes = true;
- auto typeInst = resolvedTypeRef->ToTypeInstance();
- if (typeInst != NULL)
- {
- CheckInjectNewRevision(typeInst);
- BF_ASSERT(!typeInst->mTypeDef->IsEmitted());
- if (typeInst->mBaseType != NULL)
- BF_ASSERT((typeInst->mBaseType->mRebuildFlags & BfTypeRebuildFlag_Deleted) == 0);
- if ((typeInst->mTypeDef != NULL) && (typeInst->mTypeDef->mDefState == BfTypeDef::DefState_New) &&
- (typeInst->mTypeDef->mNextRevision == NULL))
- {
- mContext->HandleChangedTypeDef(typeInst->mTypeDef);
- typeInst->mTypeDef->mDefState = BfTypeDef::DefState_Defined;
- }
- typeInst->mIsReified = mIsReified;
- //BF_ASSERT(typeInst->mTypeDef->mTypeCode != BfTypeCode_Extension);
-
- typeInst->mRevision = mCompiler->mRevision;
- if (typeInst->mTypeDef != NULL)
- BF_ASSERT(typeInst->mTypeDef->mDefState != BfTypeDef::DefState_Deleted);
- if (resolvedTypeRef->IsTuple())
- {
- auto tupleType = (BfTypeInstance*)resolvedTypeRef;
- for (int fieldIdx = 0; fieldIdx < (int)tupleType->mFieldInstances.size(); fieldIdx++)
- {
- auto fieldInstance = (BfFieldInstance*)&tupleType->mFieldInstances[fieldIdx];
- // We need to make sure dependencies get set immediately since we already resolved the types
- AddFieldDependency(typeInst, fieldInstance, fieldInstance->mResolvedType);
- }
- }
- }
- if (resolvedTypeRef->IsGenericTypeInstance())
- {
- auto genericTypeInst = (BfTypeInstance*)resolvedTypeRef;
- for (auto typeGenericArg : genericTypeInst->mGenericTypeInfo->mTypeGenericArguments)
- {
- BF_ASSERT((typeGenericArg->mRebuildFlags & BfTypeRebuildFlag_Deleted) == 0);
- if (mIsReified)
- {
- // Try to reify any generic args
- for (auto genericArg : typeInst->mGenericTypeInfo->mTypeGenericArguments)
- {
- if (!genericArg->IsReified())
- PopulateType(genericArg, BfPopulateType_Declaration);
- }
- }
- BF_ASSERT(!typeGenericArg->IsIntUnknown());
- }
- }
- if (!mContext->mSavedTypeDataMap.IsEmpty())
- {
- String typeName = BfSafeMangler::Mangle(resolvedTypeRef, this);
- BfSavedTypeData* savedTypeData;
- if (mContext->mSavedTypeDataMap.Remove(typeName, &savedTypeData))
- {
- mContext->mSavedTypeData[savedTypeData->mTypeId] = NULL;
- resolvedTypeRef->mTypeId = savedTypeData->mTypeId;
- BfLogSysM("Using mSavedTypeData for %p %s\n", resolvedTypeRef, typeName.c_str());
- if (typeInst != NULL)
- {
- if (IsHotCompile())
- {
- BfLogSysM("Using mSavedTypeData HotTypeData %p for %p\n", savedTypeData->mHotTypeData, resolvedTypeRef);
- typeInst->mHotTypeData = savedTypeData->mHotTypeData;
- savedTypeData->mHotTypeData = NULL;
- }
- }
- delete savedTypeData;
- mContext->mTypes[resolvedTypeRef->mTypeId] = resolvedTypeRef;
- }
- else
- {
- BfLogSysM("No mSavedTypeData entry for %p %s\n", resolvedTypeRef, typeName.c_str());
- }
- }
- resolvedTypeRef->mContext = mContext;
- if (resolvedTypeRef->IsGenericTypeInstance())
- {
- auto genericTypeInstance = (BfTypeInstance*)resolvedTypeRef;
- #ifdef _DEBUG
- for (auto genericArg : genericTypeInstance->mGenericTypeInfo->mTypeGenericArguments)
- BF_ASSERT(!genericArg->IsVar());
- #endif
- // Do it here so the location we attempted to specialize this type will throw the failure if there is one
- if (!InitGenericParams(resolvedTypeRef))
- return;
- }
- BfLogSysM("%p InitType: %s Type: %p TypeDef: %p Revision:%d\n", mContext, TypeToString(resolvedTypeRef).c_str(), resolvedTypeRef, (typeInst != NULL) ? typeInst->mTypeDef : NULL, mCompiler->mRevision);
- // When we're autocomplete, we can't do the method processing so we have to add this type to the type work list
- if (((populateType < BfPopulateType_Full) || (mCompiler->IsAutocomplete())) /*&& (!resolvedTypeRef->IsUnspecializedTypeVariation())*/ && (resolvedTypeRef->IsTypeInstance()) &&
- (!resolvedTypeRef->IsTypeAlias()))
- {
- BfTypeProcessRequest* typeProcessRequest = mContext->mPopulateTypeWorkList.Alloc();
- typeProcessRequest->mType = resolvedTypeRef;
- BF_ASSERT(resolvedTypeRef->mContext == mContext);
- mCompiler->mStats.mTypesQueued++;
- mCompiler->UpdateCompletion();
- }
- PopulateType(resolvedTypeRef, populateType);
- }
- void BfModule::AddFieldDependency(BfTypeInstance* typeInstance, BfFieldInstance* fieldInstance, BfType* fieldType)
- {
- auto depFlag = fieldType->IsValueType() ? BfDependencyMap::DependencyFlag_ValueTypeMemberData : BfDependencyMap::DependencyFlag_PtrMemberData;
- AddDependency(fieldType, typeInstance, depFlag);
- if ((fieldType->IsStruct()) && (fieldType->IsGenericTypeInstance()))
- {
- // When we're a generic struct, our data layout can depend on our generic parameters as well
- auto genericTypeInstance = (BfTypeInstance*)fieldType;
- for (auto typeGenericArg : genericTypeInstance->mGenericTypeInfo->mTypeGenericArguments)
- AddFieldDependency(typeInstance, fieldInstance, typeGenericArg);
- }
- }
- BfFieldInstance* BfModule::GetFieldByName(BfTypeInstance* typeInstance, const StringImpl& fieldName, bool isRequired, BfAstNode* refNode)
- {
- PopulateType(typeInstance);
- typeInstance->mTypeDef->PopulateMemberSets();
- BfMemberSetEntry* entry = NULL;
- BfFieldDef* fieldDef = NULL;
- if (typeInstance->mTypeDef->mFieldSet.TryGetWith(fieldName, &entry))
- {
- fieldDef = (BfFieldDef*)entry->mMemberDef;
- return &typeInstance->mFieldInstances[fieldDef->mIdx];
- }
- if (isRequired)
- {
- FailInternal(StrFormat("Field '%s' not found in '%s'", fieldName.c_str(), TypeToString(typeInstance).c_str()), refNode);
- }
- return NULL;
- }
- void BfModule::CheckMemberNames(BfTypeInstance* typeInst)
- {
- struct MemberRef
- {
- BfMemberDef* mMemberDef;
- String mName;
- String mKindName;
- BfTypeInstance* mTypeInst;
- BfAstNode* mNameNode;
- BfProtection mProtection;
- BfTypeDef* mDeclaringType;
- bool mIsOverride;
- };
- SizedArray<MemberRef, 64> memberList;
-
- // Check base types first and then current type
- auto checkType = typeInst;
- while (checkType != NULL)
- {
- for (auto prop : checkType->mTypeDef->mProperties)
- {
- BfPropertyDeclaration* propDecl = (BfPropertyDeclaration*)prop->mFieldDeclaration;
- if ((propDecl != NULL) && (propDecl->mExplicitInterface != NULL))
- continue;
- if (!typeInst->IsTypeMemberIncluded(prop->mDeclaringType))
- continue;
- MemberRef memberRef = { 0 };
- memberRef.mMemberDef = prop;
- memberRef.mTypeInst = checkType;
- memberRef.mProtection = prop->mProtection;
- memberRef.mName = prop->mName;
- memberRef.mKindName = "property";
- if (prop->mFieldDeclaration != NULL)
- memberRef.mNameNode = prop->mFieldDeclaration->mNameNode;
- memberRef.mDeclaringType = prop->mDeclaringType;
- auto propertyDeclaration = BfNodeDynCast<BfPropertyDeclaration>(prop->mFieldDeclaration);
- if (propertyDeclaration != NULL)
- memberRef.mIsOverride = (propertyDeclaration->mNewSpecifier != NULL) ||
- ((propertyDeclaration->mVirtualSpecifier != NULL) && (propertyDeclaration->mVirtualSpecifier->GetToken() == BfToken_Override));
- memberList.push_back(memberRef);
- }
- for (auto field : checkType->mTypeDef->mFields)
- {
- if (!typeInst->IsTypeMemberIncluded(field->mDeclaringType))
- continue;
- MemberRef memberRef = { 0 };
- memberRef.mMemberDef = field;
- memberRef.mTypeInst = checkType;
- memberRef.mProtection = field->mProtection;
- memberRef.mName = field->mName;
- memberRef.mKindName = "field";
- memberRef.mDeclaringType = field->mDeclaringType;
- if (field->mFieldDeclaration != NULL)
- {
- memberRef.mNameNode = field->mFieldDeclaration->mNameNode;
- memberRef.mIsOverride = field->mFieldDeclaration->mNewSpecifier != NULL;
- }
- memberList.push_back(memberRef);
- }
- checkType = checkType->mBaseType;
- }
- Dictionary<String, MemberRef> memberMap;
- memberMap.Reserve(memberList.size());
- for (int i = (int)memberList.size() - 1; i >= 0; i--)
- {
- MemberRef& memberRef = memberList[i];
- if (memberRef.mName.empty())
- continue;
- if ((memberRef.mTypeInst == typeInst) && (!memberRef.mIsOverride))
- {
- MemberRef* prevMemberRef = NULL;
- if (memberMap.TryGetValue(memberRef.mName, &prevMemberRef))
- {
- //auto& prevMemberRef = itr->second;
-
- MemberRef* firstMemberRef = &memberRef;
- MemberRef* secondMemberRef = prevMemberRef;
- bool showPrevious = false;
- BfError* error = NULL;
- if (prevMemberRef->mTypeInst != typeInst)
- {
- if ((prevMemberRef->mProtection != BfProtection_Private) && (memberRef.mNameNode != NULL))
- {
- error = Warn(BfWarning_CS0108_MemberHidesInherited, StrFormat("%s hides inherited member '%s'. Use the 'new' keyword if hiding was intentional.", prevMemberRef->mKindName.c_str(), memberRef.mName.c_str()), memberRef.mNameNode, true);
- showPrevious = true;
- }
- }
- else
- {
- if (ShouldAllowMultipleDefinitions(typeInst, firstMemberRef->mDeclaringType, secondMemberRef->mDeclaringType))
- {
- if (firstMemberRef->mMemberDef != NULL)
- {
- firstMemberRef->mMemberDef->mHasMultiDefs = true;
- secondMemberRef->mMemberDef->mHasMultiDefs = true;
- }
- continue;
- }
- bool wantsSwap = false;
- if ((secondMemberRef->mNameNode != NULL) && (firstMemberRef->mNameNode != NULL) &&
- (secondMemberRef->mNameNode->GetSourceData() == firstMemberRef->mNameNode->GetSourceData()) &&
- (secondMemberRef->mNameNode->GetSrcStart() < firstMemberRef->mNameNode->GetSrcStart()))
- {
- wantsSwap = true;
- }
- if (secondMemberRef->mDeclaringType->IsExtension() != firstMemberRef->mDeclaringType->IsExtension())
- {
- wantsSwap = firstMemberRef->mDeclaringType->IsExtension();
- }
- if (wantsSwap)
- {
- std::swap(firstMemberRef, secondMemberRef);
- }
-
- if (typeInst->mTypeDef->mIsCombinedPartial)
- {
- if ((firstMemberRef->mKindName == "property") && (secondMemberRef->mKindName == "property"))
- {
- auto firstPropertyDef = (BfPropertyDef*)firstMemberRef->mMemberDef;
- auto secondPropertyDef = (BfPropertyDef*)secondMemberRef->mMemberDef;
- if (auto secondPropertyDeclaration = BfNodeDynCast<BfPropertyDeclaration>(secondPropertyDef->mFieldDeclaration))
- {
- if ((secondPropertyDeclaration->mVirtualSpecifier != NULL) && (secondPropertyDeclaration->mVirtualSpecifier->mToken == BfToken_Override))
- continue;
- }
- }
- }
- if (secondMemberRef->mNameNode != NULL)
- error = Fail(StrFormat("A %s named '%s' has already been declared.", secondMemberRef->mKindName.c_str(), memberRef.mName.c_str()), secondMemberRef->mNameNode, true);
- showPrevious = true;
- typeInst->mHasDeclError = true;
- }
- if ((secondMemberRef->mNameNode != NULL) && (error != NULL))
- mCompiler->mPassInstance->MoreInfo("Previous declaration", firstMemberRef->mNameNode);
- }
- }
- memberMap.TryAdd(memberRef.mName, memberRef);
- }
- }
- void BfModule::TypeFailed(BfTypeInstance* typeInstance)
- {
- BfLogSysM("TypeFailed: %p\n", typeInstance);
- typeInstance->mTypeFailed = true;
- // Punt on field types - just substitute 'var' where we have NULLs
- for (auto& fieldInstance : typeInstance->mFieldInstances)
- {
- if ((fieldInstance.mResolvedType == NULL) || (fieldInstance.mResolvedType->IsNull()))
- {
- if (fieldInstance.mDataIdx >= 0)
- fieldInstance.mResolvedType = GetPrimitiveType(BfTypeCode_Var);
- }
- if (fieldInstance.mOwner == NULL)
- fieldInstance.mOwner = typeInstance;
- }
- if (typeInstance->mAlign == -1)
- typeInstance->mAlign = 1;
- if (typeInstance->mSize == -1)
- typeInstance->mSize = 1;
- mContext->mFailTypes.Add(typeInstance);
- mHadBuildError = true;
- }
- bool BfModule::CheckCircularDataError()
- {
- // Find two loops of mCurTypeInstance. Just finding one loop can give some false errors.
- BfTypeState* circularTypeStateEnd = NULL;
- int checkIdx = 0;
- auto checkTypeState = mContext->mCurTypeState;
- bool isPreBaseCheck = checkTypeState->mPopulateType == BfPopulateType_Declaration;
- while (true)
- {
- if (checkTypeState == NULL)
- return false;
- if (checkTypeState->mResolveKind == BfTypeState::ResolveKind_UnionInnerType)
- {
- checkTypeState = checkTypeState->mPrevState;
- continue;
- }
- if (isPreBaseCheck)
- {
- if (checkTypeState->mPopulateType != BfPopulateType_Declaration)
- return false;
- }
- else
- {
- if (checkTypeState->mPopulateType == BfPopulateType_Declaration)
- return false;
- if ((checkIdx > 0) && (checkTypeState->mCurBaseTypeRef == NULL) && (checkTypeState->mCurAttributeTypeRef == NULL) && (checkTypeState->mCurFieldDef == NULL) &&
- ((checkTypeState->mType == NULL) || (checkTypeState->mType->IsTypeInstance())))
- return false;
- }
- if ((checkTypeState->mType == mCurTypeInstance) && (checkIdx > 1))
- {
- if (circularTypeStateEnd == NULL)
- circularTypeStateEnd = checkTypeState;
- else
- break;
- }
- checkTypeState = checkTypeState->mPrevState;
- checkIdx++;
- }
- bool hadError = false;
- checkTypeState = mContext->mCurTypeState->mPrevState;
- while (true)
- {
- if (checkTypeState == NULL)
- return hadError;
- if (checkTypeState == circularTypeStateEnd)
- return hadError;
- if (checkTypeState->mResolveKind == BfTypeState::ResolveKind_UnionInnerType)
- {
- // Skip over this to actual data references
- checkTypeState = checkTypeState->mPrevState;
- continue;
- }
- if ((checkTypeState->mCurAttributeTypeRef == NULL) && (checkTypeState->mCurBaseTypeRef == NULL) && (checkTypeState->mCurFieldDef == NULL) &&
- ((checkTypeState->mType == NULL) || (checkTypeState->mType->IsTypeInstance())))
- return hadError;
- // We only get one chance to fire off these errors, they can't be ignored.
- SetAndRestoreValue<bool> prevIgnoreErrors(mIgnoreErrors, false);
- hadError = true;
- if (checkTypeState->mCurAttributeTypeRef != NULL)
- {
- Fail(StrFormat("Attribute type '%s' causes a data cycle", BfTypeUtils::TypeToString(checkTypeState->mCurAttributeTypeRef).c_str()), checkTypeState->mCurAttributeTypeRef, true);
- }
- else if (checkTypeState->mCurBaseTypeRef != NULL)
- {
- Fail(StrFormat("Base type '%s' causes a data cycle", BfTypeUtils::TypeToString(checkTypeState->mCurBaseTypeRef).c_str()), checkTypeState->mCurBaseTypeRef, true);
- }
- else if ((checkTypeState->mCurFieldDef != NULL) && (checkTypeState->mCurFieldDef->mFieldDeclaration != NULL))
- {
- Fail(StrFormat("Field '%s.%s' causes a data cycle", TypeToString(checkTypeState->mType).c_str(), checkTypeState->mCurFieldDef->mName.c_str()),
- checkTypeState->mCurFieldDef->mFieldDeclaration->mTypeRef, true);
- }
- else if (checkTypeState->mCurFieldDef != NULL)
- {
- Fail(StrFormat("Field '%s.%s' causes a data cycle", TypeToString(checkTypeState->mType).c_str(), checkTypeState->mCurFieldDef->mName.c_str()));
- }
- else
- {
- Fail(StrFormat("Type '%s' causes a data cycle", TypeToString(checkTypeState->mType).c_str()));
- }
- auto typeInstance = checkTypeState->mType->ToTypeInstance();
- auto module = GetModuleFor(checkTypeState->mType);
- if (module != NULL)
- module->TypeFailed(typeInstance);
- else if (typeInstance != NULL)
- typeInstance->mTypeFailed = true;
- checkTypeState = checkTypeState->mPrevState;
- }
- }
- void BfModule::PopulateType(BfType* resolvedTypeRef, BfPopulateType populateType)
- {
- if ((populateType == BfPopulateType_Declaration) && (resolvedTypeRef->mDefineState >= BfTypeDefineState_Declared))
- return;
-
- // Are we "demanding" to reify a type that is currently resolve-only?
- if ((mIsReified) && (populateType >= BfPopulateType_Declaration))
- {
- if (resolvedTypeRef->IsTypeInstance())
- {
- auto typeModule = resolvedTypeRef->GetModule();
- if ((typeModule != NULL) && (typeModule->mIsSpecialModule))
- {
- auto typeInst = resolvedTypeRef->ToTypeInstance();
- if (!typeInst->mIsReified)
- {
- BfLogSysM("Reifying type %p in scratch module in PopulateType\n", resolvedTypeRef);
- // It's important for unspecialized types to be in the correct module --
- // when we process their methods, new types will be determined as
- // resolve-only or reified based on the module the unresolved type is in
- BF_ASSERT(typeInst->mModule == mContext->mUnreifiedModule);
- typeInst->mIsReified = true;
- typeInst->mModule = mContext->mScratchModule;
- // Why did we need to do this at all? Why is just marking the type as reified not enough?
- // This causes issues where we may delete a method instance that is currently being used as the generic bindings for
- // a method of a specialized generic type
- // if (typeInst->IsOnDemand())
- // {
- // RebuildMethods(typeInst);
- // }
- // else
- // mContext->RebuildType(typeInst, false, false);
- if (typeInst->mGenericTypeInfo != NULL)
- {
- for (auto genericArg : typeInst->mGenericTypeInfo->mTypeGenericArguments)
- {
- if (!genericArg->IsReified())
- PopulateType(genericArg, BfPopulateType_Declaration);
- }
- }
- }
- }
- else
- {
- if ((typeModule != NULL) && (!typeModule->mIsReified) && (!typeModule->mReifyQueued))
- {
- bool canFastReify = false;
- if (typeModule->mAwaitingInitFinish)
- {
- canFastReify = true;
- for (auto ownedTypes : typeModule->mOwnedTypeInstances)
- if (ownedTypes->mDefineState > BfTypeDefineState_HasInterfaces)
- canFastReify = false;
- }
- if (canFastReify)
- {
- BfLogSysM("Setting reified type %p in module %p in PopulateType on module awaiting finish\n", resolvedTypeRef, typeModule);
- typeModule->mIsReified = true;
- typeModule->CalcGeneratesCode();
- typeModule->mWantsIRIgnoreWrites = false;
- for (auto ownedTypes : typeModule->mOwnedTypeInstances)
- {
- ownedTypes->mIsReified = true;
- if (ownedTypes->mCustomAttributes != NULL)
- {
- for (auto& attr : ownedTypes->mCustomAttributes->mAttributes)
- {
- if ((attr.mType->mAttributeData != NULL) && ((attr.mType->mAttributeData->mFlags & BfCustomAttributeFlags_ReflectAttribute) != 0))
- {
- // Reify this attribute
- typeModule->PopulateType(attr.mType);
- }
- }
- }
- }
- mCompiler->mStats.mReifiedModuleCount++;
- if (typeModule->mBfIRBuilder != NULL)
- {
- typeModule->mBfIRBuilder->ClearNonConstData();
- typeModule->mBfIRBuilder->mIgnoreWrites = false;
- typeModule->SetupIRBuilder(false);
- }
- else
- typeModule->PrepareForIRWriting(resolvedTypeRef->ToTypeInstance());
- }
- else
- {
- BF_ASSERT((mCompiler->mCompileState != BfCompiler::CompileState_Unreified) && (mCompiler->mCompileState != BfCompiler::CompileState_VData));
- BfLogSysM("Queued reification of type %p in module %p in PopulateType\n", resolvedTypeRef, typeModule);
- BF_ASSERT((typeModule != mContext->mUnreifiedModule) && (typeModule != mContext->mScratchModule));
- BF_ASSERT(!typeModule->mIsSpecialModule);
- // This caused issues - we may need to reify a type and then request a method
- typeModule->mReifyQueued = true;
- mContext->mReifyModuleWorkList.Add(typeModule);
- //typeModule->ReifyModule();
- }
- }
- }
- }
- }
- if (!resolvedTypeRef->IsIncomplete())
- return;
- if (populateType <= BfPopulateType_TypeDef)
- return;
- auto typeInstance = resolvedTypeRef->ToTypeInstance();
- CheckInjectNewRevision(typeInstance);
- BF_ASSERT((resolvedTypeRef->mRebuildFlags & (BfTypeRebuildFlag_Deleted | BfTypeRebuildFlag_DeleteQueued)) == 0);
- /*BfTypeRebuildFlags allowedFlags = (BfTypeRebuildFlags)(BfTypeRebuildFlag_AddedToWorkList | BfTypeRebuildFlag_AwaitingReference | BfTypeRebuildFlag_UnderlyingTypeDeferred);
- if ((resolvedTypeRef->mRebuildFlags & ~allowedFlags) != 0)
- {
- // BfContext::UpdateAfterDeletingTypes should clear out all flags except for the Deleted flag
- // If this type was deleted then we should never be able to reach PopulateType here.
- // This may happen if dependent types were not properly rebuilt when a used type
- // was deleted.
- auto hadFlags = resolvedTypeRef->mRebuildFlags;
- BF_ASSERT((resolvedTypeRef->mRebuildFlags & ~allowedFlags) == 0);
- resolvedTypeRef->mRebuildFlags = (BfTypeRebuildFlags)(resolvedTypeRef->mRebuildFlags & ~allowedFlags);
- }*/
- bool isNew = resolvedTypeRef->mDefineState == BfTypeDefineState_Undefined;
- if (isNew)
- {
- BP_ZONE("BfModule::PopulateType");
- if (resolvedTypeRef->mTypeId == -1)
- {
- mCompiler->mTypeInitCount++;
- auto typeInstance = resolvedTypeRef->ToTypeInstance();
- if (!mCompiler->mTypeIdFreeList.IsEmpty())
- {
- resolvedTypeRef->mTypeId = mCompiler->mTypeIdFreeList.back();
- mCompiler->mTypeIdFreeList.pop_back();
- }
- else
- resolvedTypeRef->mTypeId = mCompiler->mCurTypeId++;
- while (resolvedTypeRef->mTypeId >= (int)mContext->mTypes.size())
- mContext->mTypes.Add(NULL);
- mContext->mTypes[resolvedTypeRef->mTypeId] = resolvedTypeRef;
- if (typeInstance != NULL)
- {
- typeInstance->mSignatureRevision = mCompiler->mRevision;
- typeInstance->mLastNonGenericUsedRevision = mCompiler->mRevision;
- }
- }
- BfTypeDef* typeDef = NULL;
- if (typeInstance != NULL)
- typeDef = typeInstance->mTypeDef;
- BfLogSysM("PopulateType: %p %s populateType:%d ResolveOnly:%d Reified:%d AutoComplete:%d Ctx:%p Mod:%p TypeId:%d TypeDef:%p\n", resolvedTypeRef, TypeToString(resolvedTypeRef, BfTypeNameFlags_None).c_str(), populateType, mCompiler->mIsResolveOnly, mIsReified, mCompiler->IsAutocomplete(), mContext, this, resolvedTypeRef->mTypeId, typeDef);
- BF_ASSERT(!resolvedTypeRef->IsDeleting());
- }
- if (resolvedTypeRef->IsRef())
- {
- BfRefType* refType = (BfRefType*)resolvedTypeRef;
- if (refType->mElementType->IsValueType())
- {
- PopulateType(refType->mElementType, populateType);
- resolvedTypeRef->mDefineState = refType->mElementType->mDefineState;
- }
- else
- {
- PopulateType(refType->mElementType, BfPopulateType_Identity);
- resolvedTypeRef->mDefineState = BfTypeDefineState_Defined;
- }
- refType->mSize = refType->mAlign = mSystem->mPtrSize;
- return;
- }
- if (resolvedTypeRef->IsTypeAlias())
- {
- // Always populate these all the way
- if (populateType != BfPopulateType_IdentityNoRemapAlias)
- populateType = BfPopulateType_Data;
- }
- if (resolvedTypeRef->IsSizedArray())
- {
- resolvedTypeRef->mRevision = mRevision;
- bool typeFailed = false;
- BfSizedArrayType* arrayType = (BfSizedArrayType*)resolvedTypeRef;
- auto elementType = arrayType->mElementType;
- if (elementType->IsValueType())
- {
- resolvedTypeRef->mDefineState = BfTypeDefineState_ResolvingBaseType;
- BfTypeState typeState(arrayType, mContext->mCurTypeState);
- typeState.mPopulateType = BfPopulateType_Data;
- SetAndRestoreValue<BfTypeState*> prevTypeState(mContext->mCurTypeState, &typeState);
- SetAndRestoreValue<BfTypeInstance*> prevTypeInstance(mCurTypeInstance, NULL);
- if (!CheckCircularDataError())
- {
- PopulateType(arrayType->mElementType, BfPopulateType_Data);
- }
- else
- {
- typeFailed = true;
- PopulateType(arrayType->mElementType, BfPopulateType_Identity);
- }
- resolvedTypeRef->mDefineState = arrayType->mElementType->mDefineState;
- AddDependency(elementType, resolvedTypeRef, BfDependencyMap::DependencyFlag_ValueTypeMemberData);
- }
- else
- {
- PopulateType(arrayType->mElementType, BfPopulateType_Identity);
- resolvedTypeRef->mDefineState = BfTypeDefineState_Defined;
- AddDependency(elementType, resolvedTypeRef, BfDependencyMap::DependencyFlag_PtrMemberData);
- }
- if (arrayType->mElementCount > 0)
- {
- arrayType->mSize = (int)(arrayType->mElementType->GetStride() * arrayType->mElementCount);
- if (arrayType->mElementType->mSize > 0)
- {
- int64 maxElements = 0x7FFFFFFF / arrayType->mElementType->GetStride();
- if (arrayType->mElementCount > maxElements)
- {
- Fail(StrFormat("Array size overflow: %s", TypeToString(arrayType).c_str()));
- arrayType->mSize = 0x7FFFFFFF;
- }
- }
- arrayType->mAlign = std::max((int32)arrayType->mElementType->mAlign, 1);
- }
- else if (arrayType->mElementCount < 0)
- {
- // Unknown size, don't assume it's valueless
- arrayType->mSize = 1;
- arrayType->mAlign = 1;
- }
- else
- {
- arrayType->mSize = 0;
- arrayType->mAlign = 1;
- }
- BF_ASSERT(arrayType->mSize >= 0);
- if (!typeFailed)
- arrayType->mWantsGCMarking = elementType->WantsGCMarking();
- resolvedTypeRef->mDefineState = BfTypeDefineState_DefinedAndMethodsSlotted;
- resolvedTypeRef->mRebuildFlags = BfTypeRebuildFlag_None;
- bool isValueless = arrayType->IsValuelessType();
- return;
- }
-
- if (isNew)
- {
- BfTypeDef* typeDef = NULL;
- if (typeInstance != NULL)
- {
- if ((populateType == BfPopulateType_Data) && (typeInstance->mNeedsMethodProcessing))
- return;
- typeDef = typeInstance->mTypeDef;
- }
- if (resolvedTypeRef->IsMethodRef())
- return;
- if (resolvedTypeRef->IsPointer())
- {
- BfPointerType* pointerType = (BfPointerType*)resolvedTypeRef;
- if (pointerType->mElementType->IsIncomplete())
- PopulateType(pointerType->mElementType, BfPopulateType_Declaration);
- pointerType->mSize = pointerType->mAlign = mSystem->mPtrSize;
- resolvedTypeRef->mDefineState = BfTypeDefineState_Defined;
- return;
- }
- if (resolvedTypeRef->IsGenericParam())
- {
- BfGenericParamType* genericParamType = (BfGenericParamType*)resolvedTypeRef;
- PopulateType(mContext->mBfObjectType);
- genericParamType->mSize = mContext->mBfObjectType->mSize;
- genericParamType->mAlign = mContext->mBfObjectType->mAlign;
- resolvedTypeRef->mDefineState = BfTypeDefineState_Defined;
- return;
- }
- if (resolvedTypeRef->IsModifiedTypeType())
- {
- BfModifiedTypeType* retTypeType = (BfModifiedTypeType*)resolvedTypeRef;
- BF_ASSERT(retTypeType->mElementType->IsGenericParam());
- resolvedTypeRef->mSize = mContext->mBfObjectType->mSize;
- resolvedTypeRef->mAlign = mContext->mBfObjectType->mAlign;
- resolvedTypeRef->mDefineState = BfTypeDefineState_Defined;
- return;
- }
- if (resolvedTypeRef->IsConcreteInterfaceType())
- {
- BfConcreteInterfaceType* concreteInterfaceType = (BfConcreteInterfaceType*)resolvedTypeRef;
- BF_ASSERT(concreteInterfaceType->mInterface->IsInterface());
- resolvedTypeRef->mSize = mContext->mBfObjectType->mSize;
- resolvedTypeRef->mAlign = mContext->mBfObjectType->mAlign;
- resolvedTypeRef->mDefineState = BfTypeDefineState_Defined;
- return;
- }
- if (resolvedTypeRef->IsConstExprValue())
- {
- resolvedTypeRef->mSize = 0;
- resolvedTypeRef->mAlign = 0;
- resolvedTypeRef->mDefineState = BfTypeDefineState_Defined;
- return;
- }
-
- // The autocomplete pass doesn't need to do the method processing, allow type to be (partially) incomplete
- if ((mCompiler->mResolvePassData != NULL) && (mCompiler->mResolvePassData->mAutoComplete != NULL) &&
- (typeInstance != NULL) && (typeInstance->mNeedsMethodProcessing) && (!typeInstance->IsDelegate()))
- return;
- BfPrimitiveType* primitiveType = NULL;
- if (typeInstance == NULL)
- {
- BF_ASSERT(resolvedTypeRef->IsPrimitiveType());
- primitiveType = (BfPrimitiveType*)resolvedTypeRef;
- typeDef = primitiveType->mTypeDef;
- }
- #define PRIMITIVE_TYPE(name, llvmType, size, dType) \
- primitiveType->mSize = primitiveType->mAlign = size; \
- primitiveType->mDefineState = BfTypeDefineState_Defined;
- switch (typeDef->mTypeCode)
- {
- case BfTypeCode_None:
- primitiveType->mSize = primitiveType->mAlign = 0;
- resolvedTypeRef->mDefineState = BfTypeDefineState_Defined;
- return;
- case BfTypeCode_Self:
- case BfTypeCode_Dot:
- case BfTypeCode_Var:
- case BfTypeCode_Let:
- {
- primitiveType->mSize = mSystem->mPtrSize;
- primitiveType->mAlign = mSystem->mPtrSize;
- resolvedTypeRef->mDefineState = BfTypeDefineState_Defined;
- }
- return;
- case BfTypeCode_NullPtr:
- primitiveType->mSize = primitiveType->mAlign = mSystem->mPtrSize;
- primitiveType->mDefineState = BfTypeDefineState_Defined;
- return;
- case BfTypeCode_Boolean:
- PRIMITIVE_TYPE("bool", Int1, 1, DW_ATE_boolean);
- return;
- case BfTypeCode_Int8:
- PRIMITIVE_TYPE("sbyte", Int8, 1, DW_ATE_signed);
- return;
- case BfTypeCode_UInt8:
- PRIMITIVE_TYPE("byte", Int8, 1, DW_ATE_unsigned);
- return;
- case BfTypeCode_Int16:
- PRIMITIVE_TYPE("short", Int16, 2, DW_ATE_signed);
- return;
- case BfTypeCode_UInt16:
- PRIMITIVE_TYPE("ushort", Int16, 2, DW_ATE_unsigned);
- return;
- case BfTypeCode_Int32:
- PRIMITIVE_TYPE("int", Int32, 4, DW_ATE_signed);
- return;
- case BfTypeCode_UInt32:
- PRIMITIVE_TYPE("uint", Int32, 4, DW_ATE_unsigned);
- return;
- case BfTypeCode_Int64:
- PRIMITIVE_TYPE("long", Int64, 8, DW_ATE_signed);
- return;
- case BfTypeCode_UInt64:
- PRIMITIVE_TYPE("ulong", Int64, 8, DW_ATE_unsigned);
- return;
- case BfTypeCode_IntPtr:
- if (mSystem->mPtrSize == 4)
- {
- PRIMITIVE_TYPE("intptr", Int32, 4, DW_ATE_signed);
- }
- else
- {
- PRIMITIVE_TYPE("intptr", Int64, 8, DW_ATE_signed);
- }
- return;
- case BfTypeCode_UIntPtr:
- if (mSystem->mPtrSize == 4)
- {
- PRIMITIVE_TYPE("uintptr", Int32, 4, DW_ATE_unsigned);
- }
- else
- {
- PRIMITIVE_TYPE("uintptr", Int64, 8, DW_ATE_unsigned);
- }
- return;
- case BfTypeCode_IntUnknown:
- case BfTypeCode_UIntUnknown:
- return;
- case BfTypeCode_Char8:
- PRIMITIVE_TYPE("char8", Int8, 1, DW_ATE_unsigned_char);
- return;
- case BfTypeCode_Char16:
- PRIMITIVE_TYPE("char16", Int16, 2, DW_ATE_unsigned_char);
- return;
- case BfTypeCode_Char32:
- PRIMITIVE_TYPE("char32", Int32, 4, DW_ATE_unsigned_char);
- return;
- case BfTypeCode_Float:
- PRIMITIVE_TYPE("float", Float, 4, DW_ATE_float);
- return;
- case BfTypeCode_Double:
- PRIMITIVE_TYPE("double", Double, 8, DW_ATE_float);
- return;
- case BfTypeCode_Object:
- case BfTypeCode_Struct:
- case BfTypeCode_Interface:
- case BfTypeCode_Enum:
- case BfTypeCode_TypeAlias:
- // Implemented below
- break;
- case BfTypeCode_Extension:
- // This can only happen if we didn't actually find the type the extension referred to
- break;
- default:
- //NotImpl(resolvedTypeRef->mTypeRef);
- BFMODULE_FATAL(this, "Invalid type");
- return;
- }
- //////////////////////////////////////////////////////////////////////////
- BF_ASSERT(typeInstance != NULL);
- if (!typeInstance->IsArray())
- {
- BF_ASSERT(typeInstance->mTypeDef != mContext->mCompiler->mArray1TypeDef);
- }
- if (mContext->mBfObjectType == NULL)
- {
- if (typeInstance->IsInstanceOf(mCompiler->mBfObjectTypeDef))
- mContext->mBfObjectType = typeInstance;
- else if (mCompiler->mBfObjectTypeDef != NULL)
- ResolveTypeDef(mCompiler->mBfObjectTypeDef);
- }
- if (typeInstance->mModule == NULL)
- {
- // Create a module for this type
- mContext->HandleTypeWorkItem(resolvedTypeRef);
- }
- }
- if (typeInstance == NULL)
- return;
- if (typeInstance->mModule == NULL)
- {
- BF_ASSERT(typeInstance->mTypeFailed);
- return;
- }
- typeInstance->mModule->DoPopulateType(typeInstance, populateType);
- }
- BfTypeOptions* BfModule::GetTypeOptions(BfTypeDef* typeDef)
- {
- if (mContext->mSystem->mTypeOptions.size() == 0)
- {
- return NULL;
- }
- Array<int> matchedIndices;
-
- if (!mCompiler->mAttributeTypeOptionMap.IsEmpty())
- {
- auto customAttributes = typeDef->mTypeDeclaration->mAttributes;
- while (customAttributes != NULL)
- {
- if (!mCompiler->mAttributeTypeOptionMap.IsEmpty())
- {
- SetAndRestoreValue<bool> prevIgnoreErrors(mIgnoreErrors, true);
- auto typeRef = customAttributes->mAttributeTypeRef;
- // StringT<128> attrName;
- // for (auto& customAttrs : customAttributes->mAttributeTypeRef)
- // {
- // attrName.Clear();
- // customAttrs.mType->mTypeDef->mFullName.ToString(attrName);
- // Array<int>* arrPtr;
- // if (mCompiler->mAttributeTypeOptionMap.TryGetValue(attrName, &arrPtr))
- // {
- // for (auto optionsIdx : *arrPtr)
- // {
- // matchedIndices.Add(optionsIdx);
- // }
- // }
- // }
- }
- customAttributes = customAttributes->mNextAttribute;
- }
- }
- int typeOptionsCount = (int)mContext->mSystem->mTypeOptions.size();
-
- auto _CheckTypeName = [&](const StringImpl& typeName)
- {
- for (int optionIdx = 0; optionIdx < (int)mContext->mSystem->mTypeOptions.size(); optionIdx++)
- {
- auto& typeOptions = mContext->mSystem->mTypeOptions[optionIdx];
- bool matched = false;
- for (auto& filter : typeOptions.mTypeFilters)
- {
- int filterIdx = 0;
- int typeNameIdx = 0;
- const char* filterPtr = filter.c_str();
- const char* namePtr = typeName.c_str();
- char prevFilterC = 0;
- while (true)
- {
- char filterC;
- while (true)
- {
- filterC = *(filterPtr++);
- if (filterC != ' ')
- break;
- }
- char nameC;
- while (true)
- {
- nameC = *(namePtr++);
- if (nameC != ' ')
- break;
- }
- if ((filterC == 0) || (nameC == 0))
- {
- matched = (filterC == 0) && (nameC == 0);
- break;
- }
- bool doWildcard = false;
- if (nameC != filterC)
- {
- if (filterC == '*')
- doWildcard = true;
- else if (((filterC == ',') || (filterC == '>')) &&
- ((prevFilterC == '<') || (prevFilterC == ',')))
- {
- doWildcard = true;
- filterPtr--;
- }
- if (!doWildcard)
- {
- matched = false;
- break;
- }
- }
- if (doWildcard)
- {
- int openDepth = 0;
- const char* startNamePtr = namePtr;
- while (true)
- {
- nameC = *(namePtr++);
- if (nameC == 0)
- {
- namePtr--;
- if (openDepth != 0)
- matched = false;
- break;
- }
- if ((nameC == '>') && (openDepth == 0))
- {
- namePtr--;
- break;
- }
- if (nameC == '<')
- openDepth++;
- else if (nameC == '>')
- openDepth--;
- else if ((nameC == ',') && (openDepth == 0))
- {
- namePtr--;
- break;
- }
- }
- if (!matched)
- break;
- }
- prevFilterC = filterC;
- }
- }
- if (matched)
- matchedIndices.push_back(optionIdx);
- }
- };
- // if (typeInstance->IsTypedPrimitive())
- // {
- // auto underlyingType = typeInstance->GetUnderlyingType();
- // if (underlyingType != NULL)
- // {
- // String typeName = TypeToString(underlyingType);
- // _CheckTypeName(typeName);
- // }
- // else
- // {
- // // Can this only happen for functions that are being extended?
- // }
- // }
- //
- // if ((!typeInstance->IsBoxed()) && (typeInstance->mTypeDef == mCompiler->mPointerTTypeDef))
- // {
- // BF_ASSERT(typeInstance->IsGenericTypeInstance());
- // auto innerType = typeInstance->mGenericTypeInfo->mTypeGenericArguments[0];
- // auto ptrType = CreatePointerType(innerType);
- // String typeName = TypeToString(ptrType);
- // _CheckTypeName(typeName);
- // }
- String typeName = BfTypeUtils::TypeToString(typeDef);
- _CheckTypeName(typeName);
- int matchedIdx = -1;
- if (matchedIndices.size() == 1)
- {
- matchedIdx = matchedIndices[0];
- }
- else if (matchedIndices.size() > 1)
- {
- // Try to find a merged typeoptions with these indices
- for (int mergedIdx = 0; mergedIdx < (int)mContext->mSystem->mMergedTypeOptions.size(); mergedIdx++)
- {
- auto& typeOptions = mContext->mSystem->mMergedTypeOptions[mergedIdx];
- if (typeOptions.mMatchedIndices == matchedIndices)
- {
- matchedIdx = typeOptionsCount + mergedIdx;
- break;
- }
- }
- // Otherwise make one...
- if (matchedIdx == -1)
- {
- auto& first = mContext->mSystem->mTypeOptions[matchedIndices[0]];
- BfTypeOptions mergedTypeOptions;
- mergedTypeOptions.mSIMDSetting = first.mSIMDSetting;
- mergedTypeOptions.mOptimizationLevel = first.mOptimizationLevel;
- mergedTypeOptions.mEmitDebugInfo = first.mEmitDebugInfo;
- mergedTypeOptions.mAndFlags = first.mAndFlags;
- mergedTypeOptions.mOrFlags = first.mOrFlags;
- mergedTypeOptions.mAllocStackTraceDepth = first.mAllocStackTraceDepth;
- mergedTypeOptions.mReflectMethodFilters = first.mReflectMethodFilters;
- mergedTypeOptions.mReflectMethodAttributeFilters = first.mReflectMethodAttributeFilters;
- mergedTypeOptions.mMatchedIndices = matchedIndices;
- for (int idx = 1; idx < (int)matchedIndices.size(); idx++)
- {
- auto& typeOptions = mContext->mSystem->mTypeOptions[matchedIndices[idx]];
- if (typeOptions.mSIMDSetting != -1)
- mergedTypeOptions.mSIMDSetting = typeOptions.mSIMDSetting;
- if (typeOptions.mOptimizationLevel != -1)
- mergedTypeOptions.mOptimizationLevel = typeOptions.mOptimizationLevel;
- if (typeOptions.mEmitDebugInfo != -1)
- mergedTypeOptions.mEmitDebugInfo = typeOptions.mEmitDebugInfo;
-
- mergedTypeOptions.mOrFlags = (BfOptionFlags)(mergedTypeOptions.mOrFlags | typeOptions.mOrFlags);
- mergedTypeOptions.mAndFlags = (BfOptionFlags)(mergedTypeOptions.mAndFlags | typeOptions.mOrFlags);
- mergedTypeOptions.mAndFlags = (BfOptionFlags)(mergedTypeOptions.mAndFlags & typeOptions.mAndFlags);
- mergedTypeOptions.mOrFlags = (BfOptionFlags)(mergedTypeOptions.mOrFlags & typeOptions.mAndFlags);
-
- if (mergedTypeOptions.HasReflectMethodFilters())
- {
- // If merging filter has non-default method flags but no filter then we need to append it as a filtered modification
- if ((!typeOptions.HasReflectMethodFilters()) &&
- (((typeOptions.mAndFlags & BfOptionFlags_Reflect_MethodMask) != BfOptionFlags_Reflect_MethodMask) ||
- ((typeOptions.mOrFlags & BfOptionFlags_Reflect_MethodMask) != 0)))
- {
- mergedTypeOptions.mReflectMethodFilters.Add({"*", typeOptions.mAndFlags, typeOptions.mOrFlags});
- }
- mergedTypeOptions.mAndFlags = (BfOptionFlags)(mergedTypeOptions.mAndFlags | BfOptionFlags_Reflect_MethodMask);
- mergedTypeOptions.mOrFlags = (BfOptionFlags)(mergedTypeOptions.mOrFlags & ~BfOptionFlags_Reflect_MethodMask);
- }
- if (typeOptions.mAllocStackTraceDepth != -1)
- mergedTypeOptions.mAllocStackTraceDepth = typeOptions.mAllocStackTraceDepth;
- for (auto filter : typeOptions.mReflectMethodFilters)
- mergedTypeOptions.mReflectMethodFilters.Add(filter);
- for (auto filter : typeOptions.mReflectMethodAttributeFilters)
- mergedTypeOptions.mReflectMethodAttributeFilters.Add(filter);
- }
- matchedIdx = typeOptionsCount + (int)mContext->mSystem->mMergedTypeOptions.size();
- mContext->mSystem->mMergedTypeOptions.push_back(mergedTypeOptions);
- }
- }
- return mSystem->GetTypeOptions( matchedIdx);
- }
- bool BfModule::ApplyTypeOptionMethodFilters(bool includeMethod, BfMethodDef* methodDef, BfTypeOptions* typeOptions)
- {
- BfOptionFlags findFlag = BfOptionFlags_None;
- if (methodDef->mMethodType == BfMethodType_Ctor)
- findFlag = BfOptionFlags_ReflectConstructors;
- else if (methodDef->mIsStatic)
- findFlag = BfOptionFlags_ReflectStaticMethods;
- else
- findFlag = BfOptionFlags_ReflectNonStaticMethods;
- if ((typeOptions->mAndFlags & findFlag) == 0)
- includeMethod = false;
- if ((typeOptions->mOrFlags & findFlag) != 0)
- includeMethod = true;
- if (!typeOptions->mReflectMethodFilters.IsEmpty())
- {
- for (auto& filter : typeOptions->mReflectMethodFilters)
- {
- if (BfCheckWildcard(filter.mFilter, methodDef->mName))
- {
- if ((filter.mAndFlags & findFlag) == 0)
- includeMethod = false;
- if ((filter.mAndFlags | findFlag) != 0)
- includeMethod = true;
- }
- }
- }
- return includeMethod;
- }
- int BfModule::GenerateTypeOptions(BfCustomAttributes* customAttributes, BfTypeInstance* typeInstance, bool checkTypeName)
- {
- if (mContext->mSystem->mTypeOptions.size() == 0)
- {
- return -1;
- }
- Array<int> matchedIndices;
- if ((!checkTypeName) && (typeInstance->mTypeOptionsIdx != -1))
- {
- // Methods should 'inherit' the owner's type options before applying type options from custom attributes
- auto typeOptions = mSystem->GetTypeOptions(typeInstance->mTypeOptionsIdx);
- if (typeOptions->mMatchedIndices.size() == 0)
- matchedIndices.push_back(typeInstance->mTypeOptionsIdx);
- else
- matchedIndices = typeOptions->mMatchedIndices;
- }
- if (customAttributes != NULL)
- {
- if (!mCompiler->mAttributeTypeOptionMap.IsEmpty())
- {
- StringT<128> attrName;
- for (auto& customAttrs : customAttributes->mAttributes)
- {
- attrName.Clear();
- customAttrs.mType->mTypeDef->mFullName.ToString(attrName);
- Array<int>* arrPtr;
- if (mCompiler->mAttributeTypeOptionMap.TryGetValue(attrName, &arrPtr))
- {
- for (auto optionsIdx : *arrPtr)
- {
- matchedIndices.Add(optionsIdx);
- }
- }
- }
- }
- }
- int typeOptionsCount = (int)mContext->mSystem->mTypeOptions.size();
- if (checkTypeName)
- {
- auto _CheckType = [&](BfType* type)
- {
- StringImpl typeName = TypeToString(type);
- for (int optionIdx = 0; optionIdx < (int)mContext->mSystem->mTypeOptions.size(); optionIdx++)
- {
- auto& typeOptions = mContext->mSystem->mTypeOptions[optionIdx];
- bool matched = false;
- for (auto& filter : typeOptions.mTypeFilters)
- {
- int filterIdx = 0;
- int typeNameIdx = 0;
- if (filter.StartsWith(':'))
- {
- BfTypeInstance* typeInst = type->ToTypeInstance();
- if (typeInst != NULL)
- {
- int startPos = 1;
- for (; startPos < (int)filter.length(); startPos++)
- if (filter[startPos] != ' ')
- break;
- String checkFilter;
- checkFilter.Reference(filter.c_str() + startPos, filter.mLength - startPos);
- BfTypeInstance* checkTypeInst = typeInst;
- while (checkTypeInst != NULL)
- {
- for (auto& iface : checkTypeInst->mInterfaces)
- {
- StringT<128> ifaceName = TypeToString(iface.mInterfaceType);
- if (BfCheckWildcard(checkFilter, ifaceName))
- {
- matched = true;
- break;
- }
- }
- checkTypeInst = checkTypeInst->mBaseType;
- }
- if (matched)
- break;
- }
- }
- else if (BfCheckWildcard(filter, typeName))
- {
- matched = true;
- break;
- }
- }
- if (matched)
- matchedIndices.push_back(optionIdx);
- }
- };
- if (typeInstance->IsTypedPrimitive())
- {
- auto underlyingType = typeInstance->GetUnderlyingType();
- if (underlyingType != NULL)
- {
- _CheckType(underlyingType);
- }
- else
- {
- // Can this only happen for functions that are being extended?
- }
- }
- if ((!typeInstance->IsBoxed()) && (typeInstance->IsInstanceOf(mCompiler->mPointerTTypeDef)))
- {
- BF_ASSERT(typeInstance->IsGenericTypeInstance());
- auto innerType = typeInstance->mGenericTypeInfo->mTypeGenericArguments[0];
- auto ptrType = CreatePointerType(innerType);
- _CheckType(ptrType);
- }
-
- _CheckType(typeInstance);
- }
- int matchedIdx = -1;
- if (matchedIndices.size() == 1)
- {
- matchedIdx = matchedIndices[0];
- }
- else if (matchedIndices.size() > 1)
- {
- // Try to find a merged typeoptions with these indices
- for (int mergedIdx = 0; mergedIdx < (int)mContext->mSystem->mMergedTypeOptions.size(); mergedIdx++)
- {
- auto& typeOptions = mContext->mSystem->mMergedTypeOptions[mergedIdx];
- if (typeOptions.mMatchedIndices == matchedIndices)
- {
- matchedIdx = typeOptionsCount + mergedIdx;
- break;
- }
- }
- // Otherwise make one...
- if (matchedIdx == -1)
- {
- auto& first = mContext->mSystem->mTypeOptions[matchedIndices[0]];
- BfTypeOptions mergedTypeOptions;
- mergedTypeOptions.mSIMDSetting = first.mSIMDSetting;
- mergedTypeOptions.mOptimizationLevel = first.mOptimizationLevel;
- mergedTypeOptions.mEmitDebugInfo = first.mEmitDebugInfo;
- mergedTypeOptions.mAndFlags = first.mAndFlags;
- mergedTypeOptions.mOrFlags = first.mOrFlags;
- mergedTypeOptions.mAllocStackTraceDepth = first.mAllocStackTraceDepth;
- mergedTypeOptions.mReflectMethodFilters = first.mReflectMethodFilters;
- mergedTypeOptions.mReflectMethodAttributeFilters = first.mReflectMethodAttributeFilters;
- mergedTypeOptions.mMatchedIndices = matchedIndices;
- for (int idx = 1; idx < (int)matchedIndices.size(); idx++)
- {
- auto& typeOptions = mContext->mSystem->mTypeOptions[matchedIndices[idx]];
- if (typeOptions.mSIMDSetting != -1)
- mergedTypeOptions.mSIMDSetting = typeOptions.mSIMDSetting;
- if (typeOptions.mOptimizationLevel != -1)
- mergedTypeOptions.mOptimizationLevel = typeOptions.mOptimizationLevel;
- if (typeOptions.mEmitDebugInfo != -1)
- mergedTypeOptions.mEmitDebugInfo = typeOptions.mEmitDebugInfo;
- mergedTypeOptions.mOrFlags = (BfOptionFlags)(mergedTypeOptions.mOrFlags | typeOptions.mOrFlags);
- mergedTypeOptions.mAndFlags = (BfOptionFlags)(mergedTypeOptions.mAndFlags | typeOptions.mOrFlags);
- mergedTypeOptions.mAndFlags = (BfOptionFlags)(mergedTypeOptions.mAndFlags & typeOptions.mAndFlags);
- mergedTypeOptions.mOrFlags = (BfOptionFlags)(mergedTypeOptions.mOrFlags & typeOptions.mAndFlags);
- if (typeOptions.mAllocStackTraceDepth != -1)
- mergedTypeOptions.mAllocStackTraceDepth = typeOptions.mAllocStackTraceDepth;
- for (auto& filter : typeOptions.mReflectMethodFilters)
- mergedTypeOptions.mReflectMethodFilters.Add(filter);
- for (auto& filter : typeOptions.mReflectMethodAttributeFilters)
- mergedTypeOptions.mReflectMethodAttributeFilters.Add(filter);
- }
- matchedIdx = typeOptionsCount + (int)mContext->mSystem->mMergedTypeOptions.size();
- mContext->mSystem->mMergedTypeOptions.push_back(mergedTypeOptions);
- }
- }
- return matchedIdx;
- }
- void BfModule::SetTypeOptions(BfTypeInstance* typeInstance)
- {
- typeInstance->mTypeOptionsIdx = GenerateTypeOptions(typeInstance->mCustomAttributes, typeInstance, true);
- }
- BfCEParseContext BfModule::CEEmitParse(BfTypeInstance* typeInstance, const StringImpl& src)
- {
- BfCEParseContext ceParseContext;
- ceParseContext.mFailIdx = mCompiler->mPassInstance->mFailedIdx;
- ceParseContext.mWarnIdx = mCompiler->mPassInstance->mWarnIdx;
- bool createdParser = false;
- int startSrcIdx = 0;
-
- BfParser* emitParser = NULL;
- if (typeInstance->mTypeDef->mEmitParent == NULL)
- {
- BF_ASSERT(typeInstance->mTypeDef->mNextRevision == NULL);
-
- BfTypeDef* emitTypeDef = new BfTypeDef();
- emitTypeDef->mEmitParent = typeInstance->mTypeDef;
- mSystem->CopyTypeDef(emitTypeDef, typeInstance->mTypeDef);
- emitTypeDef->mDefState = BfTypeDef::DefState_Emitted;
- typeInstance->mTypeDef = emitTypeDef;
-
- createdParser = true;
- emitParser = new BfParser(mSystem, typeInstance->mTypeDef->mProject);
- emitParser->mIsEmitted = true;
- emitParser->mFileName = typeInstance->mTypeDef->mName->ToString();
- BfLogSys(mSystem, "Emit typeDef for type %p created %p parser %p typeDecl %p\n", typeInstance, emitTypeDef, emitParser, emitTypeDef->mTypeDeclaration);
- if (mCompiler->mIsResolveOnly)
- emitParser->mFileName += "$EmitR$";
- else
- emitParser->mFileName += "$Emit$";
- emitParser->mFileName += StrFormat("%d", typeInstance->mTypeId);
- emitParser->mFileName += StrFormat(".bf|%d", typeInstance->mRevision);
- emitTypeDef->mSource = emitParser;
- emitParser->mRefCount++;
- emitParser->SetSource(src.c_str(), src.mLength);
- // If we emit only from method attributes then we will already have method instances created
- auto _FixMethod = [&](BfMethodInstance* methodInstance)
- {
- if (methodInstance == NULL)
- return;
- methodInstance->mMethodDef = emitTypeDef->mMethods[methodInstance->mMethodDef->mIdx];
- };
- for (auto& methodInstanceGroup : typeInstance->mMethodInstanceGroups)
- {
- _FixMethod(methodInstanceGroup.mDefault);
- if (methodInstanceGroup.mMethodSpecializationMap != NULL)
- {
- for (auto& kv : *methodInstanceGroup.mMethodSpecializationMap)
- _FixMethod(kv.mValue);
- }
- };
- }
- else
- {
- emitParser = typeInstance->mTypeDef->mSource->ToParser();
- int idx = emitParser->AllocChars(src.mLength + 1);
- memcpy((uint8*)emitParser->mSrc + idx, src.c_str(), src.mLength + 1);
- emitParser->mSrcIdx = idx;
- emitParser->mSrcLength = idx + src.mLength;
- emitParser->mParserData->mSrcLength = emitParser->mSrcLength;
- }
- emitParser->Parse(mCompiler->mPassInstance);
- emitParser->FinishSideNodes();
- if (createdParser)
- {
- AutoCrit crit(mSystem->mDataLock);
- mSystem->mParsers.Add(emitParser);
- }
- return ceParseContext;
- }
- void BfModule::FinishCEParseContext(BfAstNode* refNode, BfTypeInstance* typeInstance, BfCEParseContext* ceParseContext)
- {
- if ((ceParseContext->mFailIdx != mCompiler->mPassInstance->mFailedIdx) && (refNode != NULL))
- Fail("Emitted code had errors", refNode);
- else if ((ceParseContext->mWarnIdx != mCompiler->mPassInstance->mWarnIdx) && (refNode != NULL))
- Warn(0, "Emitted code had warnings", refNode);
- else if ((ceParseContext->mFailIdx != mCompiler->mPassInstance->mFailedIdx) ||
- (ceParseContext->mWarnIdx != mCompiler->mPassInstance->mWarnIdx))
- {
- AddFailType(typeInstance);
- }
- }
- void BfModule::UpdateCEEmit(CeEmitContext* ceEmitContext, BfTypeInstance* typeInstance, const StringImpl& ctxString, BfAstNode* refNode)
- {
- for (int ifaceTypeId : ceEmitContext->mInterfaces)
- typeInstance->mCeTypeInfo->mPendingInterfaces.Add(ifaceTypeId);
- if (ceEmitContext->mEmitData.IsEmpty())
- return;
-
- String src;
-
- if (typeInstance->mTypeDef->mEmitParent != NULL)
- src += "\n\n";
- src += "// Code emission in ";
- src += ctxString;
- src += "\n\n";
- src += ceEmitContext->mEmitData;
- ceEmitContext->mEmitData.Clear();
- BfCEParseContext ceParseContext = CEEmitParse(typeInstance, src);
- auto emitParser = typeInstance->mTypeDef->mSource->ToParser();
-
- auto typeDeclaration = emitParser->mAlloc->Alloc<BfTypeDeclaration>();
- BfReducer bfReducer;
- bfReducer.mSource = emitParser;
- bfReducer.mPassInstance = mCompiler->mPassInstance;
- bfReducer.mAlloc = emitParser->mAlloc;
- bfReducer.mSystem = mSystem;
- bfReducer.mCurTypeDecl = typeDeclaration;
- typeDeclaration->mDefineNode = emitParser->mRootNode;
- bfReducer.HandleTypeDeclaration(typeDeclaration, NULL);
- BfDefBuilder defBuilder(mSystem);
- defBuilder.mCurSource = emitParser;
- defBuilder.mCurTypeDef = typeInstance->mTypeDef;
- defBuilder.mCurDeclaringTypeDef = typeInstance->mTypeDef;
- if (typeInstance->mTypeDef->mIsCombinedPartial)
- {
- // Always define generated methods on the primary type declaration
- defBuilder.mCurDeclaringTypeDef = typeInstance->mTypeDef->mPartials[0]->GetLatest();
- }
- defBuilder.mPassInstance = mCompiler->mPassInstance;
- defBuilder.mIsComptime = true;
- defBuilder.DoVisitChild(typeDeclaration->mDefineNode);
- defBuilder.FinishTypeDef(typeInstance->mTypeDef->mTypeCode == BfTypeCode_Enum);
- FinishCEParseContext(refNode, typeInstance, &ceParseContext);
- if (typeInstance->mTypeDef->mEmitParent != NULL)
- {
- // Remove generated fields like the 'underlying type' enum field
- typeInstance->mFieldInstances.Resize(typeInstance->mTypeDef->mEmitParent->mFields.mSize);
- }
- }
- void BfModule::HandleCEAttributes(CeEmitContext* ceEmitContext, BfTypeInstance* typeInstance, BfFieldInstance* fieldInstance, BfCustomAttributes* customAttributes, Dictionary<BfTypeInstance*, BfIRValue>& prevAttrInstances, bool underlyingTypeDeferred)
- {
- for (auto& customAttribute : customAttributes->mAttributes)
- {
- auto attrType = customAttribute.mType;
-
- BfMethodInstance* methodInstance = NULL;
- bool isFieldApply = false;
- BfIRValue irValue;
- int checkDepth = 0;
- auto checkAttrType = attrType;
- while (checkAttrType != NULL)
- {
- mContext->mUnreifiedModule->PopulateType(checkAttrType, BfPopulateType_DataAndMethods);
- if (checkAttrType->mDefineState < BfTypeDefineState_DefinedAndMethodsSlotted)
- break;
- for (auto& ifaceEntry : checkAttrType->mInterfaces)
- {
- isFieldApply = false;
- isFieldApply = (ceEmitContext != NULL) && (ifaceEntry.mInterfaceType->IsInstanceOf(mCompiler->mIOnFieldInitTypeDef));
-
- if ((isFieldApply) ||
- ((ceEmitContext != NULL) && (ifaceEntry.mInterfaceType->IsInstanceOf(mCompiler->mIComptimeTypeApply))) ||
- ((ceEmitContext != NULL) && (ifaceEntry.mInterfaceType->IsInstanceOf(mCompiler->mIOnTypeInitTypeDef))) ||
- ((ceEmitContext == NULL) && (ifaceEntry.mInterfaceType->IsInstanceOf(mCompiler->mIOnTypeDoneTypeDef))))
- {
- // Passes
- }
- else
- continue;
- prevAttrInstances.TryGetValue(checkAttrType, &irValue);
- methodInstance = checkAttrType->mInterfaceMethodTable[ifaceEntry.mStartInterfaceTableIdx].mMethodRef;
- break;
- }
- if (methodInstance != NULL)
- break;
- checkAttrType = checkAttrType->mBaseType;
- checkDepth++;
- }
- if (methodInstance == NULL)
- continue;
- SetAndRestoreValue<CeEmitContext*> prevEmitContext(mCompiler->mCEMachine->mCurEmitContext, ceEmitContext);
- auto ceContext = mCompiler->mCEMachine->AllocContext();
-
- BfIRValue attrVal = ceContext->CreateAttribute(customAttribute.mRef, this, typeInstance->mConstHolder, &customAttribute);
- for (int baseIdx = 0; baseIdx < checkDepth; baseIdx++)
- attrVal = mBfIRBuilder->CreateExtractValue(attrVal, 0);
- SizedArray<BfIRValue, 1> args;
- if (!attrType->IsValuelessType())
- args.Add(attrVal);
- if (isFieldApply)
- {
- auto fieldInfoType = ResolveTypeDef(mCompiler->mReflectFieldInfoTypeDef);
- if (fieldInfoType != NULL)
- {
- SetAndRestoreValue<bool> prevIgnoreWrites(mBfIRBuilder->mIgnoreWrites, true);
- SizedArray<BfIRValue, 9> fieldData =
- {
- mBfIRBuilder->CreateConstAggZero(mBfIRBuilder->MapType(fieldInfoType->ToTypeInstance()->mBaseType, BfIRPopulateType_Identity)),
- mBfIRBuilder->CreateTypeOf(mCurTypeInstance), // mTypeInstance
- CreateFieldData(fieldInstance, fieldInstance->GetFieldDef()->mIdx)
- };
- FixConstValueParams(fieldInfoType->ToTypeInstance(), fieldData);
- auto fieldDataAgg = mBfIRBuilder->CreateConstAgg(mBfIRBuilder->MapType(fieldInfoType, BfIRPopulateType_Identity), fieldData);
- args.Add(fieldDataAgg);
- }
- }
- else
- args.Add(mBfIRBuilder->CreateTypeOf(typeInstance));
- if (methodInstance->GetParamCount() > 1)
- {
- if (irValue)
- args.Add(irValue);
- else
- args.Add(mBfIRBuilder->CreateConstNull());
- }
- else
- {
- // Only allow a single instance
- if (irValue)
- continue;
- }
- DoPopulateType_CeCheckEnum(typeInstance, underlyingTypeDeferred);
- if (fieldInstance != NULL)
- mCompiler->mCEMachine->mFieldInstanceSet.Add(fieldInstance);
- BfTypedValue result;
- ///
- {
- SetAndRestoreValue<bool> prevIgnoreWrites(mBfIRBuilder->mIgnoreWrites, true);
- result = ceContext->Call(customAttribute.mRef, this, methodInstance, args, CeEvalFlags_ForceReturnThis, NULL);
- }
- if (fieldInstance != NULL)
- mCompiler->mCEMachine->mFieldInstanceSet.Remove(fieldInstance);
- if (result.mType == methodInstance->GetOwner())
- prevAttrInstances[methodInstance->GetOwner()] = result.mValue;
- if (ceEmitContext == NULL)
- continue;
- if (typeInstance->mDefineState == BfTypeDefineState_DefinedAndMethodsSlotted)
- return;
- if (typeInstance->mDefineState != BfTypeDefineState_CETypeInit)
- {
- // We populated before we could finish
- AssertErrorState();
- }
- else
- {
- auto owner = methodInstance->GetOwner();
- int typeId = owner->mTypeId;
- if ((!result) && (mCompiler->mFastFinish))
- {
- if ((typeInstance->mCeTypeInfo != NULL) && (typeInstance->mCeTypeInfo->mNext == NULL))
- typeInstance->mCeTypeInfo->mNext = new BfCeTypeInfo();
- if ((typeInstance->mCeTypeInfo != NULL) && (typeInstance->mCeTypeInfo->mNext != NULL))
- typeInstance->mCeTypeInfo->mNext->mFailed = true;
- if (typeInstance->mCeTypeInfo != NULL)
- {
- BfCeTypeEmitEntry* entry = NULL;
- if (typeInstance->mCeTypeInfo->mTypeIFaceMap.TryGetValue(typeId, &entry))
- {
- ceEmitContext->mEmitData = entry->mEmitData;
- }
- }
- }
- else if (ceEmitContext->HasEmissions())
- {
- if (typeInstance->mCeTypeInfo == NULL)
- typeInstance->mCeTypeInfo = new BfCeTypeInfo();
- if (typeInstance->mCeTypeInfo->mNext == NULL)
- typeInstance->mCeTypeInfo->mNext = new BfCeTypeInfo();
- BfCeTypeEmitEntry entry;
- entry.mEmitData = ceEmitContext->mEmitData;
- typeInstance->mCeTypeInfo->mNext->mTypeIFaceMap[typeId] = entry;
- }
- if ((ceEmitContext->HasEmissions()) && (!mCompiler->mFastFinish))
- {
- String ctxStr = "comptime ";
- ctxStr += methodInstance->mMethodDef->mName;
- ctxStr += " of ";
- ctxStr += TypeToString(attrType);
- ctxStr += " to ";
- ctxStr += TypeToString(typeInstance);
- ctxStr += " ";
- ctxStr += customAttribute.mRef->LocationToString();
- UpdateCEEmit(ceEmitContext, typeInstance, ctxStr, customAttribute.mRef);
- }
- }
- mCompiler->mCEMachine->ReleaseContext(ceContext);
- }
- }
- void BfModule::CEMixin(BfAstNode* refNode, const StringImpl& code)
- {
- auto activeTypeDef = mCurMethodInstance->mMethodDef->mDeclaringType;
- //auto emitParser = activeTypeDef->mEmitParser;
-
- String src;
- if (mCurTypeInstance->mTypeDef->mEmitParent != NULL)
- src += "\n\n";
- src += "// Code emission in ";
- src += MethodToString(mCurMethodInstance);
- src += "\n";
- src += code;
- BfReducer bfReducer;
- bfReducer.mPassInstance = mCompiler->mPassInstance;
- bfReducer.mSystem = mSystem;
- bfReducer.mCurTypeDecl = activeTypeDef->mTypeDeclaration;
- bfReducer.mCurMethodDecl = BfNodeDynCast<BfMethodDeclaration>(mCurMethodInstance->mMethodDef->mMethodDeclaration);
-
- SetAndRestoreValue<BfAstNode*> prevCustomAttribute(mCurMethodState->mEmitRefNode, refNode);
-
- EmitEnsureInstructionAt();
- bool wantsDIData = (mBfIRBuilder->DbgHasInfo()) && (mHasFullDebugInfo);
- mBfIRBuilder->SaveDebugLocation();
- BfCEParseContext ceParseContext = CEEmitParse(mCurTypeInstance, src);
- auto emitParser = mCurTypeInstance->mTypeDef->mSource->ToParser();
- bfReducer.mSource = emitParser;
- bfReducer.mAlloc = emitParser->mAlloc;
- bfReducer.HandleBlock(emitParser->mRootNode, false);
- SetAndRestoreValue<BfIRMDNode> prevInlinedAt(mCurMethodState->mCurScope->mDIInlinedAt);
- SetAndRestoreValue<BfIRMDNode> prevDIScope(mCurMethodState->mCurScope->mDIScope);
- SetAndRestoreValue<BfIRMDNode> prevAltDIFile(mCurMethodState->mCurScope->mAltDIFile);
- if (wantsDIData)
- {
- llvm::SmallVector<BfIRMDNode, 8> diParams;
- diParams.push_back(mBfIRBuilder->DbgGetType(GetPrimitiveType(BfTypeCode_None)));
- BfIRMDNode diFuncType = mBfIRBuilder->DbgCreateSubroutineType(diParams);
- //int defLine = mModule->mCurFilePosition.mCurLine;
- int flags = 0;
- mCurMethodState->mCurScope->mDIInlinedAt = mBfIRBuilder->DbgGetCurrentLocation();
- // We used to have the "def" line be the inlining position, but the linker we de-duplicate instances of these functions without regard to their unique line
- // definitions, so we need to be consistent and use the actual line
- UpdateSrcPos(emitParser->mRootNode, BfSrcPosFlag_NoSetDebugLoc);
- int defLine = mCurFilePosition.mCurLine;
- auto diParentType = mBfIRBuilder->DbgGetTypeInst(mCurTypeInstance);
- if (!mBfIRBuilder->mIgnoreWrites)
- {
- String methodName = "Comptime_Mixin";
- mCurMethodState->mCurScope->mDIScope = mBfIRBuilder->DbgCreateFunction(diParentType, methodName, "", mCurFilePosition.mFileInstance->mDIFile,
- defLine + 1, diFuncType, false, true, mCurFilePosition.mCurLine + 1, flags, false, BfIRValue());
- mCurMethodState->mCurScope->mAltDIFile = mCurFilePosition.mFileInstance->mDIFile;
- }
- }
-
- UpdateSrcPos(emitParser->mRootNode);
- SetIllegalSrcPos();
-
- Visit(emitParser->mRootNode);
- mBfIRBuilder->RestoreDebugLocation();
- mBfIRBuilder->DupDebugLocation();
- FinishCEParseContext(refNode, mCurTypeInstance, &ceParseContext);
- }
- void BfModule::ExecuteCEOnCompile(CeEmitContext* ceEmitContext, BfTypeInstance* typeInstance, BfCEOnCompileKind onCompileKind, bool underlyingTypeDeferred)
- {
- Dictionary<BfTypeInstance*, BfIRValue> prevAttrInstances;
-
- if (typeInstance->mCustomAttributes != NULL)
- HandleCEAttributes(ceEmitContext, typeInstance, NULL, typeInstance->mCustomAttributes, prevAttrInstances, underlyingTypeDeferred);
- if (ceEmitContext != NULL)
- {
- for (auto& fieldInstance : typeInstance->mFieldInstances)
- {
- if (fieldInstance.mCustomAttributes != NULL)
- HandleCEAttributes(ceEmitContext, typeInstance, &fieldInstance, fieldInstance.mCustomAttributes, prevAttrInstances, underlyingTypeDeferred);
- }
- }
- int methodCount = (int)typeInstance->mTypeDef->mMethods.size();
- for (int methodIdx = 0; methodIdx < methodCount; methodIdx++)
- {
- auto methodDef = typeInstance->mTypeDef->mMethods[methodIdx];
- auto methodDeclaration = BfNodeDynCast<BfMethodDeclaration>(methodDef->mMethodDeclaration);
- if (methodDeclaration == NULL)
- continue;
- if (methodDeclaration->mAttributes == NULL)
- continue;
- bool wantsAttributes = false;
- BfAttributeDirective* checkAttributes = methodDeclaration->mAttributes;
- while (checkAttributes != NULL)
- {
- SetAndRestoreValue<bool> prevIgnoreErrors(mIgnoreErrors, true);
- BfType* attrType = ResolveTypeRef(checkAttributes->mAttributeTypeRef, BfPopulateType_Identity, (BfResolveTypeRefFlags)(BfResolveTypeRefFlag_Attribute | BfResolveTypeRefFlag_NoReify));
- if (attrType != NULL)
- {
- if (attrType->IsInstanceOf(mCompiler->mOnCompileAttributeTypeDef))
- wantsAttributes = true;
- auto attrTypeInstance = attrType->ToTypeInstance();
- if ((attrTypeInstance != NULL) && (!attrTypeInstance->mInterfaces.IsEmpty()))
- wantsAttributes = true;
- }
- checkAttributes = checkAttributes->mNextAttribute;
- }
-
- if (!wantsAttributes)
- return;
- auto customAttributes = GetCustomAttributes(methodDeclaration->mAttributes, BfAttributeTargets_Method);
- defer({ delete customAttributes; });
-
- auto onCompileAttribute = customAttributes->Get(mCompiler->mOnCompileAttributeTypeDef);
- if (onCompileAttribute == NULL)
- continue;
- HandleCEAttributes(ceEmitContext, typeInstance, NULL, customAttributes, prevAttrInstances, underlyingTypeDeferred);
- if (onCompileAttribute->mCtorArgs.size() < 1)
- continue;
- auto constant = typeInstance->mConstHolder->GetConstant(onCompileAttribute->mCtorArgs[0]);
- if (constant == NULL)
- continue;
- if (onCompileKind != (BfCEOnCompileKind)constant->mInt32)
- continue;
- if (!methodDef->mIsStatic)
- {
- Fail("OnCompile methods must be static", methodDeclaration);
- continue;
- }
- if (!methodDef->mParams.IsEmpty())
- {
- Fail("OnCompile methods cannot declare parameters", methodDeclaration);
- continue;
- }
- SetAndRestoreValue<CeEmitContext*> prevEmitContext(mCompiler->mCEMachine->mCurEmitContext);
- if (onCompileKind == BfCEOnCompileKind_TypeInit)
- {
- mCompiler->mCEMachine->mCurEmitContext = ceEmitContext;
- }
- DoPopulateType_CeCheckEnum(typeInstance, underlyingTypeDeferred);
- auto methodInstance = GetRawMethodInstanceAtIdx(typeInstance, methodDef->mIdx);
- auto result = mCompiler->mCEMachine->Call(methodDef->GetRefNode(), this, methodInstance, {}, (CeEvalFlags)(CeEvalFlags_PersistantError | CeEvalFlags_DeferIfNotOnlyError), NULL);
-
- if ((onCompileKind == BfCEOnCompileKind_TypeDone) && (typeInstance->mDefineState > BfTypeDefineState_CETypeInit))
- {
- // Type done, okay
- }
- else if (typeInstance->mDefineState != BfTypeDefineState_CETypeInit)
- {
- // We populated before we could finish
- AssertErrorState();
- }
- else
- {
- if ((!result) && (mCompiler->mFastFinish))
- {
- if ((typeInstance->mCeTypeInfo != NULL) && (typeInstance->mCeTypeInfo->mNext == NULL))
- typeInstance->mCeTypeInfo->mNext = new BfCeTypeInfo();
- if ((typeInstance->mCeTypeInfo != NULL) && (typeInstance->mCeTypeInfo->mNext != NULL))
- typeInstance->mCeTypeInfo->mNext->mFailed = true;
- if (typeInstance->mCeTypeInfo != NULL)
- {
- BfCeTypeEmitEntry* entry = NULL;
- if (typeInstance->mCeTypeInfo->mOnCompileMap.TryGetValue(methodDef->mIdx, &entry))
- {
- ceEmitContext->mEmitData = entry->mEmitData;
- }
- }
- }
- else if (!ceEmitContext->mEmitData.IsEmpty())
- {
- if (typeInstance->mCeTypeInfo == NULL)
- typeInstance->mCeTypeInfo = new BfCeTypeInfo();
- if (typeInstance->mCeTypeInfo->mNext == NULL)
- typeInstance->mCeTypeInfo->mNext = new BfCeTypeInfo();
- BfCeTypeEmitEntry entry;
- entry.mEmitData = ceEmitContext->mEmitData;
- typeInstance->mCeTypeInfo->mNext->mOnCompileMap[methodDef->mIdx] = entry;
- }
-
- if (!ceEmitContext->mEmitData.IsEmpty())
- {
- String ctxStr = "OnCompile execution of ";
- ctxStr += MethodToString(methodInstance);
- ctxStr += " ";
- ctxStr += methodInstance->mMethodDef->GetRefNode()->LocationToString();
- UpdateCEEmit(ceEmitContext, typeInstance, ctxStr, methodInstance->mMethodDef->GetRefNode());
- }
- }
- if (mCompiler->mCanceling)
- {
- DeferRebuildType(typeInstance);
- }
- }
- // if ((!typeInstance->IsInstanceOf(mCompiler->mValueTypeTypeDef)) &&
- // (!typeInstance->IsInstanceOf(mCompiler->mBfObjectTypeDef)) &&
- // (!typeInstance->IsBoxed()) &&
- // (!typeInstance->IsDelegate()) &&
- // (!typeInstance->IsTuple()))
- // {
- // //zTODO: TESTING, remove!
- // CEEmitParse(typeInstance, "// Testing");
- // }
- }
- void BfModule::DoCEEmit(BfTypeInstance* typeInstance, bool& hadNewMembers, bool underlyingTypeDeferred)
- {
- BfLogSysM("BfModule::DoCEEmit %p\n", typeInstance);
- CeEmitContext ceEmitContext;
- ceEmitContext.mType = typeInstance;
- ExecuteCEOnCompile(&ceEmitContext, typeInstance, BfCEOnCompileKind_TypeInit, underlyingTypeDeferred);
- hadNewMembers = (typeInstance->mTypeDef->mEmitParent != NULL);
- if (ceEmitContext.mFailed)
- TypeFailed(typeInstance);
- }
- void BfModule::DoCEEmit(BfMethodInstance* methodInstance)
- {
- auto customAttributes = methodInstance->GetCustomAttributes();
- if (customAttributes == NULL)
- return;
- auto typeInstance = methodInstance->GetOwner();
- CeEmitContext ceEmitContext;
- ceEmitContext.mMethodInstance = methodInstance;
-
- Dictionary<BfTypeInstance*, BfIRValue> prevAttrInstances;
- for (auto& customAttribute : customAttributes->mAttributes)
- {
- auto attrType = customAttribute.mType;
-
- BfMethodInstance* applyMethodInstance = NULL;
- BfIRValue irValue;
- int checkDepth = 0;
- auto checkAttrType = attrType;
- while (checkAttrType != NULL)
- {
- mContext->mUnreifiedModule->PopulateType(checkAttrType, BfPopulateType_DataAndMethods);
- if (checkAttrType->mDefineState < BfTypeDefineState_DefinedAndMethodsSlotted)
- break;
- for (auto& ifaceEntry : checkAttrType->mInterfaces)
- {
- if ((!ifaceEntry.mInterfaceType->IsInstanceOf(mCompiler->mIComptimeMethodApply)) &&
- (!ifaceEntry.mInterfaceType->IsInstanceOf(mCompiler->mIOnMethodInitTypeDef)))
- continue;
- prevAttrInstances.TryGetValue(checkAttrType, &irValue);
- applyMethodInstance = checkAttrType->mInterfaceMethodTable[ifaceEntry.mStartInterfaceTableIdx].mMethodRef;
- break;
- }
- if (applyMethodInstance != NULL)
- break;
- checkAttrType = checkAttrType->mBaseType;
- checkDepth++;
- }
- if (applyMethodInstance == NULL)
- continue;
- SetAndRestoreValue<CeEmitContext*> prevEmitContext(mCompiler->mCEMachine->mCurEmitContext, &ceEmitContext);
- auto ceContext = mCompiler->mCEMachine->AllocContext();
- BfIRValue attrVal = ceContext->CreateAttribute(customAttribute.mRef, this, typeInstance->mConstHolder, &customAttribute);
- for (int baseIdx = 0; baseIdx < checkDepth; baseIdx++)
- attrVal = mBfIRBuilder->CreateExtractValue(attrVal, 0);
- SizedArray<BfIRValue, 1> args;
- if (!attrType->IsValuelessType())
- args.Add(attrVal);
-
- auto methodInfoType = ResolveTypeDef(mCompiler->mReflectMethodInfoTypeDef);
- SizedArray<BfIRValue, 9> methodData =
- {
- mBfIRBuilder->CreateConstAggZero(mBfIRBuilder->MapType(methodInfoType->ToTypeInstance()->mBaseType, BfIRPopulateType_Identity)),
- mBfIRBuilder->CreateTypeOf(mCurTypeInstance), // mTypeInstance
- GetConstValue((int64)methodInstance, GetPrimitiveType(BfTypeCode_Int64)), // mNativeMethodInstance
- };
- FixConstValueParams(methodInfoType->ToTypeInstance(), methodData, true);
- auto fieldDataAgg = mBfIRBuilder->CreateConstAgg(mBfIRBuilder->MapType(methodInfoType, BfIRPopulateType_Identity), methodData);
- args.Add(fieldDataAgg);
- if (applyMethodInstance->GetParamCount() > 1)
- {
- if (irValue)
- args.Add(irValue);
- else
- args.Add(mBfIRBuilder->CreateConstNull());
- }
- else
- {
- // Only allow a single instance
- if (irValue)
- continue;
- }
- mCompiler->mCEMachine->mMethodInstanceSet.Add(methodInstance);
- auto activeTypeDef = typeInstance->mTypeDef;
-
- BfTypedValue result;
- ///
- {
- SetAndRestoreValue<bool> prevIgnoreWrites(mBfIRBuilder->mIgnoreWrites, true);
- result = ceContext->Call(customAttribute.mRef, this, applyMethodInstance, args, CeEvalFlags_ForceReturnThis, NULL);
- }
- if (result.mType == methodInstance->GetOwner())
- prevAttrInstances[methodInstance->GetOwner()] = result.mValue;
- if ((!result) && (mCompiler->mFastFinish))
- {
- methodInstance->mCeCancelled = true;
- }
- if ((!ceEmitContext.mEmitData.IsEmpty()) || (!ceEmitContext.mExitEmitData.IsEmpty()))
- {
- String src;
- src += "// Code emission in comptime ApplyToMethod of ";
- src += TypeToString(attrType);
- src += " to ";
- src += MethodToString(methodInstance);
- src += " ";
- src += customAttribute.mRef->LocationToString();
- src += "\n";
-
- //auto emitTypeDef = typeInstance->mCeTypeInfo->mNext->mTypeDef;
- //auto emitParser = emitTypeDef->mSource->ToParser();
- //auto emitParser = activeTypeDef->mEmitParser;
- BfReducer bfReducer;
- //bfReducer.mSource = emitParser;
- bfReducer.mPassInstance = mCompiler->mPassInstance;
- bfReducer.mSystem = mSystem;
- bfReducer.mCurTypeDecl = activeTypeDef->mTypeDeclaration;
- bfReducer.mCurMethodDecl = BfNodeDynCast<BfMethodDeclaration>(methodInstance->mMethodDef->mMethodDeclaration);
- if (!ceEmitContext.mEmitData.IsEmpty())
- {
- SetAndRestoreValue<BfAstNode*> prevCustomAttribute(mCurMethodState->mEmitRefNode, customAttribute.mRef);
- String entrySrc = src;
- if (mCurTypeInstance->mTypeDef->mEmitParent != NULL)
- entrySrc += "\n\n";
- entrySrc += src;
- entrySrc += ceEmitContext.mEmitData;
- BfCEParseContext ceParseContext = CEEmitParse(typeInstance, entrySrc);
- auto emitParser = mCurTypeInstance->mTypeDef->mSource->ToParser();
- bfReducer.mSource = emitParser;
- bfReducer.mAlloc = emitParser->mAlloc;
- bfReducer.HandleBlock(emitParser->mRootNode, false);
- Visit(emitParser->mRootNode);
- FinishCEParseContext(customAttribute.mRef, typeInstance, &ceParseContext);
- }
- if (!ceEmitContext.mExitEmitData.IsEmpty())
- {
- String exitSrc;
- if (mCurTypeInstance->mTypeDef->mEmitParent != NULL)
- exitSrc += "\n\n";
- exitSrc += src;
- exitSrc += ceEmitContext.mExitEmitData;
- BfCEParseContext ceParseContext = CEEmitParse(typeInstance, exitSrc);
- auto emitParser = mCurTypeInstance->mTypeDef->mSource->ToParser();
- bfReducer.mSource = emitParser;
- bfReducer.mAlloc = emitParser->mAlloc;
- bfReducer.HandleBlock(emitParser->mRootNode, false);
- auto deferredBlock = AddDeferredBlock(emitParser->mRootNode, &mCurMethodState->mHeadScope);
- deferredBlock->mEmitRefNode = customAttribute.mRef;
- FinishCEParseContext(customAttribute.mRef, typeInstance, &ceParseContext);
- }
- }
- mCompiler->mCEMachine->ReleaseContext(ceContext);
- }
- }
- void BfModule::DoPopulateType_SetGenericDependencies(BfTypeInstance* genericTypeInstance)
- {
- // Add generic dependencies if needed
- for (auto genericType : genericTypeInstance->mGenericTypeInfo->mTypeGenericArguments)
- {
- if (genericType->IsPrimitiveType())
- genericType = GetWrappedStructType(genericType);
- if (genericType != NULL)
- {
- AddDependency(genericType, genericTypeInstance, BfDependencyMap::DependencyFlag_TypeGenericArg);
- BfLogSysM("Adding generic dependency of %p for type %p\n", genericType, genericTypeInstance);
- }
- }
- if ((genericTypeInstance->IsSpecializedType()) &&
- (!genericTypeInstance->IsDelegateFromTypeRef()) &&
- (!genericTypeInstance->IsFunctionFromTypeRef()))
- {
- // This ensures we rebuild the unspecialized type whenever the specialized type rebuilds. This is important
- // for generic type binding
- auto unspecializedTypeInstance = GetUnspecializedTypeInstance(genericTypeInstance);
- BF_ASSERT(!unspecializedTypeInstance->IsUnspecializedTypeVariation());
- mContext->mScratchModule->AddDependency(genericTypeInstance, unspecializedTypeInstance, BfDependencyMap::DependencyFlag_UnspecializedType);
- }
- }
- void BfModule::DoPopulateType_TypeAlias(BfTypeAliasType* typeAlias)
- {
- SetAndRestoreValue<BfTypeInstance*> prevTypeInstance(mCurTypeInstance, typeAlias);
- SetAndRestoreValue<BfMethodInstance*> prevMethodInstance(mCurMethodInstance, NULL);
- SetAndRestoreValue<BfMethodState*> prevMethodState(mCurMethodState, NULL);
-
- BF_ASSERT(mCurMethodInstance == NULL);
- auto typeDef = typeAlias->mTypeDef;
- auto typeAliasDecl = (BfTypeAliasDeclaration*)typeDef->mTypeDeclaration;
- BfType* aliasToType = NULL;
- if (typeAlias->mBaseType == NULL)
- typeAlias->mBaseType = ResolveTypeDef(mCompiler->mValueTypeTypeDef)->ToTypeInstance();
-
- if ((typeAlias->mGenericTypeInfo != NULL) && (!typeAlias->mGenericTypeInfo->mFinishedGenericParams))
- FinishGenericParams(typeAlias);
-
- BfTypeState typeState(mCurTypeInstance, mContext->mCurTypeState);
- typeState.mPopulateType = BfPopulateType_Data;
- typeState.mCurBaseTypeRef = typeAliasDecl->mAliasToType;
- SetAndRestoreValue<BfTypeState*> prevTypeState(mContext->mCurTypeState, &typeState);
- if (typeAlias->mDefineState < BfTypeDefineState_Declaring)
- {
- typeAlias->mDefineState = BfTypeDefineState_Declaring;
- DoPopulateType_InitSearches(typeAlias);
- }
- typeAlias->mDefineState = BfTypeDefineState_ResolvingBaseType;
- if (!CheckCircularDataError())
- {
- if (typeAliasDecl->mAliasToType != NULL)
- aliasToType = ResolveTypeRef(typeAliasDecl->mAliasToType, BfPopulateType_IdentityNoRemapAlias);
- }
- BfLogSysM("DoPopulateType_TypeAlias %p %s = %p %s\n", typeAlias, TypeToString(typeAlias).c_str(), aliasToType, (aliasToType != NULL) ? TypeToString(aliasToType).c_str() : NULL);
- if (aliasToType != NULL)
- {
- if (aliasToType->IsConstExprValue())
- {
- Fail(StrFormat("Illegal alias to type '%s'", TypeToString(aliasToType).c_str()), typeAlias->mTypeDef->GetRefNode());
- aliasToType = NULL;
- }
- }
- if (aliasToType != NULL)
- {
- AddDependency(aliasToType, typeAlias, BfDependencyMap::DependencyFlag_DerivedFrom);
- }
- else
- mContext->mFailTypes.Add(typeAlias);
- if (typeAlias->mTypeFailed)
- aliasToType = NULL;
- if ((typeAlias->mAliasToType != NULL) && (typeAlias->mAliasToType != aliasToType) && (!typeAlias->mDependencyMap.IsEmpty()))
- mContext->RebuildDependentTypes_MidCompile(typeAlias, "type alias remapped");
- typeAlias->mAliasToType = aliasToType;
- if (aliasToType != NULL)
- {
- typeAlias->mSize = aliasToType->mSize;
- typeAlias->mAlign = aliasToType->mAlign;
- if (auto aliasToTypeInst = aliasToType->ToTypeInstance())
- {
- typeAlias->mInstSize = aliasToTypeInst->mInstSize;
- typeAlias->mInstAlign = aliasToTypeInst->mInstAlign;
- }
- else
- {
- typeAlias->mInstSize = aliasToType->mSize;
- typeAlias->mInstAlign = aliasToType->mAlign;
- }
- }
- else
- {
- typeAlias->mSize = 0;
- typeAlias->mAlign = 1;
- typeAlias->mInstSize = 0;
- typeAlias->mInstAlign = 1;
- }
- typeAlias->mDefineState = BfTypeDefineState_DefinedAndMethodsSlotted;
- typeAlias->mRebuildFlags = BfTypeRebuildFlag_None;
- if ((typeAlias->mCustomAttributes == NULL) && (typeDef->mTypeDeclaration != NULL) && (typeDef->mTypeDeclaration->mAttributes != NULL))
- typeAlias->mCustomAttributes = GetCustomAttributes(typeDef->mTypeDeclaration->mAttributes, BfAttributeTargets_Alias);
- if (typeAlias->mGenericTypeInfo != NULL)
- {
- DoPopulateType_SetGenericDependencies(typeAlias);
- }
- }
- void BfModule::DoPopulateType_InitSearches(BfTypeInstance* typeInstance)
- {
- auto typeDef = typeInstance->mTypeDef;
-
- if (typeInstance->IsGenericTypeInstance())
- {
- DoPopulateType_SetGenericDependencies(typeInstance);
- }
- auto _AddStaticSearch = [&](BfTypeDef* typeDef)
- {
- if (!typeDef->mStaticSearch.IsEmpty())
- {
- BfStaticSearch* staticSearch;
- if (typeInstance->mStaticSearchMap.TryAdd(typeDef, NULL, &staticSearch))
- {
- SetAndRestoreValue<BfTypeDef*> prevTypeDef(mContext->mCurTypeState->mCurTypeDef, typeDef);
- for (auto typeRef : typeDef->mStaticSearch)
- {
- auto staticType = ResolveTypeRef(typeRef, NULL, BfPopulateType_Identity);
- if (staticType != NULL)
- {
- auto staticTypeInst = staticType->ToTypeInstance();
- if (staticTypeInst == NULL)
- {
- Fail(StrFormat("Type '%s' cannot be used in a 'using static' declaration", TypeToString(staticType).c_str()), typeRef);
- }
- else
- {
- staticSearch->mStaticTypes.Add(staticTypeInst);
- AddDependency(staticTypeInst, typeInstance, BfDependencyMap::DependencyFlag_StaticValue);
- }
- }
- }
- }
- }
- if (!typeDef->mInternalAccessSet.IsEmpty())
- {
- BfInternalAccessSet* internalAccessSet;
- BF_ASSERT(!typeDef->IsEmitted());
- if (typeInstance->mInternalAccessMap.TryAdd(typeDef, NULL, &internalAccessSet))
- {
- for (auto typeRef : typeDef->mInternalAccessSet)
- {
- if ((typeRef->IsA<BfNamedTypeReference>()) ||
- (typeRef->IsA<BfQualifiedTypeReference>()))
- {
- String checkNamespaceStr;
- typeRef->ToString(checkNamespaceStr);
- BfAtomComposite checkNamespace;
- if (mSystem->ParseAtomComposite(checkNamespaceStr, checkNamespace))
- {
- if (mSystem->ContainsNamespace(checkNamespace, typeDef->mProject))
- {
- mSystem->RefAtomComposite(checkNamespace);
- internalAccessSet->mNamespaces.Add(checkNamespace);
- continue;
- }
- }
- }
- BfType* internalType = NULL;
- if (auto genericTypeRef = BfNodeDynCast<BfGenericInstanceTypeRef>(typeRef))
- internalType = mContext->mScratchModule->ResolveTypeRefAllowUnboundGenerics(typeRef, BfPopulateType_Identity);
- else
- internalType = ResolveTypeRef(typeRef, NULL, BfPopulateType_Identity);
- if (internalType != NULL)
- {
- auto internalTypeInst = internalType->ToTypeInstance();
- if (internalTypeInst == NULL)
- {
- Fail(StrFormat("Type '%s' cannot be used in a 'using internal' declaration", TypeToString(internalType).c_str()), typeRef);
- }
- else
- {
- internalAccessSet->mTypes.Add(internalTypeInst);
- AddDependency(internalTypeInst, typeInstance, BfDependencyMap::DependencyFlag_StaticValue);
- }
- }
- }
- }
- }
- };
- if (typeDef->mIsCombinedPartial)
- {
- for (auto partialTypeDef : typeDef->mPartials)
- _AddStaticSearch(partialTypeDef);
- }
- else
- _AddStaticSearch(typeDef);
- }
- void BfModule::DoPopulateType_FinishEnum(BfTypeInstance* typeInstance, bool underlyingTypeDeferred, HashContext* dataMemberHashCtx, BfType* unionInnerType)
- {
- if (typeInstance->IsEnum())
- {
- int64 min = 0;
- int64 max = 0;
- bool isFirst = true;
- if (typeInstance->mTypeInfoEx == NULL)
- typeInstance->mTypeInfoEx = new BfTypeInfoEx();
- bool isAllInt64 = true;
- for (auto& fieldInstanceRef : typeInstance->mFieldInstances)
- {
- auto fieldInstance = &fieldInstanceRef;
- auto fieldDef = fieldInstance->GetFieldDef();
- if ((fieldDef != NULL) && (fieldDef->IsEnumCaseEntry()))
- {
- if (fieldInstance->mConstIdx == -1)
- continue;
- auto constant = typeInstance->mConstHolder->GetConstantById(fieldInstance->mConstIdx);
- if (constant->mTypeCode != BfTypeCode_Int64)
- isAllInt64 = false;
- if (isFirst)
- {
- min = constant->mInt64;
- max = constant->mInt64;
- isFirst = false;
- }
- else
- {
- min = BF_MIN(constant->mInt64, min);
- max = BF_MAX(constant->mInt64, max);
- }
- }
- }
- typeInstance->mTypeInfoEx->mMinValue = min;
- typeInstance->mTypeInfoEx->mMaxValue = max;
- if (underlyingTypeDeferred)
- {
- BfTypeCode typeCode;
- if ((min >= -0x80) && (max <= 0x7F))
- typeCode = BfTypeCode_Int8;
- else if ((min >= 0) && (max <= 0xFF))
- typeCode = BfTypeCode_UInt8;
- else if ((min >= -0x8000) && (max <= 0x7FFF))
- typeCode = BfTypeCode_Int16;
- else if ((min >= 0) && (max <= 0xFFFF))
- typeCode = BfTypeCode_UInt16;
- else if ((min >= -0x80000000LL) && (max <= 0x7FFFFFFF))
- typeCode = BfTypeCode_Int32;
- else if ((min >= 0) && (max <= 0xFFFFFFFFLL))
- typeCode = BfTypeCode_UInt32;
- else
- typeCode = BfTypeCode_Int64;
- if (typeInstance->mIsCRepr)
- typeCode = BfTypeCode_Int32;
- if ((typeCode != BfTypeCode_Int64) || (!isAllInt64))
- {
- for (auto& fieldInstanceRef : typeInstance->mFieldInstances)
- {
- auto fieldInstance = &fieldInstanceRef;
- if (fieldInstance->mConstIdx == -1)
- continue;
- if (!fieldInstance->GetFieldDef()->IsEnumCaseEntry())
- continue;
- auto constant = typeInstance->mConstHolder->GetConstantById(fieldInstance->mConstIdx);
- if (constant->mTypeCode == typeCode)
- continue;
- BfIRValue newConstant = typeInstance->mConstHolder->CreateConst(typeCode, constant->mUInt64);
- fieldInstance->mConstIdx = newConstant.mId;
- }
- }
- BfType* underlyingType = GetPrimitiveType(typeCode);
- auto fieldInstance = &typeInstance->mFieldInstances.back();
- fieldInstance->mResolvedType = underlyingType;
- fieldInstance->mDataSize = underlyingType->mSize;
- typeInstance->mTypeInfoEx->mUnderlyingType = underlyingType;
- typeInstance->mSize = underlyingType->mSize;
- typeInstance->mAlign = underlyingType->mAlign;
- typeInstance->mInstSize = underlyingType->mSize;
- typeInstance->mInstAlign = underlyingType->mAlign;
- typeInstance->mRebuildFlags = (BfTypeRebuildFlags)(typeInstance->mRebuildFlags & ~BfTypeRebuildFlag_UnderlyingTypeDeferred);
- }
- }
- else
- {
- BF_ASSERT(!underlyingTypeDeferred);
- }
- if ((typeInstance->IsPayloadEnum()) && (!typeInstance->IsBoxed()))
- {
- typeInstance->mAlign = unionInnerType->mAlign;
- int lastTagId = -1;
- for (auto& fieldInstanceRef : typeInstance->mFieldInstances)
- {
- auto fieldInstance = &fieldInstanceRef;
- auto fieldDef = fieldInstance->GetFieldDef();
- if ((fieldDef != NULL) && (fieldInstance->mDataIdx < 0))
- {
- BF_ASSERT(fieldInstance->mResolvedType->mAlign >= 1);
- typeInstance->mAlign = BF_MAX(typeInstance->mAlign, fieldInstance->mResolvedType->mAlign);
- lastTagId = -fieldInstance->mDataIdx - 1;
- }
- }
- auto fieldInstance = &typeInstance->mFieldInstances.back();
- //BF_ASSERT(fieldInstance->mResolvedType == NULL);
- BfPrimitiveType* discriminatorType;
- if (lastTagId > 0x7FFFFFFF) // HOW?
- discriminatorType = GetPrimitiveType(BfTypeCode_Int64);
- else if (lastTagId > 0x7FFF)
- discriminatorType = GetPrimitiveType(BfTypeCode_Int32);
- else if (lastTagId > 0x7F)
- discriminatorType = GetPrimitiveType(BfTypeCode_Int16);
- else
- discriminatorType = GetPrimitiveType(BfTypeCode_Int8);
- fieldInstance->mResolvedType = discriminatorType;
- fieldInstance->mDataOffset = unionInnerType->mSize;
- fieldInstance->mDataIdx = 2; // 0 = base, 1 = payload, 2 = discriminator
- if (typeInstance->mPacking == 0)
- {
- if ((fieldInstance->mDataOffset % discriminatorType->mAlign) != 0)
- {
- fieldInstance->mDataOffset = BF_ALIGN(fieldInstance->mDataOffset, discriminatorType->mAlign);
- fieldInstance->mDataIdx++; // Add room for explicit padding
- }
- }
- typeInstance->mAlign = BF_MAX(typeInstance->mAlign, discriminatorType->mAlign);
- typeInstance->mSize = fieldInstance->mDataOffset + discriminatorType->mSize;
- typeInstance->mInstSize = typeInstance->mSize;
- typeInstance->mInstAlign = typeInstance->mAlign;
- if (dataMemberHashCtx != NULL)
- {
- dataMemberHashCtx->Mixin(unionInnerType->mTypeId);
- dataMemberHashCtx->Mixin(discriminatorType->mTypeId);
- }
- typeInstance->mMergedFieldDataCount = 1; // Track it as a single entry
- }
- }
- void BfModule::DoPopulateType_CeCheckEnum(BfTypeInstance* typeInstance, bool underlyingTypeDeferred)
- {
- if (!typeInstance->IsEnum())
- return;
- if ((!underlyingTypeDeferred) && (!typeInstance->IsPayloadEnum()))
- return;
- if ((typeInstance->mCeTypeInfo != NULL) && (typeInstance->mCeTypeInfo->mNext != NULL))
- return;
- BfType* unionInnerType = NULL;
- if (typeInstance->mIsUnion)
- {
- SetAndRestoreValue<BfTypeState::ResolveKind> prevResolveKind(mContext->mCurTypeState->mResolveKind, BfTypeState::ResolveKind_UnionInnerType);
- unionInnerType = typeInstance->GetUnionInnerType();
- }
- DoPopulateType_FinishEnum(typeInstance, underlyingTypeDeferred, NULL, unionInnerType);
- }
- void BfModule::DoPopulateType(BfType* resolvedTypeRef, BfPopulateType populateType)
- {
- if (populateType == BfPopulateType_Identity)
- return;
- auto typeInstance = resolvedTypeRef->ToTypeInstance();
- auto typeDef = typeInstance->mTypeDef;
- BF_ASSERT((typeInstance->mTypeDef->mNextRevision == NULL) || (mCompiler->IsAutocomplete()));
- // This is a special case where our base type has been rebuilt but we haven't
- if ((typeInstance->mBaseTypeMayBeIncomplete) && (!typeInstance->mTypeIncomplete))
- {
- BfLogSysM("BaseTypeMayBeIncomplete processing. Type:%p -> Base:%p\n", typeInstance, typeInstance->mBaseType);
- PopulateType(typeInstance->mBaseType, populateType);
- if (!typeInstance->mBaseType->IsIncomplete())
- typeInstance->mBaseTypeMayBeIncomplete = false;
- if (!typeInstance->mTypeIncomplete)
- return;
- }
- typeInstance->mBaseTypeMayBeIncomplete = false;
- BF_ASSERT(mIsModuleMutable);
- // Don't do type instance method processing for an autocomplete pass - this will get handled later on during
- // the PopulateType worklist pass in the full resolver. We do need to handle the methods for delegates, though,
- // since those can affect method declarations of other methods
- // TODO: Investigate this "Delegate" claim
- bool canDoMethodProcessing = ((mCompiler->mResolvePassData == NULL) || (mCompiler->mResolvePassData->mAutoComplete == NULL) /*|| (typeInstance->IsDelegate())*/);
- if (populateType == BfPopulateType_Full_Force)
- canDoMethodProcessing = true;
- if (typeInstance->mResolvingConstField)
- return;
- auto _CheckTypeDone = [&]()
- {
- if (typeInstance->mNeedsMethodProcessing)
- {
- BF_ASSERT(typeInstance->mDefineState >= BfTypeDefineState_Defined);
- if ((canDoMethodProcessing) && (populateType >= BfPopulateType_DataAndMethods))
- DoTypeInstanceMethodProcessing(typeInstance);
- return true;
- }
- if (typeInstance->mDefineState == BfTypeDefineState_DefinedAndMethodsSlotted)
- return true;
- return false;
- };
- if (_CheckTypeDone())
- return;
- // Partial population break out point
- if ((populateType >= BfPopulateType_Identity) && (populateType <= BfPopulateType_IdentityNoRemapAlias))
- return;
- if ((populateType <= BfPopulateType_AllowStaticMethods) && (typeInstance->mDefineState >= BfTypeDefineState_HasInterfaces))
- return;
- if (!resolvedTypeRef->IsValueType())
- {
- resolvedTypeRef->mSize = typeInstance->mAlign = mSystem->mPtrSize;
- }
-
- BF_ASSERT((typeInstance->mMethodInstanceGroups.size() == 0) || (typeInstance->mMethodInstanceGroups.size() == typeDef->mMethods.size()) || (typeInstance->mCeTypeInfo != NULL) || (typeInstance->IsBoxed()));
- typeInstance->mMethodInstanceGroups.Resize(typeDef->mMethods.size());
- for (int i = 0; i < (int)typeInstance->mMethodInstanceGroups.size(); i++)
- {
- typeInstance->mMethodInstanceGroups[i].mOwner = typeInstance;
- typeInstance->mMethodInstanceGroups[i].mMethodIdx = i;
- }
- AutoDisallowYield disableYield(mSystem);
- SetAndRestoreValue<BfTypeInstance*> prevTypeInstance(mCurTypeInstance, typeInstance);
- SetAndRestoreValue<BfMethodInstance*> prevMethodInstance(mCurMethodInstance, NULL);
- SetAndRestoreValue<BfMethodState*> prevMethodState(mCurMethodState, NULL);
- // WHY were we clearing these values?
- //SetAndRestoreValue<bool> prevHadError(mHadBuildError, false);
- //SetAndRestoreValue<bool> prevHadWarning(mHadBuildWarning, false);
- BfTypeState typeState(mCurTypeInstance, mContext->mCurTypeState);
- typeState.mPopulateType = populateType;
- SetAndRestoreValue<BfTypeState*> prevTypeState(mContext->mCurTypeState, &typeState);
-
- if (typeInstance->IsGenericTypeInstance())
- {
- auto genericTypeInst = (BfTypeInstance*)typeInstance;
- if (!genericTypeInst->mGenericTypeInfo->mInitializedGenericParams)
- InitGenericParams(resolvedTypeRef);
- }
- if (resolvedTypeRef->IsTypeAlias())
- {
- prevTypeState.Restore();
- DoPopulateType_TypeAlias((BfTypeAliasType*)typeInstance);
- typeInstance->mTypeIncomplete = false;
- resolvedTypeRef->mRebuildFlags = BfTypeRebuildFlag_None;
- resolvedTypeRef->mDefineState = BfTypeDefineState_DefinedAndMethodsSlotted;
- return;
- }
- if (_CheckTypeDone())
- return;
- // Don't do TypeToString until down here. Otherwise we can infinitely loop on BuildGenericParams
- bool isStruct = resolvedTypeRef->IsStruct();
- bool reportErrors = true;
- if ((mCompiler->mResolvePassData != NULL) && (mCompiler->mResolvePassData->mAutoComplete != NULL))
- reportErrors = true;
- // If we're not the defining context then we don't report errors for this type, but errors will still put the system
- // into an errored state
- SetAndRestoreValue<bool> prevReportErrors(mReportErrors, reportErrors);
-
- if (typeInstance->mIsFinishingType)
- {
- if (typeInstance->mTypeFailed)
- return;
- }
- if (!typeInstance->mTypeFailed)
- CheckCircularDataError();
- if (typeInstance->mDefineState < BfTypeDefineState_Declaring)
- {
- typeInstance->mDefineState = BfTypeDefineState_Declaring;
- DoPopulateType_InitSearches(typeInstance);
- }
- bool underlyingTypeDeferred = false;
- BfType* underlyingType = NULL;
- if (typeInstance->mBaseType != NULL)
- {
- if (typeInstance->IsTypedPrimitive())
- underlyingType = typeInstance->GetUnderlyingType();
- if ((typeInstance->mRebuildFlags & BfTypeRebuildFlag_UnderlyingTypeDeferred) != 0)
- underlyingTypeDeferred = true;
- }
- else if (typeInstance->IsEnum())
- {
- bool hasPayloads = false;
- for (auto fieldDef : typeDef->mFields)
- {
- if ((fieldDef->IsEnumCaseEntry()) && (fieldDef->mTypeRef != NULL))
- {
- hasPayloads = true;
- break;
- }
- }
- if (!hasPayloads)
- {
- bool hadType = false;
- BfAstNode* deferredErrorNode = NULL;
- char* deferredError = NULL;
- for (auto baseTypeRef : typeDef->mBaseTypes)
- {
- SetAndRestoreValue<BfTypeReference*> prevTypeRef(mContext->mCurTypeState->mCurBaseTypeRef, baseTypeRef);
- SetAndRestoreValue<BfTypeDefineState> prevDefineState(typeInstance->mDefineState, BfTypeDefineState_ResolvingBaseType);
- SetAndRestoreValue<bool> prevIgnoreError(mIgnoreErrors, true);
- SetAndRestoreValue<bool> prevSkipTypeProtectionChecks(typeInstance->mSkipTypeProtectionChecks, true);
- auto baseType = ResolveTypeRef(baseTypeRef, BfPopulateType_Declaration);
- if (baseType != NULL)
- {
- if (baseType->IsIntegral())
- {
- if (!hadType)
- {
- hadType = true;
- underlyingType = baseType;
- }
- else
- {
- deferredError = "Underlying enum type already specified";
- deferredErrorNode = baseTypeRef;
- }
- }
- else
- {
- deferredError = "Invalid underlying enum type";
- deferredErrorNode = baseTypeRef;
- }
- }
- else
- {
- AssertErrorState();
- TypeFailed(typeInstance);
- }
- }
- if (deferredError != NULL)
- Fail(deferredError, deferredErrorNode, true);
- if (underlyingType == NULL)
- {
- underlyingType = GetPrimitiveType(BfTypeCode_Int64);
- underlyingTypeDeferred = true;
- }
- }
- }
- // else if (typeInstance->IsFunction())
- // {
- // underlyingType = GetPrimitiveType(BfTypeCode_NullPtr);
- // }
- else if (((typeInstance->IsStruct()) || (typeInstance->IsTypedPrimitive())) &&
- (!typeInstance->mTypeFailed))
- {
- for (auto baseTypeRef : typeDef->mBaseTypes)
- {
- auto declTypeDef = typeDef;
- if (typeDef->mIsCombinedPartial)
- declTypeDef = typeDef->mPartials.front();
- SetAndRestoreValue<BfTypeDef*> prevTypeDef(mContext->mCurTypeState->mCurTypeDef, declTypeDef);
- SetAndRestoreValue<BfTypeDefineState> prevDefineState(typeInstance->mDefineState, BfTypeDefineState_ResolvingBaseType);
- SetAndRestoreValue<BfTypeReference*> prevTypeRef(mContext->mCurTypeState->mCurBaseTypeRef, baseTypeRef);
- // We ignore errors here to avoid double-errors for type lookups, but this is where data cycles are detected
- // but that type of error supersedes the mIgnoreErrors setting
- SetAndRestoreValue<bool> prevIgnoreError(mIgnoreErrors, true);
- // Temporarily allow us to derive from private classes, to avoid infinite loop from TypeIsSubTypeOf
- SetAndRestoreValue<bool> prevSkipTypeProtectionChecks(typeInstance->mSkipTypeProtectionChecks, true);
- auto baseType = ResolveTypeRef(baseTypeRef, BfPopulateType_Declaration);
- if (baseType != NULL)
- {
- if (baseType->IsVar())
- {
- // Ignore
- }
- else if (baseType->IsPrimitiveType())
- {
- underlyingType = baseType;
- }
- else if (baseType->IsTypedPrimitive())
- {
- //PopulateType(baseType, true);
- underlyingType = baseType->GetUnderlyingType();
- BF_ASSERT(underlyingType != NULL);
- }
- }
- else
- {
- AssertErrorState();
- TypeFailed(typeInstance);
- }
- if (_CheckTypeDone())
- {
- prevDefineState.CancelRestore();
- return;
- }
- }
- // Incase we had re-entry, work this through ourselves again here
- typeInstance->mIsTypedPrimitive = false;
- }
- if (underlyingTypeDeferred)
- typeInstance->mRebuildFlags = (BfTypeRebuildFlags)(typeInstance->mRebuildFlags | BfTypeRebuildFlag_UnderlyingTypeDeferred);
- typeInstance->mIsTypedPrimitive = underlyingType != NULL;
- int wantFieldCount = (int)typeDef->mFields.size() + (((underlyingType != NULL) || (typeInstance->IsPayloadEnum())) ? 1 : 0);
- if ((int)typeInstance->mFieldInstances.size() < wantFieldCount)
- {
- // Closures don't include the enclosed fields on their first pass through PopulateType, and they have no typeDef of their own
- // so we need to take care not to truncate their fieldInstance vector here (thus the 'wantFieldCount' check above)
- typeInstance->mFieldInstances.Resize(wantFieldCount);
- }
-
- if (underlyingType != NULL)
- {
- auto fieldInstance = &typeInstance->mFieldInstances.back();
- fieldInstance->mDataOffset = 0;
- fieldInstance->mDataSize = underlyingType->mSize;
- fieldInstance->mOwner = typeInstance;
- fieldInstance->mResolvedType = underlyingType;
- typeInstance->mSize = underlyingType->mSize;
- typeInstance->mAlign = underlyingType->mAlign;
- typeInstance->mInstSize = underlyingType->mSize;
- typeInstance->mInstAlign = underlyingType->mAlign;
- typeInstance->mHasPackingHoles = underlyingType->HasPackingHoles();
- }
- // Partial population break out point
- if (typeInstance->mDefineState < BfTypeDefineState_Declared)
- typeInstance->mDefineState = BfTypeDefineState_Declared;
-
- if (populateType == BfPopulateType_Declaration)
- {
- return;
- }
-
- if ((!mCompiler->mIsResolveOnly) && (!typeInstance->HasBeenInstantiated()))
- {
- for (auto& dep : typeInstance->mDependencyMap)
- {
- auto& depEntry = dep.mValue;
- if ((depEntry.mFlags & BfDependencyMap::DependencyFlag_Allocates) != 0)
- {
- auto depType = dep.mKey;
- if (depType->mRevision == depEntry.mRevision)
- {
- BfLogSysM("Setting mHasBeenInstantiated for %p instantiated from %p\n", typeInstance, depType);
- typeInstance->mHasBeenInstantiated = true;
- }
- }
- }
- }
- //BfLogSysM("Setting revision. Type: %p Revision: %d\n", typeInstance, mRevision);
- //typeInstance->mRevision = mRevision;
- // Temporarily allow us to derive from private classes, to avoid infinite loop from TypeIsSubTypeOf
- SetAndRestoreValue<bool> prevSkipTypeProtectionChecks(typeInstance->mSkipTypeProtectionChecks, true);
- if ((typeDef->mOuterType != NULL) && (typeDef->mOuterType->IsGlobalsContainer()))
- {
- if ((typeDef->mTypeDeclaration != NULL) && (typeDef->mTypeDeclaration->mTypeNode != NULL))
- Fail("Global blocks cannot contain type declarations", typeDef->mTypeDeclaration->mTypeNode);
- }
- /// Create DI data
- SizedArray<BfIRType, 8> llvmFieldTypes;
- int curFieldDataIdx = 0;
- typeInstance->mBaseType = NULL;
- BfTypeInstance* defaultBaseTypeInst = NULL;
- // Find base type
- BfType* baseType = NULL;
- struct BfInterfaceDecl
- {
- BfTypeInstance* mIFaceTypeInst;
- BfTypeReference* mTypeRef;
- BfTypeDef* mDeclaringType;
- };
- SizedArray<BfInterfaceDecl, 8> interfaces;
- HashSet<BfTypeInstance*> ifaceSet;
- typeInstance->mRebuildFlags = (BfTypeRebuildFlags)(typeInstance->mRebuildFlags | BfTypeRebuildFlag_ResolvingBase);
- if (resolvedTypeRef == mContext->mBfObjectType)
- {
- baseType = NULL;
- }
- else if (typeInstance->IsEnum())
- {
- if (mCompiler->mEnumTypeDef == NULL)
- {
- Fail("Enum type required");
- TypeFailed(typeInstance);
- }
- else
- baseType = ResolveTypeDef(mCompiler->mEnumTypeDef)->ToTypeInstance();
- }
- else if (resolvedTypeRef->IsObject())
- baseType = mContext->mBfObjectType;
- else if (resolvedTypeRef->IsPointer())
- {
- baseType = ResolveTypeDef(mCompiler->mPointerTTypeDef, BfPopulateType_Data);
- }
- else if ((resolvedTypeRef->IsValueType()) && (typeDef != mCompiler->mValueTypeTypeDef))
- {
- baseType = ResolveTypeDef(mCompiler->mValueTypeTypeDef, BfPopulateType_Data)->ToTypeInstance();
- }
- if (baseType != NULL)
- defaultBaseTypeInst = baseType->ToTypeInstance();
- struct _DeferredValidate
- {
- BfTypeReference* mTypeRef;
- BfTypeInstance* mGenericType;
- bool mIgnoreErrors;
- };
- Array<_DeferredValidate> deferredTypeValidateList;
- bool wantPopulateInterfaces = false;
- BfTypeReference* baseTypeRef = NULL;
- if ((typeDef->mIsDelegate) && (!typeInstance->IsClosure()))
- {
- if (mCompiler->mDelegateTypeDef == NULL)
- {
- Fail("Delegate type required");
- TypeFailed(typeInstance);
- }
- else
- baseType = ResolveTypeDef(mCompiler->mDelegateTypeDef)->ToTypeInstance();
- }
- else if (typeDef->mIsFunction)
- {
- if (mCompiler->mFunctionTypeDef == NULL)
- {
- Fail("Function type required");
- TypeFailed(typeInstance);
- }
- else
- baseType = ResolveTypeDef(mCompiler->mFunctionTypeDef)->ToTypeInstance();
- }
- else
- {
- for (auto checkTypeRef : typeDef->mBaseTypes)
- {
- if ((typeInstance->mDefineState == BfTypeDefineState_ResolvingBaseType) && (typeInstance->mTypeFailed))
- break;
- auto declTypeDef = typeDef;
- if (typeDef->mIsCombinedPartial)
- declTypeDef = typeDef->mPartials.front();
- SetAndRestoreValue<BfTypeDef*> prevTypeDef(mContext->mCurTypeState->mCurTypeDef, declTypeDef);
- SetAndRestoreValue<BfTypeReference*> prevTypeRef(mContext->mCurTypeState->mCurBaseTypeRef, checkTypeRef);
- SetAndRestoreValue<BfTypeDefineState> prevDefineState(typeInstance->mDefineState, BfTypeDefineState_ResolvingBaseType);
- bool populateBase = !typeInstance->mTypeFailed;
- BfType* checkType = checkType = ResolveTypeRef(checkTypeRef, BfPopulateType_Declaration);
- if ((checkType != NULL) && (!checkType->IsInterface()) && (populateBase))
- {
- SetAndRestoreValue<BfTypeInstance*> prevBaseType(mContext->mCurTypeState->mCurBaseType, checkType->ToTypeInstance());
- PopulateType(checkType, BfPopulateType_Data);
- }
- if (typeInstance->mDefineState >= BfTypeDefineState_Defined)
- {
- prevDefineState.CancelRestore();
- return;
- }
- if (checkType != NULL)
- {
- if (auto genericTypeInst = checkType->ToGenericTypeInstance())
- {
- // Specialized type variations don't need to validate their constraints
- if (!typeInstance->IsUnspecializedTypeVariation())
- deferredTypeValidateList.Add({ checkTypeRef, genericTypeInst, false });
- }
- auto checkTypeInst = checkType->ToTypeInstance();
- bool canDeriveFrom = checkTypeInst != NULL;
- if ((typeInstance->IsStruct()) || (typeInstance->IsTypedPrimitive()) || (typeInstance->IsBoxed()))
- canDeriveFrom |= checkType->IsPrimitiveType();
- if ((typeInstance->IsEnum()) && (!checkType->IsInterface()))
- {
- if (typeInstance->IsTypedPrimitive())
- continue;
- if (checkType->IsPrimitiveType())
- Fail(StrFormat("Enum '%s' cannot be specified as '%s' because it has a payload",
- TypeToString(typeInstance).c_str(), TypeToString(checkType).c_str()),
- checkTypeRef, true);
- else
- Fail("Enums cannot derive from other types", checkTypeRef);
- continue;
- }
- if ((checkTypeInst != NULL) && (checkTypeInst->mTypeFailed))
- {
- // To keep circular references from breaking type invariants (ie: base type loops)
- continue;
- }
- if (!canDeriveFrom)
- {
- Fail("Cannot derive from this type", checkTypeRef);
- continue;
- }
- if (checkType->IsVar())
- {
- // This can't explicitly be specified, but can occur from comptime
- continue;
- }
- if (checkType->IsInterface())
- {
- auto ifaceInst = checkType->ToTypeInstance();
- if (ifaceSet.Add(ifaceInst))
- {
- // Not base type
- BfInterfaceDecl ifaceDecl;
- ifaceDecl.mIFaceTypeInst = ifaceInst;
- ifaceDecl.mTypeRef = checkTypeRef;
- ifaceDecl.mDeclaringType = typeDef->GetDefinition();
- interfaces.push_back(ifaceDecl);
- }
- else
- {
- Fail(StrFormat("Interface '%s' is already specified", TypeToString(checkType).c_str()), checkTypeRef);
- }
- }
- else if (resolvedTypeRef == mContext->mBfObjectType)
- {
- Fail(StrFormat("Type '%s' cannot define a base type", TypeToString(baseType).c_str()), checkTypeRef);
- }
- else
- {
- if (baseTypeRef != NULL)
- {
- Fail(StrFormat("Base type '%s' already declared", TypeToString(baseType).c_str()), checkTypeRef);
- }
- else
- {
- baseTypeRef = checkTypeRef;
- if (checkTypeInst != NULL)
- {
- auto checkOuter = checkTypeInst;
- while (checkOuter != NULL)
- {
- if (checkOuter == typeInstance)
- {
- Fail(StrFormat("Type '%s' cannot be declare inner type '%s' as a base type",
- TypeToString(typeInstance).c_str(),
- TypeToString(checkTypeInst).c_str()), checkTypeRef, true);
- checkTypeInst = NULL;
- break;
- }
- checkOuter = GetOuterType(checkOuter);
- }
- }
- if (checkTypeInst != NULL)
- {
- baseType = checkTypeInst;
- }
- }
- }
- if (_CheckTypeDone())
- {
- prevDefineState.CancelRestore();
- return;
- }
- }
- else
- {
- AssertErrorState();
- // Why did we go around setting mTypeFailed on all these things?
- //typeInstance->mTypeFailed = true;
- }
- }
- wantPopulateInterfaces = true;
- }
- if ((typeInstance->mCeTypeInfo != NULL) && (!typeInstance->mCeTypeInfo->mPendingInterfaces.IsEmpty()))
- {
- for (auto ifaceTypeId : typeInstance->mCeTypeInfo->mPendingInterfaces)
- {
- auto ifaceType = mContext->mTypes[ifaceTypeId];
- if ((ifaceType == NULL) || (!ifaceType->IsInterface()))
- continue;
- auto ifaceInst = ifaceType->ToTypeInstance();
- if (ifaceSet.Add(ifaceInst))
- {
- // Not base type
- BfInterfaceDecl ifaceDecl;
- ifaceDecl.mIFaceTypeInst = ifaceInst;
- ifaceDecl.mTypeRef = NULL;
- ifaceDecl.mDeclaringType = typeDef->GetDefinition();
- interfaces.Add(ifaceDecl);
- }
- }
- }
- if (_CheckTypeDone())
- return;
- if (resolvedTypeRef->IsBoxed())
- {
- BfBoxedType* boxedType = (BfBoxedType*)resolvedTypeRef;
- if ((baseType != NULL) && (baseType->IsStruct()))
- {
- BfType* modifiedBaseType = baseType;
- if (boxedType->IsBoxedStructPtr())
- modifiedBaseType = CreatePointerType(modifiedBaseType);
- boxedType->mBoxedBaseType = CreateBoxedType(modifiedBaseType);
- PopulateType(boxedType->mBoxedBaseType);
- // Use derivedFrom for both the boxed base type and the unboxed type
- AddDependency(boxedType->mBoxedBaseType, typeInstance, BfDependencyMap::DependencyFlag_DerivedFrom);
- }
- AddDependency(boxedType->mElementType, typeInstance, BfDependencyMap::DependencyFlag_ValueTypeMemberData);
-
- baseType = mContext->mBfObjectType;
- }
- BfTypeInstance* baseTypeInst = NULL;
- if (baseType != NULL)
- {
- baseTypeInst = baseType->ToTypeInstance();
- }
- if (typeInstance->mBaseType != NULL)
- {
- BF_ASSERT(typeInstance->mBaseType == baseTypeInst);
- }
-
- if (auto genericTypeInst = typeInstance->ToGenericTypeInstance())
- {
- if ((genericTypeInst->IsSpecializedType()) && (!genericTypeInst->mGenericTypeInfo->mValidatedGenericConstraints) && (!typeInstance->IsBoxed()))
- {
- deferredTypeValidateList.Add({ NULL, genericTypeInst, true });
- }
- }
- if (!typeInstance->IsBoxed())
- {
- BfType* outerType = GetOuterType(typeInstance);
- if (outerType != NULL)
- {
- PopulateType(outerType, BfPopulateType_Identity);
- AddDependency(outerType, typeInstance, BfDependencyMap::DependencyFlag_OuterType);
- }
- }
- if ((baseTypeInst != NULL) && (typeInstance->mBaseType == NULL))
- {
- if (typeInstance->mTypeFailed)
- {
- if (baseTypeInst->IsDataIncomplete())
- {
- if (baseTypeInst->IsStruct())
- baseTypeInst = ResolveTypeDef(mCompiler->mValueTypeTypeDef)->ToTypeInstance();
- else if (baseTypeInst->IsObject())
- baseTypeInst = ResolveTypeDef(mCompiler->mBfObjectTypeDef)->ToTypeInstance();
- }
- }
- PopulateType(baseTypeInst, BfPopulateType_Data);
- typeInstance->mBaseTypeMayBeIncomplete = false;
- typeInstance->mMergedFieldDataCount = baseTypeInst->mMergedFieldDataCount;
- if ((resolvedTypeRef->IsObject()) && (!baseTypeInst->IsObject()))
- {
- Fail("Class can only derive from another class", baseTypeRef, true);
- //typeInstance->mTypeFailed = true;
- baseTypeInst = defaultBaseTypeInst;
- typeInstance->mBaseType = baseTypeInst;
- }
- else if ((resolvedTypeRef->IsStruct()) && (!baseTypeInst->IsValueType()))
- {
- Fail("Struct can only derive from another struct", baseTypeRef, true);
- //typeInstance->mTypeFailed = true;
- baseTypeInst = defaultBaseTypeInst;
- typeInstance->mBaseType = baseTypeInst;
- }
- if (!typeInstance->IsIncomplete())
- {
- // Re-entry may cause this type to be completed already
- return;
- }
- //BfLogSysM("Adding DerivedFrom dependency. Used:%p Using:%p\n", baseType, typeInstance);
- auto checkBaseType = baseTypeInst;
- while (checkBaseType != NULL)
- {
- // Add 'DerivedFrom' dependency all the way up the inheritance chain
- AddDependency(checkBaseType, typeInstance, BfDependencyMap::DependencyFlag_DerivedFrom);
- checkBaseType = checkBaseType->mBaseType;
- }
- typeInstance->mBaseType = baseTypeInst;
- typeInstance->mInheritDepth = baseTypeInst->mInheritDepth + 1;
- typeInstance->mHasParameterizedBase = baseTypeInst->mHasParameterizedBase;
- if ((baseTypeInst->IsArray()) || (baseTypeInst->IsSizedArray()) || (baseTypeInst->IsGenericTypeInstance()))
- typeInstance->mHasParameterizedBase = true;
- if (underlyingType == NULL)
- {
- typeInstance->mInstSize = baseTypeInst->mInstSize;
- typeInstance->mInstAlign = baseTypeInst->mInstAlign;
- typeInstance->mAlign = baseTypeInst->mAlign;
- typeInstance->mSize = baseTypeInst->mSize;
- typeInstance->mHasPackingHoles = baseTypeInst->mHasPackingHoles;
- if (baseTypeInst->mIsTypedPrimitive)
- typeInstance->mIsTypedPrimitive = true;
- }
- }
- typeInstance->mRebuildFlags = (BfTypeRebuildFlags)(typeInstance->mRebuildFlags & ~BfTypeRebuildFlag_ResolvingBase);
- if (populateType <= BfPopulateType_BaseType)
- return;
- if (typeInstance->IsGenericTypeInstance())
- {
- auto genericTypeInst = (BfTypeInstance*)typeInstance;
- // if (!genericTypeInst->mGenericTypeInfo->mInitializedGenericParams)
- // InitGenericParams(resolvedTypeRef);
- if (!genericTypeInst->mGenericTypeInfo->mFinishedGenericParams)
- FinishGenericParams(resolvedTypeRef);
- }
- if (wantPopulateInterfaces)
- {
- for (auto partialTypeDef : typeDef->mPartials)
- {
- if (!typeInstance->IsTypeMemberIncluded(partialTypeDef))
- continue;
- if (partialTypeDef->mTypeDeclaration == typeInstance->mTypeDef->mTypeDeclaration)
- continue;
- for (auto checkTypeRef : partialTypeDef->mBaseTypes)
- {
- SetAndRestoreValue<BfTypeReference*> prevTypeRef(mContext->mCurTypeState->mCurBaseTypeRef, checkTypeRef);
- SetAndRestoreValue<BfTypeDef*> prevTypeDef(mContext->mCurTypeState->mCurTypeDef, partialTypeDef);
- bool populateBase = !typeInstance->mTypeFailed;
- auto checkType = ResolveTypeRef(checkTypeRef, BfPopulateType_Declaration);
- if (checkType != NULL)
- {
- if (checkType->IsInterface())
- {
- BfInterfaceDecl ifaceDecl;
- ifaceDecl.mIFaceTypeInst = checkType->ToTypeInstance();
- ifaceDecl.mTypeRef = checkTypeRef;
- ifaceDecl.mDeclaringType = partialTypeDef;
- interfaces.push_back(ifaceDecl);
- }
- else
- {
- Fail(StrFormat("Extensions can only specify new interfaces, type '%s' is not a valid ", TypeToString(checkType).c_str()), checkTypeRef);
- }
- }
- }
- }
- }
- if ((typeInstance->mBaseType != NULL) && (!typeInstance->IsTypedPrimitive()))
- {
- curFieldDataIdx++;
- }
- if (!interfaces.empty())
- {
- for (int iFaceIdx = 0; iFaceIdx < (int)interfaces.size(); iFaceIdx++)
- {
- auto checkInterface = interfaces[iFaceIdx].mIFaceTypeInst;
- SetAndRestoreValue<BfTypeDef*> prevTypeDef(mContext->mCurTypeState->mCurTypeDef, interfaces[iFaceIdx].mDeclaringType);
- SetAndRestoreValue<BfTypeReference*> prevTypeRef(mContext->mCurTypeState->mCurBaseTypeRef, interfaces[iFaceIdx].mTypeRef);
- PopulateType(checkInterface, BfPopulateType_Data);
- BfTypeInterfaceEntry* found = NULL;
- bool foundExact = false;
- for (auto& typeInterfaceInst : typeInstance->mInterfaces)
- {
- if (typeInterfaceInst.mInterfaceType == checkInterface)
- {
- if (typeInterfaceInst.mDeclaringType == interfaces[iFaceIdx].mDeclaringType)
- {
- foundExact = true;
- break;
- }
- found = &typeInterfaceInst;
- }
- }
- if (foundExact)
- continue;
- BfTypeInterfaceEntry typeInterfaceInst;
- typeInterfaceInst.mDeclaringType = interfaces[iFaceIdx].mDeclaringType;
- typeInterfaceInst.mInterfaceType = checkInterface;
- typeInterfaceInst.mStartInterfaceTableIdx = -1;
- typeInterfaceInst.mStartVirtualIdx = -1;
- typeInterfaceInst.mIsRedeclared = false;
- typeInstance->mInterfaces.push_back(typeInterfaceInst);
- AddDependency(checkInterface, typeInstance, BfDependencyMap::DependencyFlag_ImplementsInterface);
- // Interfaces can list other interfaces in their declaration, so pull those in too
- for (auto depIFace : checkInterface->mInterfaces)
- {
- auto depIFaceEntry = interfaces[iFaceIdx];
- depIFaceEntry.mIFaceTypeInst = depIFace.mInterfaceType;
- interfaces.push_back(depIFaceEntry);
- }
- }
- if (typeInstance->mTypeFailed)
- {
- // Circular references in interfaces - just clear them all out
- typeInstance->mInterfaces.Clear();
- interfaces.Clear();
- }
- if (_CheckTypeDone())
- return;
- }
- if ((mCompiler->mOptions.mAllowHotSwapping) &&
- (typeInstance->mDefineState < BfTypeDefineState_HasInterfaces) &&
- (typeInstance->mDefineState != BfTypeDefineState_ResolvingBaseType))
- {
- if (typeInstance->mHotTypeData == NULL)
- {
- typeInstance->mHotTypeData = new BfHotTypeData();
- BfLogSysM("Created HotTypeData %p created for type %p in DoPopulateType\n", typeInstance->mHotTypeData, typeInstance);
- }
- // Clear any unused versions (if we have errors, etc)
- if (mCompiler->mHotState != NULL)
- typeInstance->mHotTypeData->ClearVersionsAfter(mCompiler->mHotState->mCommittedHotCompileIdx);
- else
- BF_ASSERT(typeInstance->mHotTypeData->mTypeVersions.IsEmpty()); // We should have created a new HotTypeData when rebuilding the type
- BfHotTypeVersion* hotTypeVersion = new BfHotTypeVersion();
- hotTypeVersion->mTypeId = typeInstance->mTypeId;
- if (typeInstance->mBaseType != NULL)
- {
- if (typeInstance->mBaseType->mHotTypeData != NULL)
- hotTypeVersion->mBaseType = typeInstance->mBaseType->mHotTypeData->GetLatestVersion();
- else
- {
- AssertErrorState();
- }
- }
- hotTypeVersion->mDeclHotCompileIdx = mCompiler->mOptions.mHotCompileIdx;
- if (mCompiler->IsHotCompile())
- hotTypeVersion->mCommittedHotCompileIdx = -1;
- else
- hotTypeVersion->mCommittedHotCompileIdx = 0;
- hotTypeVersion->mRefCount++;
- typeInstance->mHotTypeData->mTypeVersions.Add(hotTypeVersion);
- BfLogSysM("BfHotTypeVersion %p created for type %p\n", hotTypeVersion, typeInstance);
- }
- BF_ASSERT(!typeInstance->mNeedsMethodProcessing);
- if (typeInstance->mDefineState < BfTypeDefineState_HasInterfaces)
- typeInstance->mDefineState = BfTypeDefineState_HasInterfaces;
-
- for (auto& validateEntry : deferredTypeValidateList)
- {
- SetAndRestoreValue<BfTypeReference*> prevAttributeTypeRef(typeState.mCurAttributeTypeRef, validateEntry.mTypeRef);
- SetAndRestoreValue<bool> ignoreErrors(mIgnoreErrors, mIgnoreErrors | validateEntry.mIgnoreErrors);
- ValidateGenericConstraints(validateEntry.mTypeRef, validateEntry.mGenericType, false);
- }
- if (!typeInstance->IsBoxed())
- {
- if ((typeInstance->mCustomAttributes == NULL) && (typeDef->mTypeDeclaration != NULL) && (typeDef->HasCustomAttributes()))
- {
- BfAttributeTargets attrTarget;
- if ((typeDef->mIsDelegate) || (typeDef->mIsFunction))
- attrTarget = BfAttributeTargets_Delegate;
- else if (typeInstance->IsEnum())
- attrTarget = BfAttributeTargets_Enum;
- else if (typeInstance->IsInterface())
- attrTarget = BfAttributeTargets_Interface;
- else if ((typeInstance->IsStruct()) || (typeInstance->IsTypedPrimitive()))
- attrTarget = BfAttributeTargets_Struct;
- else
- attrTarget = BfAttributeTargets_Class;
- if (!typeInstance->mTypeFailed)
- {
- BfTypeState typeState;
- typeState.mPrevState = mContext->mCurTypeState;
- typeState.mResolveKind = BfTypeState::ResolveKind_Attributes;
- typeState.mType = typeInstance;
- SetAndRestoreValue<BfTypeState*> prevTypeState(mContext->mCurTypeState, &typeState);
- // This allows us to avoid reentrancy when checking for inner types
- SetAndRestoreValue<bool> prevSkipTypeProtectionChecks(typeInstance->mSkipTypeProtectionChecks, true);
- if (typeDef->mIsCombinedPartial)
- {
- for (auto partialTypeDef : typeDef->mPartials)
- {
- if (partialTypeDef->mTypeDeclaration->mAttributes == NULL)
- continue;
-
- typeState.mCurTypeDef = partialTypeDef;
- if (typeInstance->mCustomAttributes == NULL)
- typeInstance->mCustomAttributes = new BfCustomAttributes();
- GetCustomAttributes(typeInstance->mCustomAttributes, partialTypeDef->mTypeDeclaration->mAttributes, attrTarget);
- }
- }
- else
- {
- typeInstance->mCustomAttributes = GetCustomAttributes(typeDef->mTypeDeclaration->mAttributes, attrTarget);
- }
- }
- }
- }
- if (typeInstance->mTypeOptionsIdx == -2)
- {
- SetTypeOptions(typeInstance);
- }
- if (populateType <= BfPopulateType_AllowStaticMethods)
- return;
- prevSkipTypeProtectionChecks.Restore();
- typeInstance->mInstSize = std::max(0, typeInstance->mInstSize);
- typeInstance->mInstAlign = std::max(0, typeInstance->mInstAlign);
- ProcessCustomAttributeData();
- int packing = 0;
- bool isUnion = false;
- bool isCRepr = false;
- bool isOrdered = false;
- int alignOverride = 0;
- BfType* underlyingArrayType = NULL;
- int underlyingArraySize = -1;
- ProcessTypeInstCustomAttributes(packing, isUnion, isCRepr, isOrdered, alignOverride, underlyingArrayType, underlyingArraySize);
- if (underlyingArraySize > 0)
- {
- typeInstance->mHasUnderlyingArray = true;
- curFieldDataIdx = 0;
- }
- if (packing > 0) // Packed infers ordered
- isOrdered = true;
- typeInstance->mIsUnion = isUnion;
- if ((typeInstance->IsEnum()) && (typeInstance->IsStruct()))
- typeInstance->mIsUnion = true;
- typeInstance->mPacking = (uint8)packing;
- typeInstance->mIsCRepr = isCRepr;
-
- if (typeInstance->mTypeOptionsIdx >= 0)
- {
- auto typeOptions = mSystem->GetTypeOptions(typeInstance->mTypeOptionsIdx);
- if (typeOptions != NULL)
- {
- typeInstance->mHasBeenInstantiated = typeOptions->Apply(typeInstance->HasBeenInstantiated(), BfOptionFlags_ReflectAssumeInstantiated);
- bool alwaysInclude = typeInstance->mAlwaysIncludeFlags != 0;
- if ((typeOptions->Apply(alwaysInclude, BfOptionFlags_ReflectAlwaysIncludeType)) ||
- (typeOptions->Apply(alwaysInclude, BfOptionFlags_ReflectAlwaysIncludeAll)))
- {
- typeInstance->mAlwaysIncludeFlags = (BfAlwaysIncludeFlags)(typeInstance->mAlwaysIncludeFlags | BfAlwaysIncludeFlag_Type);
- }
- else
- {
- typeInstance->mAlwaysIncludeFlags = BfAlwaysIncludeFlag_None;
- }
- }
- }
- BfType* unionInnerType = NULL;
- bool hadDeferredVars = false;
- int dataPos;
- if (resolvedTypeRef->IsBoxed())
- {
- BfBoxedType* boxedType = (BfBoxedType*)resolvedTypeRef;
- BfType* innerType = boxedType->mElementType;
- if (boxedType->IsBoxedStructPtr())
- innerType = CreatePointerType(innerType);
- if (innerType->IsIncomplete())
- PopulateType(innerType, BfPopulateType_Data);
- auto innerTypeInst = innerType->ToTypeInstance();
- if (innerTypeInst != NULL)
- {
- if (typeInstance->mTypeDef != innerTypeInst->mTypeDef)
- {
- // Rebuild with proper typedef (generally from inner type comptime emission)
- BfLogSysM("Boxed type %p overriding typeDef to %p from inner type %p\n", typeInstance, innerTypeInst->mTypeDef, innerType);
- typeInstance->mTypeDef = innerTypeInst->mTypeDef;
- DoPopulateType(resolvedTypeRef, populateType);
- return;
- }
- while (typeInstance->mInterfaces.mSize < innerTypeInst->mInterfaces.mSize)
- {
- auto ifaceEntry = innerTypeInst->mInterfaces[typeInstance->mInterfaces.mSize];
- typeInstance->mInterfaces.Add(ifaceEntry);
- AddDependency(ifaceEntry.mInterfaceType, typeInstance, BfDependencyMap::DependencyFlag_ImplementsInterface);
- }
- }
- auto baseType = typeInstance->mBaseType;
- dataPos = baseType->mInstSize;
- int alignSize = BF_MAX(innerType->mAlign, baseType->mInstAlign);
- if (alignSize > 1)
- dataPos = (dataPos + (alignSize - 1)) & ~(alignSize - 1);
- int dataSize = innerType->mSize;
- typeInstance->mFieldInstances.push_back(BfFieldInstance());
- BfFieldInstance* fieldInstance = &typeInstance->mFieldInstances.back();
- fieldInstance->mDataOffset = dataPos;
- fieldInstance->mDataSize = innerType->mSize;
- fieldInstance->mOwner = typeInstance;
- fieldInstance->mResolvedType = innerType;
- if (!innerType->IsValuelessType())
- {
- curFieldDataIdx++;
- }
- dataPos += dataSize;
- typeInstance->mInstAlign = std::max(baseType->mInstAlign, alignSize);
- int instAlign = typeInstance->mInstAlign;
- if (instAlign != 0)
- {
- int instSize = (dataPos + (instAlign - 1)) & ~(instAlign - 1);
- if (instSize != typeInstance->mInstSize)
- {
- typeInstance->mInstSize = instSize;
- typeInstance->mHasPackingHoles = true;
- }
- }
- typeInstance->mInstSize = std::max(1, typeInstance->mInstSize);
- }
- else
- {
- dataPos = typeInstance->mInstSize;
- if (underlyingType != NULL)
- {
- if (!underlyingType->IsValuelessType())
- {
- curFieldDataIdx++;
- }
- }
-
- struct DeferredResolveEntry
- {
- BfFieldDef* mFieldDef;
- int mTypeArrayIdx;
- };
-
- BfSizedVector<DeferredResolveEntry, 8> deferredVarResolves;
- for (auto field : typeDef->mFields)
- {
- auto fieldInstance = &typeInstance->mFieldInstances[field->mIdx];
- if (fieldInstance->mResolvedType != NULL)
- continue;
- if (!typeInstance->IsTypeMemberIncluded(field->mDeclaringType))
- {
- fieldInstance->mFieldIncluded = false;
- continue;
- }
- fieldInstance->mOwner = typeInstance;
- fieldInstance->mFieldIdx = field->mIdx;
- if (typeInstance->IsInterface())
- Fail("Interfaces cannot include fields. Consider making this a property", field->GetRefNode());
- }
- int enumCaseEntryIdx = 0;
- for (int pass = 0; pass < 2; pass++)
- {
- for (auto field : typeDef->mFields)
- {
- // Do consts then non-consts. Somewhat of a hack for using consts as sized array size
- if (field->mIsConst != (pass == 0))
- continue;
- auto fieldInstance = &typeInstance->mFieldInstances[field->mIdx];
- if ((fieldInstance->mResolvedType != NULL) || (!fieldInstance->mFieldIncluded))
- continue;
- SetAndRestoreValue<BfFieldDef*> prevTypeRef(mContext->mCurTypeState->mCurFieldDef, field);
- SetAndRestoreValue<BfTypeState::ResolveKind> prevResolveKind(mContext->mCurTypeState->mResolveKind, BfTypeState::ResolveKind_FieldType);
-
- BfType* resolvedFieldType = NULL;
-
- if (field->IsEnumCaseEntry())
- {
- if (typeInstance->IsEnum())
- {
- fieldInstance->mDataIdx = -(enumCaseEntryIdx++) - 1;
- resolvedFieldType = typeInstance;
- BfType* payloadType = NULL;
- if (field->mTypeRef != NULL)
- payloadType = ResolveTypeRef(field->mTypeRef, BfPopulateType_Data, BfResolveTypeRefFlag_NoResolveGenericParam);
- if (payloadType == NULL)
- {
- if (!typeInstance->IsTypedPrimitive())
- payloadType = CreateTupleType(BfTypeVector(), Array<String>());
- }
- if (payloadType != NULL)
- {
- AddDependency(payloadType, typeInstance, BfDependencyMap::DependencyFlag_ValueTypeMemberData);
- BF_ASSERT(payloadType->IsTuple());
- resolvedFieldType = payloadType;
- fieldInstance->mIsEnumPayloadCase = true;
- }
- }
- else
- {
- Fail("Enum cases can only be declared within enum types", field->GetRefNode(), true);
- resolvedFieldType = typeInstance;
- }
- }
- else if ((field->mTypeRef != NULL) && ((field->mTypeRef->IsExact<BfVarTypeReference>()) || (field->mTypeRef->IsExact<BfLetTypeReference>()) || (field->mTypeRef->IsExact<BfExprModTypeRef>())))
- {
- resolvedFieldType = GetPrimitiveType(BfTypeCode_Var);
- DeferredResolveEntry resolveEntry;
- resolveEntry.mFieldDef = field;
- resolveEntry.mTypeArrayIdx = (int)llvmFieldTypes.size();
- deferredVarResolves.push_back(resolveEntry);
- fieldInstance->mIsInferredType = true;
- // For 'let', make read-only
- }
- else
- {
- BfResolveTypeRefFlags resolveFlags = BfResolveTypeRefFlag_NoResolveGenericParam;
- if (field->mInitializer != NULL)
- resolveFlags = (BfResolveTypeRefFlags)(resolveFlags | BfResolveTypeRefFlag_AllowInferredSizedArray);
- resolvedFieldType = ResolveTypeRef(field->mTypeRef, BfPopulateType_Declaration, resolveFlags);
- if (resolvedFieldType == NULL)
- {
- // Failed, just put in placeholder 'var'
- AssertErrorState();
- resolvedFieldType = GetPrimitiveType(BfTypeCode_Var);
- }
- }
- if (resolvedFieldType->IsUndefSizedArray())
- {
- if (auto arrayTypeRef = BfNodeDynCast<BfArrayTypeRef>(field->mTypeRef))
- {
- if (arrayTypeRef->IsInferredSize())
- {
- if (field->mInitializer != NULL)
- {
- DeferredResolveEntry resolveEntry;
- resolveEntry.mFieldDef = field;
- resolveEntry.mTypeArrayIdx = (int)llvmFieldTypes.size();
- deferredVarResolves.push_back(resolveEntry);
- fieldInstance->mIsInferredType = true;
- }
- else
- {
- AssertErrorState();
- }
- }
- }
- }
- if (resolvedFieldType->IsMethodRef())
- {
- auto methodRefType = (BfMethodRefType*)resolvedFieldType;
- }
- if (fieldInstance->mResolvedType == NULL)
- fieldInstance->mResolvedType = resolvedFieldType;
- if (field->mIsConst)
- {
- // Resolve in ResolveConstField after we finish populating entire FieldInstance list
- }
- else if (field->mIsStatic)
- {
- // Don't allocate this until after we're finished populating entire FieldInstance list,
- // because we may have re-entry and create multiple instances of this static field
- }
- }
- }
- if (!resolvedTypeRef->IsIncomplete())
- {
- // We finished resolving ourselves through a re-entry, so we're actually done here
- return;
- }
- for (auto& resolveEntry : deferredVarResolves)
- {
- hadDeferredVars = true;
- auto fieldType = ResolveVarFieldType(typeInstance, &typeInstance->mFieldInstances[resolveEntry.mFieldDef->mIdx], resolveEntry.mFieldDef);
- if (fieldType == NULL)
- {
- fieldType = mContext->mBfObjectType;
- // We used to set mTypeFailed, but mHasBuildError is enough to cause a type rebuild properly
- mHadBuildError = true;
- //typeInstance->mTypeFailed = true;
- }
- auto fieldInstance = &typeInstance->mFieldInstances[resolveEntry.mFieldDef->mIdx];
- fieldInstance->SetResolvedType(fieldType);
- }
- if (typeInstance->mResolvingConstField)
- return;
- for (auto& fieldInstanceRef : typeInstance->mFieldInstances)
- {
- auto fieldInstance = &fieldInstanceRef;
- auto fieldDef = fieldInstance->GetFieldDef();
- auto resolvedFieldType = fieldInstance->GetResolvedType();
- if (!fieldInstance->mFieldIncluded)
- continue;
- if (fieldInstance->mCustomAttributes != NULL)
- {
- // Already handled
- }
- else if ((fieldDef != NULL) && (fieldDef->mFieldDeclaration != NULL) && (fieldDef->mFieldDeclaration->mAttributes != NULL))
- {
- if (auto propDecl = BfNodeDynCast<BfPropertyDeclaration>(fieldDef->mFieldDeclaration))
- {
- // Handled elsewhere
- }
- else
- {
- BfTypeState typeState;
- typeState.mPrevState = mContext->mCurTypeState;
- typeState.mCurFieldDef = fieldDef;
- typeState.mCurTypeDef = fieldDef->mDeclaringType;
- typeState.mType = typeInstance;
- SetAndRestoreValue<BfTypeState*> prevTypeState(mContext->mCurTypeState, &typeState);
- fieldInstance->mCustomAttributes = GetCustomAttributes(fieldDef->mFieldDeclaration->mAttributes, fieldDef->mIsStatic ? BfAttributeTargets_StaticField : BfAttributeTargets_Field);
- for (auto customAttr : fieldInstance->mCustomAttributes->mAttributes)
- {
- if (TypeToString(customAttr.mType) == "System.ThreadStaticAttribute")
- {
- if ((!fieldDef->mIsStatic) || (fieldDef->mIsConst))
- {
- Fail("ThreadStatic attribute can only be used on static fields", fieldDef->mFieldDeclaration->mAttributes);
- }
- }
- }
- }
- }
- if (resolvedFieldType == NULL)
- {
- if ((underlyingType != NULL) || (typeInstance->IsPayloadEnum()))
- continue;
- }
- if (fieldDef == NULL)
- continue;
- if ((!fieldDef->mIsStatic) && (resolvedFieldType->IsValueType()))
- {
- // We need that type finished up for alignment and data size
- // But if the type has failed then we need to avoid stack overflow so we don't finish it
- SetAndRestoreValue<BfFieldDef*> prevTypeRef(mContext->mCurTypeState->mCurFieldDef, fieldDef);
- bool populateChildType = !typeInstance->mTypeFailed;
- //bool populateChildType = true;
- PopulateType(resolvedFieldType, populateChildType ? BfPopulateType_Data : BfPopulateType_Declaration);
- if (populateChildType)
- {
- if (resolvedFieldType->IsFinishingType())
- {
- AssertErrorState();
- }
- else
- BF_ASSERT(!resolvedFieldType->IsDataIncomplete());
- }
- else
- {
- if (resolvedFieldType->IsDataIncomplete())
- {
- AssertErrorState();
- resolvedFieldType = mContext->mBfObjectType;
- fieldInstance->SetResolvedType(resolvedFieldType);
- // We used to set mTypeFailed, but mHasBuildError is enough to cause a type rebuild properly
- mHadBuildError = true;
- }
- }
- }
- }
-
- bool tryCE = true;
- if (typeInstance->mDefineState == BfTypeDefineState_CETypeInit)
- {
- if (populateType <= BfPopulateType_AllowStaticMethods)
- return;
-
- int foundTypeCount = 0;
- auto typeState = mContext->mCurTypeState;
- while (typeState != NULL)
- {
- if (typeState->mType == typeInstance)
- {
- foundTypeCount++;
- if (foundTypeCount == 2)
- break;
- }
- typeState = typeState->mPrevState;
- }
- if ((foundTypeCount >= 2) || (typeInstance->mTypeDef->IsEmitted()))
- {
- String error = "OnCompile const evaluation creates a data dependency during TypeInit";
- if (mCompiler->mCEMachine->mCurBuilder != NULL)
- {
- error += StrFormat(" during const-eval generation of '%s'", MethodToString(mCompiler->mCEMachine->mCurBuilder->mCeFunction->mMethodInstance).c_str());
- }
- auto refNode = typeDef->GetRefNode();
- Fail(error, refNode);
- if ((mCompiler->mCEMachine->mCurContext != NULL) && (mCompiler->mCEMachine->mCurContext->mCurFrame != NULL))
- mCompiler->mCEMachine->mCurContext->Fail(*mCompiler->mCEMachine->mCurContext->mCurFrame, error);
- else if (mCompiler->mCEMachine->mCurContext != NULL)
- mCompiler->mCEMachine->mCurContext->Fail(error);
- tryCE = false;
- }
- }
-
- if ((typeInstance->mDefineState < BfTypeDefineState_CEPostTypeInit) && (tryCE))
- {
- BF_ASSERT(!typeInstance->mTypeDef->IsEmitted());
- if (typeInstance->mCeTypeInfo != NULL)
- typeInstance->mCeTypeInfo->mPendingInterfaces.Clear();
- typeInstance->mDefineState = BfTypeDefineState_CETypeInit;
- bool hadNewMembers = false;
- DoCEEmit(typeInstance, hadNewMembers, underlyingTypeDeferred);
- if (typeInstance->mDefineState < BfTypeDefineState_CEPostTypeInit)
- typeInstance->mDefineState = BfTypeDefineState_CEPostTypeInit;
- if (typeInstance->mCeTypeInfo != NULL)
- {
- if (typeInstance->mCeTypeInfo->mNext != NULL)
- {
- auto ceInfo = typeInstance->mCeTypeInfo->mNext;
- HashContext hashCtx;
- hashCtx.Mixin(ceInfo->mOnCompileMap.mCount);
- for (auto& kv : ceInfo->mOnCompileMap)
- {
- hashCtx.Mixin(kv.mKey);
- hashCtx.MixinStr(kv.mValue.mEmitData);
- }
- hashCtx.Mixin(ceInfo->mTypeIFaceMap.mCount);
- for (auto& kv : ceInfo->mTypeIFaceMap)
- {
- hashCtx.Mixin(kv.mKey);
- hashCtx.MixinStr(kv.mValue.mEmitData);
- }
- typeInstance->mCeTypeInfo->mNext->mHash = hashCtx.Finish128();
- if (!typeInstance->mCeTypeInfo->mNext->mFailed)
- {
- if ((typeInstance->mCeTypeInfo->mHash != typeInstance->mCeTypeInfo->mNext->mHash) && (!typeInstance->mCeTypeInfo->mHash.IsZero()))
- mContext->RebuildDependentTypes_MidCompile(typeInstance, "comptime hash changed");
- typeInstance->mCeTypeInfo->mOnCompileMap = typeInstance->mCeTypeInfo->mNext->mOnCompileMap;
- typeInstance->mCeTypeInfo->mTypeIFaceMap = typeInstance->mCeTypeInfo->mNext->mTypeIFaceMap;
- typeInstance->mCeTypeInfo->mHash = typeInstance->mCeTypeInfo->mNext->mHash;
- }
-
- delete typeInstance->mCeTypeInfo->mNext;
- typeInstance->mCeTypeInfo->mNext = NULL;
- }
- }
- if ((typeInstance->mCeTypeInfo != NULL) && (!typeInstance->mCeTypeInfo->mPendingInterfaces.IsEmpty()))
- hadNewMembers = true;
-
- if ((typeInstance->mTypeDef->IsEmitted()) && (typeInstance->mCeTypeInfo == NULL))
- {
- BF_ASSERT(mCompiler->mCanceling);
- if (mCompiler->mCanceling)
- {
- TypeFailed(typeInstance);
- auto prevTypeDef = typeInstance->mTypeDef->mEmitParent;
- delete typeInstance->mTypeDef;
- typeInstance->mTypeDef = prevTypeDef;
- hadNewMembers = false;
- }
- }
- if (hadNewMembers)
- {
- DoPopulateType(resolvedTypeRef, populateType);
- return;
- }
- if (_CheckTypeDone())
- return;
- }
- }
- if (_CheckTypeDone())
- return;
-
- BF_ASSERT(mContext->mCurTypeState == &typeState);
- //BF_ASSERT(!typeInstance->mIsFinishingType);
- typeInstance->mIsFinishingType = true;
- // No re-entry is allowed below here -- we will run all the way to the end at this point
- BfSizedVector<BfIRMDNode, 8> diFieldTypes;
- HashContext dataMemberHashCtx;
-
- if (!resolvedTypeRef->IsBoxed())
- {
- for (auto propDef : typeDef->mProperties)
- {
- if (!typeInstance->IsTypeMemberIncluded(propDef->mDeclaringType))
- continue;
- if (propDef->mFieldDeclaration != NULL)
- {
- BfTypeState typeState;
- typeState.mPrevState = mContext->mCurTypeState;
- typeState.mCurTypeDef = propDef->mDeclaringType;
- typeState.mCurFieldDef = propDef;
- typeState.mType = typeInstance;
- SetAndRestoreValue<BfTypeState*> prevTypeState(mContext->mCurTypeState, &typeState);
- BfAttributeTargets target = BfAttributeTargets_Property;
- if (propDef->IsExpressionBodied())
- target = (BfAttributeTargets)(target | BfAttributeTargets_Method);
- if (propDef->mFieldDeclaration->mAttributes != NULL)
- {
- auto customAttrs = GetCustomAttributes(propDef->mFieldDeclaration->mAttributes, target);
- delete customAttrs;
- }
- auto propDecl = (BfPropertyDeclaration*)propDef->mFieldDeclaration;
- if (propDecl->mExplicitInterface != NULL)
- {
- if ((mCompiler->mResolvePassData != NULL) && (mCompiler->mResolvePassData->mAutoComplete != NULL))
- mCompiler->mResolvePassData->mAutoComplete->CheckTypeRef(propDecl->mExplicitInterface, false);
- auto explicitInterface = ResolveTypeRef(propDecl->mExplicitInterface, BfPopulateType_Declaration);
- if (explicitInterface != NULL)
- {
- bool interfaceFound = false;
- for (auto ifaceInst : typeInstance->mInterfaces)
- interfaceFound |= ifaceInst.mInterfaceType == explicitInterface;
- if (!interfaceFound)
- {
- Fail("Containing class has not declared to implement this interface", propDecl->mExplicitInterface, true);
- }
- }
- }
- }
- if (propDef->mMethods.IsEmpty())
- {
- auto nameNode = ((BfPropertyDeclaration*)propDef->mFieldDeclaration)->mNameNode;
- if (nameNode != NULL)
- {
- Fail(StrFormat("Property or indexer '%s.%s' must have at least one accessor", TypeToString(typeInstance).c_str(), propDef->mName.c_str()),
- nameNode, true); // CS0548
- }
- }
- }
- bool isGlobalContainer = typeDef->IsGlobalsContainer();
- if (typeInstance->mBaseType != NULL)
- {
- dataMemberHashCtx.Mixin(typeInstance->mBaseType->mTypeId);
- if (typeInstance->mBaseType->mHotTypeData != NULL)
- {
- BfHotTypeVersion* ver = typeInstance->mBaseType->mHotTypeData->GetLatestVersion();
- dataMemberHashCtx.Mixin(ver->mDataHash);
- }
- }
- dataMemberHashCtx.Mixin(typeInstance->mPacking);
- dataMemberHashCtx.Mixin(typeInstance->mIsCRepr);
- dataMemberHashCtx.Mixin(typeInstance->mIsUnion);
- int startDataPos = dataPos;
- int maxDataPos = dataPos;
- BfSizedVector<BfFieldInstance*, 16> dataFieldVec;
-
- bool allowInstanceFields = (underlyingType == NULL);
- if (typeInstance->IsTypedPrimitive())
- allowInstanceFields = false;
- // We've resolved all the 'var' entries, so now build the actual composite type
- for (auto& fieldInstanceRef : typeInstance->mFieldInstances)
- {
- auto fieldInstance = &fieldInstanceRef;
- if (!fieldInstance->mFieldIncluded)
- continue;
- auto resolvedFieldType = fieldInstance->GetResolvedType();
- if (fieldInstance->mResolvedType == NULL)
- {
- if ((underlyingType == NULL) && (!typeInstance->IsPayloadEnum()))
- BF_ASSERT(typeInstance->mTypeFailed);
- continue;
- }
- if ((fieldInstance->GetFieldDef() != NULL) && (fieldInstance->GetFieldDef()->mIsConst))
- {
- // Resolve later
- AddDependency(resolvedFieldType, typeInstance, BfDependencyMap::DependencyFlag_ConstValue);
- }
- else if (fieldInstance->GetFieldDef() != NULL)
- {
- if (!fieldInstance->GetFieldDef()->mIsStatic)
- AddFieldDependency(typeInstance, fieldInstance, resolvedFieldType);
- else
- AddDependency(resolvedFieldType, typeInstance, BfDependencyMap::DependencyFlag_StaticValue);
- }
- auto fieldDef = fieldInstance->GetFieldDef();
- if (fieldInstance->mResolvedType != NULL)
- {
- auto resolvedFieldType = fieldInstance->GetResolvedType();
- if ((!typeInstance->IsBoxed()) && (fieldDef != NULL))
- {
- if (fieldInstance->mIsEnumPayloadCase)
- {
- PopulateType(resolvedFieldType, BfPopulateType_Data);
- if (resolvedFieldType->WantsGCMarking())
- typeInstance->mWantsGCMarking = true;
- }
- if ((!fieldDef->mIsConst) && (!fieldDef->mIsStatic))
- {
- PopulateType(resolvedFieldType, resolvedFieldType->IsValueType() ? BfPopulateType_Data : BfPopulateType_Declaration);
- if (resolvedFieldType->WantsGCMarking())
- typeInstance->mWantsGCMarking = true;
- fieldInstance->mMergedDataIdx = typeInstance->mMergedFieldDataCount;
- if (resolvedFieldType->IsStruct())
- {
- auto resolvedFieldTypeInstance = resolvedFieldType->ToTypeInstance();
- typeInstance->mMergedFieldDataCount += resolvedFieldTypeInstance->mMergedFieldDataCount;
- }
- else if (!resolvedFieldType->IsValuelessType())
- typeInstance->mMergedFieldDataCount++;
- if (fieldDef->mIsExtern)
- {
- Fail("Cannot declare instance member as 'extern'", fieldDef->mFieldDeclaration->mExternSpecifier, true);
- }
- BfAstNode* nameRefNode = NULL;
- if (fieldDef->mFieldDeclaration != NULL)
- nameRefNode = fieldDef->mFieldDeclaration->mNameNode;
- if (nameRefNode == NULL)
- nameRefNode = fieldDef->mTypeRef;
- if (!allowInstanceFields)
- {
- if (typeInstance->IsEnum())
- Fail("Cannot declare instance members in an enum", nameRefNode, true);
- else if (typeInstance->IsFunction())
- Fail("Cannot declare instance members in a function", nameRefNode, true);
- else
- Fail("Cannot declare instance members in a typed primitive struct", nameRefNode, true);
- TypeFailed(typeInstance);
- fieldInstance->mDataIdx = -1;
- continue;
- }
- if (typeDef->mIsStatic)
- {
- //CS0708
- Fail("Cannot declare instance members in a static class", nameRefNode, true);
- }
- if (resolvedFieldType->IsValueType())
- {
- BF_ASSERT(!resolvedFieldType->IsDataIncomplete());
- }
- if (!mCompiler->mIsResolveOnly)
- {
- dataMemberHashCtx.MixinStr(fieldDef->mName);
- dataMemberHashCtx.Mixin(resolvedFieldType->mTypeId);
- }
- int dataSize = resolvedFieldType->mSize;
- int alignSize = resolvedFieldType->mAlign;
- fieldInstance->mDataSize = dataSize;
- if (!isUnion)
- {
- if (!resolvedFieldType->IsValuelessType())
- {
- dataFieldVec.push_back(fieldInstance);
- }
- }
- else
- {
- BF_ASSERT(resolvedFieldType->mSize >= 0);
- if (alignSize > 1)
- dataPos = (dataPos + (alignSize - 1)) & ~(alignSize - 1);
- fieldInstance->mDataOffset = dataPos;
-
- typeInstance->mInstAlign = std::max(typeInstance->mInstAlign, alignSize);
- dataPos += dataSize;
- if (dataPos > maxDataPos)
- {
- maxDataPos = dataPos;
- }
- dataPos = startDataPos;
- }
- auto fieldTypeInst = resolvedFieldType->ToTypeInstance();
- if (fieldTypeInst != NULL)
- {
- if ((fieldTypeInst->mRebuildFlags & BfTypeRebuildFlag_UnderlyingTypeDeferred) != 0)
- {
- BfAstNode* refNode = fieldDef->mFieldDeclaration;
- String failStr;
- failStr = StrFormat("Circular data reference detected between '%s' and '%s'", TypeToString(mCurTypeInstance).c_str(), TypeToString(fieldTypeInst).c_str());
- if (!mContext->mFieldResolveReentrys.IsEmpty())
- {
- failStr += StrFormat(" with the following fields:", TypeToString(mCurTypeInstance).c_str());
- for (int i = 0; i < (int)mContext->mFieldResolveReentrys.size(); i++)
- {
- auto checkField = mContext->mFieldResolveReentrys[i];
- if (i > 0)
- failStr += ",";
- failStr += "\n '" + TypeToString(typeInstance) + "." + checkField->GetFieldDef()->mName + "'";
- if (checkField->mOwner == fieldTypeInst)
- refNode = checkField->GetFieldDef()->mFieldDeclaration;
- }
- }
- BfError* err = Fail(failStr, refNode);
- if (err)
- err->mIsPersistent = true;
- }
- }
- }
- bool useForUnion = false;
- if (fieldInstance->mIsEnumPayloadCase)
- {
- if (!typeInstance->IsEnum())
- {
- Fail("Cases can only be used in enum types", fieldDef->mFieldDeclaration);
- }
- else
- {
- BF_ASSERT(typeInstance->mIsUnion);
- }
- }
-
- if ((!fieldDef->mIsStatic) && (!resolvedFieldType->IsValuelessType()))
- {
- if (isUnion)
- {
- fieldInstance->mDataIdx = curFieldDataIdx;
- }
- }
- }
- if ((!typeInstance->IsSpecializedType()) && (!typeInstance->IsOnDemand()) && (fieldDef != NULL) && (!CheckDefineMemberProtection(fieldDef->mProtection, resolvedFieldType)))
- {
- //CS0052
- Fail(StrFormat("Inconsistent accessibility: field type '%s' is less accessible than field '%s.%s'",
- TypeToString(resolvedFieldType).c_str(), TypeToString(mCurTypeInstance).c_str(), fieldDef->mName.c_str()),
- fieldDef->mTypeRef, true);
- }
- }
- }
- if (typeInstance->mIsUnion)
- {
- SetAndRestoreValue<BfTypeState::ResolveKind> prevResolveKind(typeState.mResolveKind, BfTypeState::ResolveKind_UnionInnerType);
- unionInnerType = typeInstance->GetUnionInnerType();
- }
- if (!isOrdered)
- {
- int dataFieldCount = (int)dataFieldVec.size();
- Array<Deque<BfFieldInstance*>> alignBuckets;
- for (auto fieldInst : dataFieldVec)
- {
- int alignBits = GetHighestBitSet(fieldInst->GetAlign(packing));
- while (alignBits >= alignBuckets.size())
- alignBuckets.Add({});
- alignBuckets[alignBits].Add(fieldInst);
- }
- dataFieldVec.clear();
- int curSize = typeInstance->mInstSize;
- while (dataFieldVec.size() != dataFieldCount)
- {
- // Clear out completed buckets
- while (alignBuckets[alignBuckets.size() - 1].IsEmpty())
- {
- alignBuckets.pop_back();
- }
- int alignBits = GetNumLowZeroBits(curSize) + 1;
- alignBits = BF_MIN(alignBits, (int)alignBuckets.size() - 1);
- bool foundEntry = false;
- while (alignBits >= 0)
- {
- if (alignBuckets[alignBits].IsEmpty())
- {
- alignBits--;
- continue;
- }
- bool isHighestBucket = alignBits == alignBuckets.size() - 1;
-
- auto fieldInst = alignBuckets[alignBits][0];
- alignBuckets[alignBits].RemoveAt(0);
- dataFieldVec.push_back(fieldInst);
- curSize = BF_ALIGN(curSize, fieldInst->GetAlign(packing));
- curSize += fieldInst->mResolvedType->mSize;
- foundEntry = true;
- if (!isHighestBucket)
- {
- // We may have a larger type that can fit now...
- break;
- }
- }
-
- if (!foundEntry)
- {
- // If no entries will fit, then force an entry of the smallest alignment
- for (int alignBits = 0; alignBits < alignBuckets.size(); alignBits++)
- {
- if (!alignBuckets[alignBits].IsEmpty())
- {
- auto fieldInst = alignBuckets[alignBits][0];
- alignBuckets[alignBits].RemoveAt(0);
- dataFieldVec.push_back(fieldInst);
- curSize = BF_ALIGN(curSize, fieldInst->GetAlign(packing));
- curSize += fieldInst->mResolvedType->mSize;
- break;
- }
- }
- }
- }
- }
- bool needsExplicitAlignment = true;
- for (int fieldIdx = 0; fieldIdx < (int)dataFieldVec.size(); fieldIdx++)
- {
- auto fieldInstance = dataFieldVec[fieldIdx];
- auto resolvedFieldType = fieldInstance->GetResolvedType();
- BF_ASSERT(resolvedFieldType->mSize >= 0);
- int dataSize = resolvedFieldType->mSize;
- int alignSize = fieldInstance->GetAlign(packing);
- fieldInstance->mDataSize = dataSize;
- int nextDataPos = dataPos;
- nextDataPos = (dataPos + (alignSize - 1)) & ~(alignSize - 1);
- int padding = nextDataPos - dataPos;
- if ((alignSize > 1) && (needsExplicitAlignment) && (padding > 0))
- {
- curFieldDataIdx++;
- }
- dataPos = nextDataPos;
- fieldInstance->mDataOffset = dataPos;
- fieldInstance->mDataIdx = curFieldDataIdx++;
-
- typeInstance->mInstAlign = std::max(typeInstance->mInstAlign, alignSize);
- dataPos += dataSize;
- }
- if (unionInnerType != NULL)
- {
- dataPos = unionInnerType->mSize;
- typeInstance->mInstAlign = BF_MAX(unionInnerType->mAlign, typeInstance->mInstAlign);
- }
- // Old dataMemberHash location
- CheckMemberNames(typeInstance);
- if (alignOverride > 0)
- typeInstance->mInstAlign = alignOverride;
- else
- typeInstance->mInstAlign = std::max(1, typeInstance->mInstAlign);
- int alignSize = typeInstance->mInstAlign;
- if (isCRepr)
- {
- // Align size to alignment
- if (alignSize >= 1)
- typeInstance->mInstSize = (dataPos + (alignSize - 1)) & ~(alignSize - 1);
- typeInstance->mIsCRepr = true;
- }
- else
- {
- typeInstance->mInstSize = dataPos;
- typeInstance->mIsCRepr = false;
- }
- if ((mCompiler->mResolvePassData != NULL) && (mCompiler->mResolvePassData->mAutoComplete != NULL))
- {
- for (auto propDef : typeInstance->mTypeDef->mProperties)
- if (propDef->mFieldDeclaration != NULL)
- mCompiler->mResolvePassData->mAutoComplete->CheckProperty(BfNodeDynCast<BfPropertyDeclaration>(propDef->mFieldDeclaration));
- }
- }
-
- if (typeInstance->IsObjectOrInterface())
- typeInstance->mWantsGCMarking = true;
- if ((mCompiler->mOptions.mEnableRealtimeLeakCheck) && (!typeInstance->mWantsGCMarking))
- {
- typeInstance->mTypeDef->PopulateMemberSets();
- BfMemberSetEntry* entry = NULL;
- BfMethodDef* methodDef = NULL;
- if (typeInstance->mTypeDef->mMethodSet.TryGetWith(String(BF_METHODNAME_MARKMEMBERS), &entry))
- {
- methodDef = (BfMethodDef*)entry->mMemberDef;
- if (methodDef->HasBody())
- typeInstance->mWantsGCMarking = true;
- }
- }
-
- if (typeInstance->IsValueType())
- {
- typeInstance->mSize = typeInstance->mInstSize;
- typeInstance->mAlign = typeInstance->mInstAlign;
- }
-
- if ((mCompiler->mOptions.mAllowHotSwapping) && (typeInstance->mDefineState < BfTypeDefineState_Defined))
- {
- if (typeInstance->mHotTypeData == NULL)
- {
- BF_ASSERT(typeInstance->mTypeFailed);
- }
- else
- {
- auto hotTypeVersion = typeInstance->mHotTypeData->mTypeVersions.back();
- if ((typeInstance->mBaseType != NULL) && (typeInstance->mBaseType->mHotTypeData != NULL))
- {
- hotTypeVersion->mMembers.Add(typeInstance->mBaseType->mHotTypeData->GetLatestVersion());
- }
- for (auto& fieldInst : typeInstance->mFieldInstances)
- {
- auto fieldDef = fieldInst.GetFieldDef();
- if ((fieldDef == NULL) || (fieldDef->mIsStatic))
- continue;
- auto depType = fieldInst.mResolvedType;
- while (depType->IsSizedArray())
- depType = ((BfSizedArrayType*)depType)->mElementType;
- if (depType->IsStruct())
- {
- PopulateType(depType);
- auto depTypeInst = depType->ToTypeInstance();
- BF_ASSERT(depTypeInst->mHotTypeData != NULL);
- if (depTypeInst->mHotTypeData != NULL)
- hotTypeVersion->mMembers.Add(depTypeInst->mHotTypeData->GetLatestVersion());
- }
- }
- for (auto member : hotTypeVersion->mMembers)
- member->mRefCount++;
- }
- }
- if (_CheckTypeDone())
- return;
- if (typeInstance->mDefineState < BfTypeDefineState_Defined)
- {
- typeInstance->mDefineState = BfTypeDefineState_Defined;
- if (!typeInstance->IsBoxed())
- {
- ExecuteCEOnCompile(NULL, typeInstance, BfCEOnCompileKind_TypeDone, underlyingTypeDeferred);
- if (typeInstance->mDefineState == BfTypeDefineState_DefinedAndMethodsSlotted)
- return;
- }
- }
- if (typeInstance->mTypeFailed)
- mHadBuildError = true;
- CheckAddFailType();
-
- BF_ASSERT_REL(typeInstance->mDefineState != BfTypeDefineState_DefinedAndMethodsSlotting);
- BF_ASSERT_REL(typeInstance->mDefineState != BfTypeDefineState_DefinedAndMethodsSlotted);
- BfLogSysM("Setting mNeedsMethodProcessing=true on %p\n", typeInstance);
- typeInstance->mNeedsMethodProcessing = true;
- typeInstance->mIsFinishingType = false;
- ///
- // 'Splattable' means that we can be passed via 3 or fewer primitive/pointer values
- if (typeInstance->mHasUnderlyingArray)
- {
- // Never splat
- }
- else if (typeInstance->IsStruct())
- {
- bool hadNonSplattable = false;
- if (typeInstance->mBaseType != NULL)
- PopulateType(typeInstance->mBaseType, BfPopulateType_Data);
- if ((typeInstance->mBaseType == NULL) || (typeInstance->mBaseType->IsSplattable()))
- {
- int dataCount = 0;
-
- std::function<void(BfType*)> splatIterate;
- splatIterate = [&](BfType* checkType)
- {
- if (checkType->IsValueType())
- PopulateType(checkType, BfPopulateType_Data);
- if (checkType->IsMethodRef())
- {
- // For simplicity, any methodRef inside a struct makes the struct non-splattable. This reduces cases of needing to
- // handle embedded methodRefs
- hadNonSplattable = true;
- }
- else if (checkType->IsOpaque())
- {
- hadNonSplattable = true;
- }
- else if (checkType->IsStruct())
- {
- auto checkTypeInstance = checkType->ToTypeInstance();
- if (checkTypeInstance->mBaseType != NULL)
- splatIterate(checkTypeInstance->mBaseType);
- if (checkTypeInstance->mIsUnion)
- {
- bool wantSplat = false;
- auto unionInnerType = checkTypeInstance->GetUnionInnerType(&wantSplat);
- if (!wantSplat)
- hadNonSplattable = true;
- splatIterate(unionInnerType);
- if (checkTypeInstance->IsEnum())
- dataCount++; // Discriminator
- }
- else
- {
- for (int fieldIdx = 0; fieldIdx < (int)checkTypeInstance->mFieldInstances.size(); fieldIdx++)
- {
- auto fieldInstance = (BfFieldInstance*)&checkTypeInstance->mFieldInstances[fieldIdx];
- if (fieldInstance->mDataIdx >= 0)
- splatIterate(fieldInstance->GetResolvedType());
- }
- }
- }
- else if (!checkType->IsValuelessType())
- {
- if (checkType->IsSizedArray())
- hadNonSplattable = true;
-
- dataCount += checkType->GetSplatCount();
- }
- };
- splatIterate(typeInstance);
- if (isCRepr)
- {
- if ((mCompiler->mOptions.mMachineType == BfMachineType_x86) && (mCompiler->mOptions.mPlatformType == BfPlatformType_Windows))
- {
- typeInstance->mIsSplattable = (dataCount <= 4) && (!hadNonSplattable) && (dataPos > 4);
- }
- else
- typeInstance->mIsSplattable = false;
- }
- else
- typeInstance->mIsSplattable = (dataCount <= 3) && (!hadNonSplattable);
- }
- }
- if (typeInstance->IsTypedPrimitive())
- typeInstance->mIsSplattable = true;
- if (typeInstance->mTypeDef->mIsOpaque)
- typeInstance->mIsSplattable = false;
-
- BF_ASSERT(mContext->mCurTypeState == &typeState);
- // This is only required for autocomplete and finding type references
- if (!typeInstance->IsSpecializedType())
- {
- for (auto propDef : typeDef->mProperties)
- {
- if (propDef->mTypeRef == NULL)
- continue;
- BfTypeState typeState;
- typeState.mPrevState = mContext->mCurTypeState;
- typeState.mCurTypeDef = propDef->mDeclaringType;
- typeState.mType = typeInstance;
- SetAndRestoreValue<BfTypeState*> prevTypeState(mContext->mCurTypeState, &typeState);
- ResolveTypeRef(propDef->mTypeRef, BfPopulateType_Identity, BfResolveTypeRefFlag_AllowRef);
- }
- }
- // Const handling
- {
- Dictionary<int64, BfFieldDef*> valueMap;
- for (auto& fieldInstanceRef : typeInstance->mFieldInstances)
- {
- auto fieldInstance = &fieldInstanceRef;
- if (!fieldInstance->mFieldIncluded)
- continue;
- auto fieldDef = fieldInstance->GetFieldDef();
- if (fieldDef == NULL)
- continue;
- if ((fieldInstance->mConstIdx == -1) && (fieldDef->mIsConst))
- {
- SetAndRestoreValue<BfFieldDef*> prevTypeRef(mContext->mCurTypeState->mCurFieldDef, fieldDef);
- typeInstance->mModule->ResolveConstField(typeInstance, fieldInstance, fieldDef);
- // Check enum cases for duplicates
- if (mCurTypeInstance->IsEnum())
- {
- auto underlyingType = fieldInstance->mResolvedType->GetUnderlyingType();
- if ((fieldDef->IsEnumCaseEntry()) && (fieldInstance->mConstIdx != -1) && (underlyingType->IsIntegral()))
- {
- auto foreignConst = typeInstance->mConstHolder->GetConstantById(fieldInstance->mConstIdx);
- BfFieldDef** fieldDefPtr;
- if (valueMap.TryAdd(foreignConst->mInt64, NULL, &fieldDefPtr))
- {
- *fieldDefPtr = fieldDef;
- }
- else if ((typeInstance->mCustomAttributes == NULL) || (typeInstance->mCustomAttributes->Get(mCompiler->mAllowDuplicatesAttributeTypeDef) == NULL))
- {
- auto error = Warn(0, StrFormat("Enum value '%lld' for field '%s' is not unique. Considering adding [AllowDuplicates] to the type declaration.", foreignConst->mInt64, fieldDef->mName.c_str()), fieldDef->GetRefNode(), true);
- if (error != NULL)
- mCompiler->mPassInstance->MoreInfo(StrFormat("This value was previously used for field '%s'", (*fieldDefPtr)->mName.c_str()), (*fieldDefPtr)->GetRefNode());
- }
- }
- }
- }
- }
- }
-
- if ((typeInstance->IsEnum()) && (!typeInstance->IsPayloadEnum()))
- {
- BfLogSysM("Setting underlying type %p %d\n", typeInstance, underlyingTypeDeferred);
- }
- DoPopulateType_FinishEnum(typeInstance, underlyingTypeDeferred, &dataMemberHashCtx, unionInnerType);
- if (!typeInstance->IsBoxed())
- {
- if (typeInstance->IsTypedPrimitive())
- {
- auto underlyingType = typeInstance->GetUnderlyingType();
- dataMemberHashCtx.Mixin(underlyingType->mTypeId);
- }
- Val128 dataMemberHash = dataMemberHashCtx.Finish128();
- if (typeInstance->mHotTypeData != NULL)
- {
- auto newHotTypeVersion = typeInstance->mHotTypeData->GetLatestVersion();
- newHotTypeVersion->mDataHash = dataMemberHash;
- if (mCompiler->mHotState != NULL)
- {
- auto committedHotTypeVersion = typeInstance->mHotTypeData->GetTypeVersion(mCompiler->mHotState->mCommittedHotCompileIdx);
- if (committedHotTypeVersion != NULL)
- {
- if ((newHotTypeVersion->mDataHash != committedHotTypeVersion->mDataHash) && (typeInstance->mIsReified))
- {
- BfLogSysM("Hot compile detected data changes in %p '%s'\n", resolvedTypeRef, TypeToString(typeInstance).c_str());
- if (!typeInstance->mHotTypeData->mPendingDataChange)
- {
- mCompiler->mHotState->mPendingDataChanges.Add(typeInstance->mTypeId);
- typeInstance->mHotTypeData->mPendingDataChange = true;
- }
- else
- {
- BF_ASSERT(mCompiler->mHotState->mPendingDataChanges.Contains(typeInstance->mTypeId));
- }
- bool baseHadChanges = (typeInstance->mBaseType != NULL) && (typeInstance->mBaseType->mHotTypeData != NULL) && (typeInstance->mBaseType->mHotTypeData->mPendingDataChange);
- if (!baseHadChanges)
- Warn(0, StrFormat("Hot compile detected data changes in '%s'", TypeToString(typeInstance).c_str()), typeDef->GetRefNode());
- }
- else if (typeInstance->mHotTypeData->mPendingDataChange)
- {
- BfLogSysM("Hot compile removed pending data change for %p '%s'\n", resolvedTypeRef, TypeToString(typeInstance).c_str());
- mCompiler->mHotState->RemovePendingChanges(typeInstance);
- }
- }
- }
- }
- }
- if (typeInstance == mContext->mBfObjectType)
- typeInstance->mHasBeenInstantiated = true;
- auto _HandleTypeDeclaration = [&](BfTypeDeclaration* typeDeclaration)
- {
- if ((typeDeclaration != NULL) && (typeDeclaration->mNameNode != NULL))
- {
- auto typeRefSource = typeDeclaration->mNameNode->GetParserData();
- if ((mCompiler->mResolvePassData != NULL) && (mCompiler->mResolvePassData->mSourceClassifier != NULL) && (typeRefSource != NULL) && (typeRefSource == mCompiler->mResolvePassData->mParser->mSourceData))
- {
- BfSourceElementType elemType = BfSourceElementType_Type;
- if (typeInstance->IsInterface())
- elemType = BfSourceElementType_Interface;
- else if (typeInstance->IsObject())
- elemType = BfSourceElementType_RefType;
- else if (typeInstance->IsStruct() || (typeInstance->IsTypedPrimitive() && !typeInstance->IsEnum()))
- elemType = BfSourceElementType_Struct;
- mCompiler->mResolvePassData->mSourceClassifier->SetElementType(typeDeclaration->mNameNode, elemType);
- }
- }
- };
- if (!typeInstance->IsBoxed())
- {
- _HandleTypeDeclaration(typeDef->mTypeDeclaration);
- for (auto partial : typeDef->mPartials)
- _HandleTypeDeclaration(partial->mTypeDeclaration);
- }
- if (typeInstance->IsGenericTypeInstance())
- {
- auto genericTypeInst = (BfTypeInstance*)typeInstance;
- if (!genericTypeInst->mGenericTypeInfo->mFinishedGenericParams)
- FinishGenericParams(resolvedTypeRef);
- }
- if (populateType <= BfPopulateType_Data)
- return;
- disableYield.Release();
- prevTypeState.Restore();
- if (canDoMethodProcessing)
- {
- if (typeInstance->mNeedsMethodProcessing) // May have been handled by GetRawMethodInstanceAtIdx above
- DoTypeInstanceMethodProcessing(typeInstance);
- }
- }
- void BfModule::DoTypeInstanceMethodProcessing(BfTypeInstance* typeInstance)
- {
- if (typeInstance->IsSpecializedByAutoCompleteMethod())
- return;
-
- if (typeInstance->mDefineState == BfTypeDefineState_DefinedAndMethodsSlotting)
- {
- BfLogSysM("DoTypeInstanceMethodProcessing %p re-entrancy exit\n", typeInstance);
- return;
- }
- BF_ASSERT_REL(typeInstance->mNeedsMethodProcessing);
- BF_ASSERT_REL(typeInstance->mDefineState == BfTypeDefineState_Defined);
- typeInstance->mDefineState = BfTypeDefineState_DefinedAndMethodsSlotting;
- BF_ASSERT(typeInstance->mModule == this);
- //TODO: This is new, make sure this is in the right place
- /*if (mAwaitingInitFinish)
- FinishInit();*/
- AutoDisallowYield disableYield(mSystem);
- SetAndRestoreValue<BfTypeInstance*> prevTypeInstance(mCurTypeInstance, typeInstance);
- SetAndRestoreValue<BfMethodInstance*> prevMethodInstance(mCurMethodInstance, NULL);
- BfLogSysM("DoTypeInstanceMethodProcessing: %p %s Revision:%d DefineState:%d\n", typeInstance, TypeToString(typeInstance).c_str(), typeInstance->mRevision, typeInstance->mDefineState);
- auto typeDef = typeInstance->mTypeDef;
- BfTypeOptions* typeOptions = NULL;
- if (typeInstance->mTypeOptionsIdx >= 0)
- typeOptions = mSystem->GetTypeOptions(typeInstance->mTypeOptionsIdx);
- // Generate all methods. Pass 0
- for (auto methodDef : typeDef->mMethods)
- {
- auto methodInstanceGroup = &typeInstance->mMethodInstanceGroups[methodDef->mIdx];
- // Don't set these pointers during resolve pass because they may become invalid if it's just a temporary autocomplete method
- if (mCompiler->mResolvePassData == NULL)
- {
- if ((methodDef->mMethodType == BfMethodType_Ctor) && (methodDef->mIsStatic))
- {
- typeInstance->mHasStaticInitMethod = true;
- }
- if ((methodDef->mMethodType == BfMethodType_Dtor) && (methodDef->mIsStatic))
- {
- typeInstance->mHasStaticDtorMethod = true;
- }
- if ((methodDef->mMethodType == BfMethodType_Normal) && (methodDef->mIsStatic) && (methodDef->mName == BF_METHODNAME_MARKMEMBERS_STATIC))
- {
- typeInstance->mHasStaticMarkMethod = true;
- }
- if ((methodDef->mMethodType == BfMethodType_Normal) && (methodDef->mIsStatic) && (methodDef->mName == BF_METHODNAME_FIND_TLS_MEMBERS))
- {
- typeInstance->mHasTLSFindMethod = true;
- }
- }
- // Thsi MAY be generated already
- // This should still be set to the default value
- //BF_ASSERT((methodInstanceGroup->mOnDemandKind == BfMethodOnDemandKind_NotSet) || (methodInstanceGroup->mOnDemandKind == BfMethodOnDemandKind_AlwaysInclude));
- }
- if (typeInstance == mContext->mBfObjectType)
- {
- BF_ASSERT(typeInstance->mInterfaceMethodTable.size() == 0);
- }
- int newIntefaceStartIdx = 0;
- auto implBaseType = typeInstance->GetImplBaseType();
- if (implBaseType != NULL)
- {
- auto baseTypeInst = implBaseType->ToTypeInstance();
- if (implBaseType->IsIncomplete())
- PopulateType(implBaseType, BfPopulateType_Full_Force);
- typeInstance->mInterfaceMethodTable = baseTypeInst->mInterfaceMethodTable;
- typeInstance->mVirtualMethodTable = implBaseType->mVirtualMethodTable;
- typeInstance->mVirtualMethodTableSize = implBaseType->mVirtualMethodTableSize;
- if ((!mCompiler->IsHotCompile()) && (!mCompiler->mPassInstance->HasFailed()) && ((mCompiler->mResolvePassData == NULL) || (mCompiler->mResolvePassData->mAutoComplete == NULL)))
- {
- BF_ASSERT(typeInstance->mVirtualMethodTable.size() == typeInstance->mVirtualMethodTableSize);
- }
- else
- {
- BF_ASSERT(typeInstance->mVirtualMethodTableSize >= (int)typeInstance->mVirtualMethodTable.size());
- }
- }
- // Add new interfaces
- for (int iFaceIdx = 0; iFaceIdx < (int)typeInstance->mInterfaces.size(); iFaceIdx++)
- {
- BfTypeInterfaceEntry& typeInterfaceInst = typeInstance->mInterfaces[iFaceIdx];
- auto checkInterface = typeInterfaceInst.mInterfaceType;
- if (checkInterface->IsIncomplete())
- PopulateType(checkInterface, BfPopulateType_Full_Force);
-
- typeInterfaceInst.mStartInterfaceTableIdx = (int)typeInstance->mInterfaceMethodTable.size();
- // We don't add to the vtable for interface declarations, we just reference the listed interfaces
- if (!typeInstance->IsInterface())
- {
- auto interfaceTypeDef = checkInterface->mTypeDef;
- BF_ASSERT(interfaceTypeDef->mMethods.size() == checkInterface->mMethodInstanceGroups.size());
- // Reserve empty entries
- for (int methodIdx = 0; methodIdx < (int)interfaceTypeDef->mMethods.size(); methodIdx++)
- typeInstance->mInterfaceMethodTable.push_back(BfTypeInterfaceMethodEntry());
- }
- }
- auto checkTypeInstance = typeInstance;
- while (checkTypeInstance != NULL)
- {
- // These may have been already added
- for (auto&& interfaceEntry : checkTypeInstance->mInterfaces)
- AddDependency(interfaceEntry.mInterfaceType, typeInstance, BfDependencyMap::DependencyFlag_ImplementsInterface);
- checkTypeInstance = checkTypeInstance->GetImplBaseType();
- }
- //for (auto& intefaceInst : typeInstance->mInterfaces)
- if (typeInstance == mContext->mBfObjectType)
- {
- BF_ASSERT(typeInstance->mInterfaceMethodTable.size() == 1);
- }
-
- // Slot interfaces method blocks in vtable
- {
- int ifaceVirtIdx = 0;
- std::unordered_map<BfTypeInstance*, BfTypeInterfaceEntry*> interfaceMap;
- BfTypeInstance* checkType = typeInstance->GetImplBaseType();
- while (checkType != NULL)
- {
- for (auto&& ifaceEntry : checkType->mInterfaces)
- {
- interfaceMap[ifaceEntry.mInterfaceType] = &ifaceEntry;
- ifaceVirtIdx = std::max(ifaceVirtIdx, ifaceEntry.mStartVirtualIdx + ifaceEntry.mInterfaceType->mVirtualMethodTableSize);
- }
- checkType = checkType->GetImplBaseType();
- }
- for (int iFaceIdx = 0; iFaceIdx < (int)typeInstance->mInterfaces.size(); iFaceIdx++)
- {
- BfTypeInterfaceEntry& typeInterfaceInst = typeInstance->mInterfaces[iFaceIdx];
- auto itr = interfaceMap.find(typeInterfaceInst.mInterfaceType);
- if (itr != interfaceMap.end())
- {
- auto prevEntry = itr->second;
- typeInterfaceInst.mStartVirtualIdx = prevEntry->mStartVirtualIdx;
- }
- else
- {
- typeInterfaceInst.mStartVirtualIdx = ifaceVirtIdx;
- ifaceVirtIdx += typeInterfaceInst.mInterfaceType->mVirtualMethodTableSize;
- interfaceMap[typeInterfaceInst.mInterfaceType] = &typeInterfaceInst;
- }
- }
- }
- auto isBoxed = typeInstance->IsBoxed();
- BfLogSysM("Setting mTypeIncomplete = false on %p\n", typeInstance);
- typeInstance->mNeedsMethodProcessing = false;
- typeInstance->mTypeIncomplete = false;
- auto checkBaseType = typeInstance->GetImplBaseType();
- while (checkBaseType != NULL)
- {
- PopulateType(checkBaseType, BfPopulateType_Full_Force);
- BF_ASSERT((!checkBaseType->IsIncomplete()) || (checkBaseType->mTypeFailed));
- checkBaseType = checkBaseType->GetImplBaseType();
- }
- if ((mCompiler->mOptions.mHasVDataExtender) && (!typeInstance->IsInterface()))
- {
- // This is the vExt entry for this type instance
- BfVirtualMethodEntry entry;
- entry.mDeclaringMethod.mMethodNum = -1;
- entry.mDeclaringMethod.mTypeInstance = typeInstance;
- typeInstance->mVirtualMethodTable.push_back(entry);
- typeInstance->mVirtualMethodTableSize++;
- }
- // Fill out to correct size
- if (typeInstance->mHotTypeData != NULL)
- {
- //auto hotLatestVersionHead = typeInstance->mHotTypeData->GetLatestVersionHead();
- int wantVTableSize = typeInstance->GetImplBaseVTableSize() + (int)typeInstance->mHotTypeData->mVTableEntries.size();
- while ((int)typeInstance->mVirtualMethodTable.size() < wantVTableSize)
- {
- typeInstance->mVirtualMethodTable.push_back(BfVirtualMethodEntry());
- typeInstance->mVirtualMethodTableSize++;
- }
- }
-
- BfAmbiguityContext ambiguityContext;
- ambiguityContext.mTypeInstance = typeInstance;
- ambiguityContext.mModule = this;
- ambiguityContext.mIsProjectSpecific = false;
- bool wantsOnDemandMethods = false;
- //TODO: Testing having interface methods be "on demand"...
- //if (!typeInstance->IsInterface())
- //
- {
- if ((typeInstance->IsSpecializedType()) || (typeInstance->IsUnspecializedTypeVariation()))
- wantsOnDemandMethods = true;
- else if ((mCompiler->mOptions.mCompileOnDemandKind != BfCompileOnDemandKind_AlwaysInclude) &&
- (!typeInstance->IsUnspecializedTypeVariation()))
- {
- //if (typeDef->mName->ToString() != "AttributeUsageAttribute")
- auto attributeDef = mCompiler->mAttributeTypeDef;
- auto attributeType = mContext->mUnreifiedModule->ResolveTypeDef(attributeDef, BfPopulateType_Identity)->ToTypeInstance();
- if (!TypeIsSubTypeOf(mCurTypeInstance, attributeType, false))
- {
- wantsOnDemandMethods = true;
- }
- }
- }
- //bool allDeclsRequired = (mIsReified) && (mCompiler->mOptions.mEmitDebugInfo) && ();
- bool allDeclsRequired = false;
- //if ((mIsReified) && (mCompiler->mOptions.mEmitDebugInfo) && (!mCompiler->mWantsDeferMethodDecls))
- // if ((mIsReified) && (mCompiler->mOptions.mEmitDebugInfo))
- // {
- // allDeclsRequired = true;
- // }
- HashSet<String> ifaceMethodNameSet;
- if (wantsOnDemandMethods)
- {
- for (int iFaceIdx = newIntefaceStartIdx; iFaceIdx < (int)typeInstance->mInterfaces.size(); iFaceIdx++)
- {
- BfTypeInterfaceEntry& typeInterfaceInst = typeInstance->mInterfaces[iFaceIdx];
- for (auto checkMethodDef : typeInterfaceInst.mInterfaceType->mTypeDef->mMethods)
- {
- ifaceMethodNameSet.Add(checkMethodDef->mName);
- }
- }
- }
- bool isFailedType = mCurTypeInstance->mTypeFailed;
- if (auto genericTypeInst = mCurTypeInstance->ToGenericTypeInstance())
- {
- if (genericTypeInst->mGenericTypeInfo->mHadValidateErrors)
- isFailedType = true;
- }
- bool typeOptionsIncludeAll = false;
- bool typeOptionsIncludeFiltered = false;
- if (typeOptions != NULL)
- {
- typeOptionsIncludeAll = typeOptions->Apply(typeOptionsIncludeAll, BfOptionFlags_ReflectAlwaysIncludeAll);
- typeOptionsIncludeFiltered = typeOptions->Apply(typeOptionsIncludeAll, BfOptionFlags_ReflectAlwaysIncludeFiltered);
- }
- // Generate all methods. Pass 1
- for (auto methodDef : typeDef->mMethods)
- {
- auto methodInstanceGroup = &typeInstance->mMethodInstanceGroups[methodDef->mIdx];
- if (typeOptions != NULL)
- {
- BfOptionFlags optionFlags = BfOptionFlags_ReflectNonStaticMethods;
- if (methodDef->mMethodType == BfMethodType_Ctor)
- optionFlags = BfOptionFlags_ReflectConstructors;
- else if (methodDef->mIsStatic)
- optionFlags = BfOptionFlags_ReflectStaticMethods;
- methodInstanceGroup->mExplicitlyReflected = typeOptions->Apply(false, optionFlags);
- methodInstanceGroup->mExplicitlyReflected = ApplyTypeOptionMethodFilters(methodInstanceGroup->mExplicitlyReflected, methodDef, typeOptions);
- }
- if ((typeInstance->mCustomAttributes != NULL) && (typeInstance->mCustomAttributes->Contains(mCompiler->mReflectAttributeTypeDef)))
- methodInstanceGroup->mExplicitlyReflected = true;
- if (methodInstanceGroup->mOnDemandKind == BfMethodOnDemandKind_AlwaysInclude)
- continue;
- if (methodInstanceGroup->mOnDemandKind == BfMethodOnDemandKind_InWorkList)
- continue;
- if (methodInstanceGroup->mOnDemandKind == BfMethodOnDemandKind_Referenced)
- continue;
-
- if (isFailedType)
- {
- // We don't want method decls from failed generic types to clog up our type system
- continue;
- }
-
- BF_ASSERT((methodInstanceGroup->mOnDemandKind == BfMethodOnDemandKind_NotSet) ||
- (methodInstanceGroup->mOnDemandKind == BfMethodOnDemandKind_Decl_AwaitingDecl) ||
- (methodInstanceGroup->mOnDemandKind == BfMethodOnDemandKind_Decl_AwaitingReference));
- if ((isBoxed) && (!methodDef->mIsVirtual))
- {
- if (methodDef->mIsStatic)
- continue;
- bool boxedRequired = false;
- if (((methodDef->mMethodType == BfMethodType_Ctor) && (methodDef->mParams.size() == 0)) ||
- (methodDef->mMethodType == BfMethodType_Dtor) ||
- ((methodDef->mName == BF_METHODNAME_MARKMEMBERS) || (methodDef->mName == BF_METHODNAME_MARKMEMBERS_STATIC) || (methodDef->mName == BF_METHODNAME_INVOKE) || (methodDef->mName == BF_METHODNAME_DYNAMICCAST)) ||
- (methodDef->mGenericParams.size() != 0))
- boxedRequired = true;
- if (!boxedRequired)
- {
- if (wantsOnDemandMethods)
- {
- methodInstanceGroup->mOnDemandKind = BfMethodOnDemandKind_NoDecl_AwaitingReference;
- mOnDemandMethodCount++;
- }
- continue;
- }
- }
- if (methodDef->mMethodType == BfMethodType_Ignore)
- continue;
- if ((methodDef->mName == BF_METHODNAME_DYNAMICCAST) && (typeInstance->IsValueType()))
- continue; // This is just a placeholder for boxed types
-
- bool doAlwaysInclude = false;
- if (wantsOnDemandMethods)
- {
- bool implRequired = false;
- bool declRequired = false;
- if ((!typeInstance->IsGenericTypeInstance()) && (methodDef->mGenericParams.IsEmpty()))
- {
- // For non-generic methods, declare all methods. This is useful for debug info.
- declRequired = true;
- }
- if (methodDef->mMethodType == BfMethodType_CtorNoBody)
- declRequired = true;
- if ((methodDef->mIsStatic) &&
- ((methodDef->mMethodType == BfMethodType_Dtor) || (methodDef->mMethodType == BfMethodType_Ctor)))
- {
- implRequired = true;
- }
- if (mCompiler->mOptions.mEnableRealtimeLeakCheck)
- {
- if ((methodDef->mName == BF_METHODNAME_MARKMEMBERS_STATIC) ||
- (methodDef->mName == BF_METHODNAME_FIND_TLS_MEMBERS) ||
- ((methodDef->mName == BF_METHODNAME_MARKMEMBERS) && (typeInstance->IsObject())))
- implRequired = true;
- }
- BfAttributeDirective* attributes = NULL;
- if (auto methodDeclaration = methodDef->GetMethodDeclaration())
- attributes = methodDeclaration->mAttributes;
- if (auto propertyDeclaration = methodDef->GetPropertyDeclaration())
- attributes = propertyDeclaration->mAttributes;
- while (attributes != NULL)
- {
- if (attributes->mAttributeTypeRef != NULL)
- {
- auto typeRefName = attributes->mAttributeTypeRef->ToCleanAttributeString();
- if (typeRefName == "AlwaysInclude")
- implRequired = true;
- else if (typeRefName == "Export")
- implRequired = true;
- else if (typeRefName == "Test")
- implRequired = true;
- else
- declRequired = true; // We need to create so we can check for AlwaysInclude in included attributes
- }
- attributes = attributes->mNextAttribute;
- }
- if ((mProject != NULL) && (mProject->mAlwaysIncludeAll) && (methodDef->mBody != NULL))
- {
- implRequired = true;
- declRequired = true;
- }
- if (typeInstance->IncludeAllMethods())
- implRequired = true;
- // "AssumeInstantiated" also forces default ctor
- if (((typeInstance->mAlwaysIncludeFlags & BfAlwaysIncludeFlag_AssumeInstantiated) != 0) &&
- (methodDef->IsDefaultCtor()))
- implRequired = true;
- if ((typeOptionsIncludeAll) && (ApplyTypeOptionMethodFilters(true, methodDef, typeOptions)))
- if ((typeOptionsIncludeAll || typeOptionsIncludeFiltered) && (ApplyTypeOptionMethodFilters(typeOptionsIncludeAll, methodDef, typeOptions)))
- implRequired = true;
- // if ((typeOptions != NULL) && (CheckTypeOptionMethodFilters(typeOptions, methodDef)))
- // implRequired = true;
- if (typeInstance->IsInterface())
- declRequired = true;
- if (methodDef->mIsVirtual)
- declRequired = true;
- if (!implRequired)
- {
- // Any interface with the same name causes us to not be on-demand
- if (ifaceMethodNameSet.Contains(methodDef->mName))
- declRequired = true;
- }
- // Is this strictly necessary? It will reduce our compilation speed in order to ensure methods are available for debug info
- if (allDeclsRequired)
- declRequired = true;
- if (methodDef->mMethodDeclaration == NULL)
- {
- // Internal methods don't need decls
- if ((methodDef->mName == BF_METHODNAME_DEFAULT_EQUALS) ||
- (methodDef->mName == BF_METHODNAME_DEFAULT_STRICT_EQUALS))
- declRequired = false;
- }
- if (methodDef->mMethodType == BfMethodType_Init)
- {
- declRequired = false;
- implRequired = false;
- }
- if (!implRequired)
- {
- if (methodInstanceGroup->mOnDemandKind == BfMethodOnDemandKind_NotSet)
- {
- if (!mIsScratchModule)
- mOnDemandMethodCount++;
- }
- if (!declRequired)
- {
- if (methodInstanceGroup->mOnDemandKind == BfMethodOnDemandKind_NotSet)
- methodInstanceGroup->mOnDemandKind = BfMethodOnDemandKind_NoDecl_AwaitingReference;
- continue;
- }
- else
- {
- if (methodInstanceGroup->mOnDemandKind == BfMethodOnDemandKind_NotSet)
- methodInstanceGroup->mOnDemandKind = BfMethodOnDemandKind_Decl_AwaitingDecl;
- }
- VerifyOnDemandMethods();
- }
- else
- {
- doAlwaysInclude = true;
- }
- }
- else
- doAlwaysInclude = true;
- if (doAlwaysInclude)
- {
- bool wasDeclared = (methodInstanceGroup->mOnDemandKind == BfMethodOnDemandKind_Decl_AwaitingDecl) ||
- (methodInstanceGroup->mOnDemandKind == BfMethodOnDemandKind_Decl_AwaitingReference);
-
- methodInstanceGroup->mOnDemandKind = BfMethodOnDemandKind_AlwaysInclude;
- if (wasDeclared)
- {
- if (!mIsScratchModule)
- mOnDemandMethodCount--;
- if (methodInstanceGroup->mDefault != NULL)
- AddMethodToWorkList(methodInstanceGroup->mDefault);
- }
- }
- }
- BF_ASSERT_REL(typeInstance->mDefineState < BfTypeDefineState_DefinedAndMethodsSlotted);
- BfLogSysM("Starting DoTypeInstanceMethodProcessing %p GetMethodInstance pass. OnDemandMethods: %d\n", typeInstance, mOnDemandMethodCount);
- // Def passes. First non-overrides then overrides (for in-place overrides in methods)
- for (int pass = 0; pass < 2; pass++)
- {
- for (auto methodDef : typeDef->mMethods)
- {
- if ((pass == 1) != (methodDef->mIsOverride))
- continue;
- bool doGetMethodInstance = true;
- auto methodInstanceGroup = &typeInstance->mMethodInstanceGroups[methodDef->mIdx];
- if ((methodInstanceGroup->mOnDemandKind != BfMethodOnDemandKind_AlwaysInclude) &&
- (methodInstanceGroup->mOnDemandKind != BfMethodOnDemandKind_Decl_AwaitingDecl))
- {
- BfLogSysM("Skipping GetMethodInstance on MethodDef: %p OnDemandKind: %d\n", methodDef, methodInstanceGroup->mOnDemandKind);
- doGetMethodInstance = false;
- }
- if (methodDef->mMethodType == BfMethodType_Init)
- doGetMethodInstance = false;
- BfMethodInstance* methodInstance = NULL;
- if (doGetMethodInstance)
- {
- int prevWorklistSize = (int)mContext->mMethodWorkList.size();
- auto flags = ((methodDef->mGenericParams.size() != 0) || (typeInstance->IsUnspecializedType())) ? BfGetMethodInstanceFlag_UnspecializedPass : BfGetMethodInstanceFlag_None;
- if (methodInstanceGroup->mOnDemandKind != BfMethodOnDemandKind_AlwaysInclude)
- flags = (BfGetMethodInstanceFlags)(flags | BfGetMethodInstanceFlag_MethodInstanceOnly);
- auto moduleMethodInstance = GetMethodInstance(typeInstance, methodDef, BfTypeVector(), flags);
- methodInstance = moduleMethodInstance.mMethodInstance;
- if (methodInstance == NULL)
- {
- BF_ASSERT(typeInstance->IsGenericTypeInstance() && (typeInstance->mTypeDef->mIsCombinedPartial));
- continue;
- }
- if ((!mCompiler->mIsResolveOnly) &&
- ((methodInstanceGroup->mOnDemandKind == BfMethodOnDemandKind_Decl_AwaitingReference) || (!typeInstance->IsReified())))
- {
- bool forceMethodImpl = false;
- BfCustomAttributes* customAttributes = methodInstance->GetCustomAttributes();
- if ((customAttributes != NULL) && (typeInstance->IsReified()))
- {
- for (auto& attr : customAttributes->mAttributes)
- {
- auto attrTypeInst = attr.mType->ToTypeInstance();
- auto attrCustomAttributes = attrTypeInst->mCustomAttributes;
- if (attrCustomAttributes == NULL)
- continue;
- for (auto& attrAttr : attrCustomAttributes->mAttributes)
- {
- if (attrAttr.mType->ToTypeInstance()->IsInstanceOf(mCompiler->mAttributeUsageAttributeTypeDef))
- {
- // Check for Flags arg
- if (attrAttr.mCtorArgs.size() < 2)
- continue;
- auto constant = attrTypeInst->mConstHolder->GetConstant(attrAttr.mCtorArgs[1]);
- if (constant == NULL)
- continue;
- if (constant->mTypeCode == BfTypeCode_Boolean)
- continue;
- if ((constant->mInt8 & BfCustomAttributeFlags_AlwaysIncludeTarget) != 0)
- forceMethodImpl = true;
- if (attrTypeInst->mAttributeData == NULL)
- PopulateType(attrTypeInst);
- BF_ASSERT(attrTypeInst->mAttributeData != NULL);
- if (attrTypeInst->mAttributeData != NULL)
- {
- if ((attrTypeInst->mAttributeData->mAlwaysIncludeUser & BfAlwaysIncludeFlag_IncludeAllMethods) != 0)
- forceMethodImpl = true;
- // "AssumeInstantiated" also forces default ctor
- if (((attrTypeInst->mAttributeData->mAlwaysIncludeUser & BfAlwaysIncludeFlag_AssumeInstantiated) != 0) &&
- (methodDef->mMethodType == BfMethodType_Ctor) && (methodDef->mParams.IsEmpty()))
- forceMethodImpl = true;
- }
- }
- }
- }
- }
- if (methodInstance->mMethodDef->mDeclaringType->mProject->mTargetType == BfTargetType_BeefTest)
- {
- if ((customAttributes != NULL) && (customAttributes->Contains(mCompiler->mTestAttributeTypeDef)))
- {
- forceMethodImpl = true;
- }
- }
- if (forceMethodImpl)
- {
- if (!typeInstance->IsReified())
- mContext->mScratchModule->PopulateType(typeInstance, BfPopulateType_Data);
- // Reify method
- mContext->mScratchModule->GetMethodInstance(typeInstance, methodDef, BfTypeVector());
- BF_ASSERT(methodInstanceGroup->mOnDemandKind != BfMethodOnDemandKind_Decl_AwaitingReference);
- }
- }
- }
- else
- {
- methodInstance = methodInstanceGroup->mDefault;
- if (methodInstance == NULL)
- continue;
- }
- bool methodUsedVirtually = false;
- if (typeInstance->IsInterface())
- {
- if ((!methodDef->mIsConcrete) && (!methodDef->mIsStatic) && (!methodInstance->HasSelf()))
- SlotInterfaceMethod(methodInstance);
- }
- else if (!methodDef->IsEmptyPartial())
- {
- methodUsedVirtually = SlotVirtualMethod(methodInstance, &ambiguityContext);
- }
- // This is important for reducing latency of autocomplete popup, but it's important we don't allow the autocomplete
- // thread to cause any reentry issues by re-populating a type at an "inopportune time". We do allow certain
- // reentries in PopulateType, but not when we're resolving fields (for example)
- if ((mContext->mFieldResolveReentrys.size() == 0) && (!mContext->mResolvingVarField))
- {
- disableYield.Release();
- mContext->CheckLockYield();
- disableYield.Acquire();
- }
- }
- }
- BF_ASSERT(typeInstance->mVirtualMethodTable.size() == typeInstance->mVirtualMethodTableSize);
- if ((isBoxed) && (!typeInstance->IsUnspecializedTypeVariation()))
- {
- // Any interface method that can be called virtually via an interface pointer needs to go into the boxed type
- auto underlyingType = typeInstance->GetUnderlyingType();
- BfTypeInstance* underlyingTypeInstance;
- if (underlyingType->IsPrimitiveType())
- underlyingTypeInstance = GetPrimitiveStructType(((BfPrimitiveType*)underlyingType)->mTypeDef->mTypeCode);
- else
- underlyingTypeInstance = underlyingType->ToTypeInstance();
- if (underlyingTypeInstance != NULL)
- {
- PopulateType(underlyingTypeInstance, BfPopulateType_Full_Force);
- for (int ifaceIdx = 0; ifaceIdx < (int)underlyingTypeInstance->mInterfaces.size(); ifaceIdx++)
- {
- auto& underlyingIFaceTypeInst = underlyingTypeInstance->mInterfaces[ifaceIdx];
- auto& boxedIFaceTypeInst = typeInstance->mInterfaces[ifaceIdx];
- BF_ASSERT(underlyingIFaceTypeInst.mInterfaceType == boxedIFaceTypeInst.mInterfaceType);
- auto ifaceInst = underlyingIFaceTypeInst.mInterfaceType;
- int startIdx = underlyingIFaceTypeInst.mStartInterfaceTableIdx;
- int boxedStartIdx = boxedIFaceTypeInst.mStartInterfaceTableIdx;
- int iMethodCount = (int)ifaceInst->mMethodInstanceGroups.size();
- for (int iMethodIdx = 0; iMethodIdx < iMethodCount; iMethodIdx++)
- {
- auto matchedMethodRef = &underlyingTypeInstance->mInterfaceMethodTable[iMethodIdx + startIdx].mMethodRef;
- auto boxedMatchedMethodRef = &typeInstance->mInterfaceMethodTable[iMethodIdx + boxedStartIdx].mMethodRef;
- BfMethodInstance* matchedMethod = *matchedMethodRef;
- auto ifaceMethodInst = ifaceInst->mMethodInstanceGroups[iMethodIdx].mDefault;
- if (ifaceMethodInst->mVirtualTableIdx != -1)
- {
- if (matchedMethod == NULL)
- {
- // Assert on base type?
- //AssertErrorState();
- }
- else
- {
- auto matchedMethodDef = matchedMethod->mMethodDef;
- if (!matchedMethod->mIsForeignMethodDef)
- {
- BfMethodInstanceGroup* boxedMethodInstanceGroup = &typeInstance->mMethodInstanceGroups[matchedMethod->mMethodDef->mIdx];
- if (boxedMethodInstanceGroup->mOnDemandKind == BfMethodOnDemandKind_NoDecl_AwaitingReference)
- {
- boxedMethodInstanceGroup->mOnDemandKind = BfMethodOnDemandKind_Decl_AwaitingDecl;
- VerifyOnDemandMethods();
- }
- }
- auto methodFlags = matchedMethod->mIsForeignMethodDef ? BfGetMethodInstanceFlag_ForeignMethodDef : BfGetMethodInstanceFlag_None;
- methodFlags = (BfGetMethodInstanceFlags)(methodFlags | BfGetMethodInstanceFlag_MethodInstanceOnly);
-
- auto moduleMethodInstance = GetMethodInstance(typeInstance, matchedMethodDef, BfTypeVector(),
- methodFlags,
- matchedMethod->GetForeignType());
- auto methodInstance = moduleMethodInstance.mMethodInstance;
- UniqueSlotVirtualMethod(methodInstance);
- *boxedMatchedMethodRef = methodInstance;
- }
- }
- }
- }
- }
- }
- if (typeInstance->mHotTypeData != NULL)
- {
- auto latestVersion = typeInstance->mHotTypeData->GetLatestVersion();
- auto latestVersionHead = typeInstance->mHotTypeData->GetLatestVersionHead();
- if (typeInstance->mHotTypeData->mVTableOrigLength != -1)
- {
- bool hasSlotError = false;
- BF_ASSERT(mCompiler->IsHotCompile());
- //typeInstance->mHotTypeData->mDirty = true;
- //Val128 vtHash;
- Array<int> ifaceMapping;
- ifaceMapping.Resize(latestVersionHead->mInterfaceMapping.size());
- typeInstance->CalcHotVirtualData(&ifaceMapping);
- // Hot swapping allows for interfaces to be added to types or removed from types, but it doesn't allow
- // interfaces to be added when the slot number has already been used -- even if the interface using
- // that slot has been removed.
- for (int slotIdx = 0; slotIdx < (int)ifaceMapping.size(); slotIdx++)
- {
- int newId = ifaceMapping[slotIdx];
- int oldId = 0;
- if (slotIdx < (int)latestVersionHead->mInterfaceMapping.size())
- oldId = latestVersionHead->mInterfaceMapping[slotIdx];
- if ((newId != oldId) && (newId != 0) && (oldId != 0))
- {
- String interfaceName;
- for (auto iface : typeInstance->mInterfaces)
- {
- if (iface.mInterfaceType->mTypeId == newId)
- interfaceName = TypeToString(iface.mInterfaceType);
- }
- Warn(0, StrFormat("Hot swap detected resolvable interface slot collision with '%s'.", interfaceName.c_str()), typeDef->mTypeDeclaration);
- BF_ASSERT(latestVersion != latestVersionHead);
- if (!hasSlotError)
- {
- latestVersion->mInterfaceMapping = ifaceMapping;
- }
- hasSlotError = true;
- }
- else if (hasSlotError)
- {
- if (oldId != 0)
- latestVersion->mInterfaceMapping[slotIdx] = oldId;
- }
- if (oldId != 0)
- ifaceMapping[slotIdx] = oldId;
- }
- latestVersionHead->mInterfaceMapping = ifaceMapping;
- if (hasSlotError)
- mCompiler->mHotState->mPendingFailedSlottings.Add(typeInstance->mTypeId);
- else
- mCompiler->mHotState->mPendingFailedSlottings.Remove(typeInstance->mTypeId);
- }
- }
-
- if ((typeInstance->IsInterface()) && (!typeInstance->IsUnspecializedType()) && (typeInstance->mIsReified) && (typeInstance->mSlotNum == -1) && (mCompiler->IsHotCompile()))
- {
- mCompiler->mHotState->mHasNewInterfaceTypes = true;
- }
- if ((!typeInstance->IsInterface()) && (!typeInstance->IsUnspecializedTypeVariation()) && (!isBoxed) && (!isFailedType))
- {
- if (!typeInstance->mTypeDef->mIsAbstract)
- {
- for (int methodIdx = 0; methodIdx < (int) typeInstance->mVirtualMethodTable.size(); methodIdx++)
- {
- auto& methodRef = typeInstance->mVirtualMethodTable[methodIdx].mImplementingMethod;
- if (methodRef.mMethodNum == -1)
- {
- BF_ASSERT(mCompiler->mOptions.mHasVDataExtender);
- if (methodRef.mTypeInstance == typeInstance)
- {
- if (typeInstance->GetImplBaseType() != NULL)
- BF_ASSERT(methodIdx == (int)typeInstance->GetImplBaseType()->mVirtualMethodTableSize);
- }
- continue;
- }
- auto methodInstance = (BfMethodInstance*)methodRef;
- if ((methodInstance != NULL) && (methodInstance->mMethodDef->mIsAbstract))
- {
- if (methodInstance->mMethodDef->mIsAbstract)
- {
- if (typeInstance->mVirtualMethodTable[methodIdx].mDeclaringMethod.mTypeInstance == typeInstance)
- {
- Fail("Method is abstract but it is declared in non-abstract class", methodInstance->mMethodDef->GetRefNode());
- }
- else if (!typeInstance->IsUnspecializedTypeVariation())
- {
- if (Fail(StrFormat("'%s' does not implement inherited abstract method '%s'", TypeToString(typeInstance).c_str(), MethodToString(methodInstance).c_str()), typeDef->mTypeDeclaration->mNameNode, true) != NULL)
- mCompiler->mPassInstance->MoreInfo("Abstract method declared", methodInstance->mMethodDef->GetRefNode());
- }
- }
- else
- {
- if (!typeInstance->IsUnspecializedType())
- AssertErrorState();
- }
- }
- }
- }
- std::unordered_set<String> missingIFaceMethodNames;
- for (auto& ifaceTypeInst : typeInstance->mInterfaces)
- {
- auto ifaceInst = ifaceTypeInst.mInterfaceType;
- int startIdx = ifaceTypeInst.mStartInterfaceTableIdx;
- int iMethodCount = (int)ifaceInst->mMethodInstanceGroups.size();
- auto declTypeDef = ifaceTypeInst.mDeclaringType;
- for (int iMethodIdx = 0; iMethodIdx < iMethodCount; iMethodIdx++)
- {
- auto matchedMethodRef = &typeInstance->mInterfaceMethodTable[iMethodIdx + startIdx].mMethodRef;
- BfMethodInstance* matchedMethod = *matchedMethodRef;
- auto ifaceMethodInst = ifaceInst->mMethodInstanceGroups[iMethodIdx].mDefault;
- if ((matchedMethod == NULL) && (ifaceMethodInst != NULL))
- {
- missingIFaceMethodNames.insert(ifaceMethodInst->mMethodDef->mName);
- }
- }
- }
- if (!missingIFaceMethodNames.empty())
- {
- // Attempt to find matching entries in base types
- ambiguityContext.mIsReslotting = true;
- auto checkType = typeInstance->GetImplBaseType();
- while (checkType != NULL)
- {
- for (auto& methodGroup : checkType->mMethodInstanceGroups)
- {
- auto methodInstance = methodGroup.mDefault;
- if (methodInstance != NULL)
- {
- if ((methodInstance->mMethodDef->mProtection != BfProtection_Private) &&
- (!methodInstance->mMethodDef->mIsOverride) &&
- (missingIFaceMethodNames.find(methodInstance->mMethodDef->mName) != missingIFaceMethodNames.end()))
- {
- SlotVirtualMethod(methodInstance, &ambiguityContext);
- }
- }
- }
- checkType = checkType->GetImplBaseType();
- }
- }
- for (auto& ifaceTypeInst : typeInstance->mInterfaces)
- {
- auto ifaceInst = ifaceTypeInst.mInterfaceType;
- int startIdx = ifaceTypeInst.mStartInterfaceTableIdx;
- int iMethodCount = (int)ifaceInst->mMethodInstanceGroups.size();
- auto declTypeDef = ifaceTypeInst.mDeclaringType;
- for (int iMethodIdx = 0; iMethodIdx < iMethodCount; iMethodIdx++)
- {
- auto matchedMethodRef = &typeInstance->mInterfaceMethodTable[iMethodIdx + startIdx].mMethodRef;
- BfMethodInstance* matchedMethod = *matchedMethodRef;
- auto ifaceMethodInst = ifaceInst->mMethodInstanceGroups[iMethodIdx].mDefault;
- if (ifaceMethodInst == NULL)
- continue;
- auto iReturnType = ifaceMethodInst->mReturnType;
- if (iReturnType->IsUnspecializedTypeVariation())
- {
- BfType* resolvedType = ResolveGenericType(iReturnType, NULL, NULL);
- if (resolvedType != NULL)
- iReturnType = resolvedType;
- else
- iReturnType = typeInstance;
- }
- if (ifaceMethodInst->mMethodDef->mIsOverride)
- continue; // Don't consider overrides here
- // If we have "ProjA depends on LibBase", "ProjB depends on LibBase", then a type ClassC in LibBase implementing IFaceD,
- // where IFaceD gets extended with MethodE in ProjA, an implementing MethodE is still required to exist on ClassC --
- // the visibility is bidirectional. A type ClassF implementing IFaceD inside ProjB will not be required to implement
- // MethodE, however
- if ((!ifaceInst->IsTypeMemberAccessible(ifaceMethodInst->mMethodDef->mDeclaringType, ifaceTypeInst.mDeclaringType)) &&
- (!ifaceInst->IsTypeMemberAccessible(ifaceTypeInst.mDeclaringType, ifaceMethodInst->mMethodDef->mDeclaringType)))
- continue;
- if (!ifaceInst->IsTypeMemberIncluded(ifaceMethodInst->mMethodDef->mDeclaringType, ifaceTypeInst.mDeclaringType))
- continue;
- bool hadMatch = matchedMethod != NULL;
- bool hadPubFailure = false;
- bool hadStaticFailure = false;
- bool hadMutFailure = false;
- if (hadMatch)
- {
- if ((matchedMethod->GetExplicitInterface() == NULL) && (matchedMethod->mMethodDef->mProtection != BfProtection_Public))
- {
- hadMatch = false;
- hadPubFailure = true;
- }
- if (matchedMethod->mMethodDef->mIsStatic != ifaceMethodInst->mMethodDef->mIsStatic)
- {
- hadMatch = false;
- hadStaticFailure = true;
- }
-
- if (ifaceMethodInst->mVirtualTableIdx != -1)
- {
- if (matchedMethod->mReturnType != iReturnType)
- hadMatch = false;
- }
- else
- {
- // Concrete/generic
- if (!CanCast(GetFakeTypedValue(matchedMethod->mReturnType), iReturnType))
- hadMatch = false;
- }
-
- // If we have mExplicitInterface set then we already gave a mut error (if needed)
- if ((typeInstance->IsValueType()) && (matchedMethod->GetExplicitInterface() == NULL) &&
- (matchedMethod->mMethodDef->mIsMutating) && (!ifaceMethodInst->mMethodDef->mIsMutating))
- {
- hadMutFailure = true;
- hadMatch = false;
- }
- }
- if (!hadMatch)
- {
- if (!typeInstance->IsUnspecializedTypeVariation())
- {
- auto bestMethodInst = ifaceMethodInst;
- auto bestInterface = ifaceInst;
- if (matchedMethod == NULL)
- {
- bool searchFailed = false;
- for (auto& checkIFaceTypeInst : typeInstance->mInterfaces)
- {
- auto checkIFaceInst = checkIFaceTypeInst.mInterfaceType;
- int checkStartIdx = checkIFaceTypeInst.mStartInterfaceTableIdx;
- int checkIMethodCount = (int)checkIFaceInst->mMethodInstanceGroups.size();
- for (int checkIMethodIdx = 0; checkIMethodIdx < checkIMethodCount; checkIMethodIdx++)
- {
- auto checkIFaceMethodInst = checkIFaceInst->mMethodInstanceGroups[checkIMethodIdx].mDefault;
- if ((checkIFaceMethodInst != NULL) && (checkIFaceMethodInst->mMethodDef->mIsOverride))
- {
- bool cmpResult = CompareMethodSignatures(checkIFaceMethodInst, ifaceMethodInst);
- if (cmpResult)
- {
- bool isBetter = TypeIsSubTypeOf(checkIFaceInst, bestInterface);
- bool isWorse = TypeIsSubTypeOf(bestInterface, checkIFaceInst);
- if (isBetter == isWorse)
- {
- CompareDeclTypes(checkIFaceMethodInst->mMethodDef->mDeclaringType, bestMethodInst->mMethodDef->mDeclaringType, isBetter, isWorse);
- }
- if ((isBetter) && (!isWorse))
- {
- bestInterface = checkIFaceInst;
- bestMethodInst = checkIFaceMethodInst;
- }
- else if (isBetter == isWorse)
- {
- if (!searchFailed)
- {
- searchFailed = true;
- auto error = Fail(StrFormat("There is no most-specific default implementation of '%s'", MethodToString(ifaceMethodInst).c_str()), declTypeDef->mTypeDeclaration->mNameNode);
- if (error != NULL)
- {
- mCompiler->mPassInstance->MoreInfo(StrFormat("'%s' is a candidate",
- MethodToString(bestMethodInst).c_str()), bestMethodInst->mMethodDef->GetRefNode());
- mCompiler->mPassInstance->MoreInfo(StrFormat("'%s' is a candidate",
- MethodToString(checkIFaceMethodInst).c_str()), checkIFaceMethodInst->mMethodDef->GetRefNode());
- }
- //candidate implementations include '%s' and '%s'",
- //TypeToString(checkIFaceInst).c_str(), TypeToString(bestInterface).c_str()), );
- }
- }
- }
- }
- }
- }
- if (bestMethodInst->mReturnType != ifaceMethodInst->mReturnType)
- {
- auto error = Fail(StrFormat("Default interface method '%s' cannot be used because it doesn't have the return type '%s'",
- MethodToString(bestMethodInst).c_str(), TypeToString(ifaceMethodInst->mReturnType).c_str()), declTypeDef->mTypeDeclaration->mNameNode);
- if (error != NULL)
- {
- mCompiler->mPassInstance->MoreInfo("See original method declaration", ifaceMethodInst->mMethodDef->GetRefNode());
- mCompiler->mPassInstance->MoreInfo("See override method declaration", bestMethodInst->mMethodDef->GetRefNode());
- }
- }
- }
- bool hasDefaultImpl = bestMethodInst->mMethodDef->HasBody() || bestMethodInst->mMethodDef->mIsAbstract;
- if ((hasDefaultImpl) && (matchedMethod == NULL))
- {
- auto methodDef = bestMethodInst->mMethodDef;
- BfGetMethodInstanceFlags flags = (BfGetMethodInstanceFlags)(BfGetMethodInstanceFlag_ForeignMethodDef | BfGetMethodInstanceFlag_MethodInstanceOnly);
- if ((methodDef->mGenericParams.size() != 0) || (typeInstance->IsUnspecializedType()))
- flags = (BfGetMethodInstanceFlags)(flags | BfGetMethodInstanceFlag_UnspecializedPass);
- auto methodInst = GetMethodInstance(typeInstance, methodDef, BfTypeVector(), flags, ifaceInst);
- if (methodInst)
- {
- *matchedMethodRef = methodInst.mMethodInstance;
- BfMethodInstance* newMethodInstance = methodInst.mMethodInstance;
- BF_ASSERT(newMethodInstance->mIsForeignMethodDef);
- if (newMethodInstance->mMethodInstanceGroup->mOnDemandKind == BfMethodOnDemandKind_Decl_AwaitingReference)
- {
- if (!mIsScratchModule)
- mOnDemandMethodCount++;
- }
-
- continue;
- }
- }
- if (typeInstance->IsBoxed())
- {
- if (ifaceMethodInst->mMethodDef->mIsStatic)
- {
- // Skip the statics, those can't be invoked
- }
- else
- {
- // The unboxed version should have had the same error
- if (!typeInstance->GetUnderlyingType()->IsIncomplete())
- AssertErrorState();
- }
- }
- else if ((typeInstance->mRebuildFlags & BfTypeRebuildFlag_ConstEvalCancelled) != 0)
- {
- // It's possible const eval was supposed to generate this method. We're rebuilding the type anyway.
- }
- else
- {
- String methodString;
- ///
- {
- BfTypeState typeState;
- typeState.mPrevState = mContext->mCurTypeState;
- typeState.mForceActiveTypeDef = declTypeDef;
- SetAndRestoreValue<BfTypeState*> prevTypeState(mContext->mCurTypeState, &typeState);
-
- SetAndRestoreValue<BfMethodInstance*> prevMethodInstance(mCurMethodInstance, ifaceMethodInst);
- methodString = MethodToString(ifaceMethodInst);
- }
-
- BfTypeDeclaration* typeDecl = declTypeDef->mTypeDeclaration;
- BfError* error = Fail(StrFormat("'%s' does not implement interface member '%s'", TypeToString(typeInstance).c_str(), methodString.c_str()), typeDecl->mNameNode, true);
- if ((matchedMethod != NULL) && (error != NULL))
- {
- if (hadStaticFailure)
- {
- auto staticNodeRef = matchedMethod->mMethodDef->GetRefNode();
- if (auto methodDecl = BfNodeDynCast<BfMethodDeclaration>(matchedMethod->mMethodDef->mMethodDeclaration))
- if (methodDecl->mStaticSpecifier != NULL)
- staticNodeRef = methodDecl->mStaticSpecifier;
- if (matchedMethod->mMethodDef->mIsStatic)
- mCompiler->mPassInstance->MoreInfo(StrFormat("'%s' cannot match because it's static",
- methodString.c_str()), staticNodeRef);
- else
- mCompiler->mPassInstance->MoreInfo(StrFormat("'%s' cannot match because it's not static",
- methodString.c_str()), staticNodeRef);
- }
- else if (hadPubFailure)
- {
- mCompiler->mPassInstance->MoreInfo(StrFormat("'%s' cannot match because it's not public",
- methodString.c_str()), matchedMethod->mMethodDef->mReturnTypeRef);
- }
- else if (ifaceMethodInst->mReturnType->IsConcreteInterfaceType())
- {
- mCompiler->mPassInstance->MoreInfo(StrFormat("'%s' cannot match because it does not have a concrete return type that implements '%s'",
- methodString.c_str(), TypeToString(ifaceMethodInst->mReturnType).c_str()), matchedMethod->mMethodDef->mReturnTypeRef);
- }
- else if (hadMutFailure)
- {
- mCompiler->mPassInstance->MoreInfo(StrFormat("'%s' cannot match because it's market as 'mut' but interface method does not allow it",
- methodString.c_str()), matchedMethod->mMethodDef->GetMutNode());
- mCompiler->mPassInstance->MoreInfo(StrFormat("Declare the interface method as 'mut' to allow matching 'mut' implementations"), ifaceMethodInst->mMethodDef->mMethodDeclaration);
- }
- else
- {
- mCompiler->mPassInstance->MoreInfo(StrFormat("'%s' cannot match because it does not have the return type '%s'",
- methodString.c_str(), TypeToString(ifaceMethodInst->mReturnType).c_str()), matchedMethod->mMethodDef->mReturnTypeRef);
- if ((ifaceMethodInst->mVirtualTableIdx != -1) && (ifaceMethodInst->mReturnType->IsInterface()))
- mCompiler->mPassInstance->MoreInfo("Declare the interface method as 'concrete' to allow matching concrete return values", ifaceMethodInst->mMethodDef->GetMethodDeclaration()->mVirtualSpecifier);
- }
- }
- }
- }
- // Clear out the entry
- *matchedMethodRef = BfMethodRef();
- }
- }
- }
- }
- VerifyOnDemandMethods();
- ambiguityContext.Finish();
- CheckAddFailType();
- typeInstance->mDefineState = BfTypeDefineState_DefinedAndMethodsSlotted;
- mCompiler->mStats.mTypesPopulated++;
- mCompiler->UpdateCompletion();
- BF_ASSERT_REL(!typeInstance->mNeedsMethodProcessing);
- BfLogSysM("Finished DoTypeInstanceMethodProcessing %p. OnDemandMethods: %d Virtual Size: %d InterfaceMethodTableSize: %d\n", typeInstance, mOnDemandMethodCount, typeInstance->mVirtualMethodTable.size(), typeInstance->mInterfaceMethodTable.size());
- }
- void BfModule::RebuildMethods(BfTypeInstance* typeInstance)
- {
- if (typeInstance->IsIncomplete())
- return;
-
- BfLogSysM("RebuildMethods setting mNeedsMethodProcessing=true on %p\n", typeInstance);
- BF_ASSERT_REL(typeInstance->mDefineState != BfTypeDefineState_DefinedAndMethodsSlotting);
- typeInstance->mNeedsMethodProcessing = true;
- typeInstance->mDefineState = BfTypeDefineState_Defined;
- typeInstance->mTypeIncomplete = true;
- for (auto& methodInstanceGroup : typeInstance->mMethodInstanceGroups)
- {
- delete methodInstanceGroup.mDefault;
- methodInstanceGroup.mDefault = NULL;
- delete methodInstanceGroup.mMethodSpecializationMap;
- methodInstanceGroup.mMethodSpecializationMap = NULL;
- methodInstanceGroup.mOnDemandKind = BfMethodOnDemandKind_NotSet;
- }
- BfTypeProcessRequest* typeProcessRequest = mContext->mPopulateTypeWorkList.Alloc();
- typeProcessRequest->mType = typeInstance;
- BF_ASSERT(typeInstance->mContext == mContext);
- mCompiler->mStats.mTypesQueued++;
- mCompiler->UpdateCompletion();
- }
- BfModule* BfModule::GetModuleFor(BfType* type)
- {
- auto typeInst = type->ToTypeInstance();
- if (typeInst == NULL)
- return NULL;
- return typeInst->mModule;
- }
- void BfModule::AddMethodToWorkList(BfMethodInstance* methodInstance)
- {
- BF_ASSERT(!methodInstance->mMethodDef->mIsAbstract);
- if (methodInstance->IsSpecializedByAutoCompleteMethod())
- return;
-
- BF_ASSERT(mCompiler->mCompileState != BfCompiler::CompileState_VData);
- if ((methodInstance->mIsReified) && (!methodInstance->mIsUnspecialized))
- {
- BF_ASSERT(mCompiler->mCompileState != BfCompiler::CompileState_Unreified);
- }
- if (methodInstance->IsOrInUnspecializedVariation())
- {
- return;
- }
- BF_ASSERT(!methodInstance->GetOwner()->IsUnspecializedTypeVariation());
- BF_ASSERT(methodInstance->mMethodProcessRequest == NULL);
- auto defaultMethod = methodInstance->mMethodInstanceGroup->mDefault;
- if (defaultMethod != methodInstance)
- {
- BF_ASSERT(defaultMethod != NULL);
- if (methodInstance->mMethodInstanceGroup->mOnDemandKind == BfMethodOnDemandKind_Decl_AwaitingReference)
- {
- if ((defaultMethod->mIsReified) && (!defaultMethod->mDeclModule->mIsModuleMutable))
- {
- defaultMethod->mDeclModule->PrepareForIRWriting(methodInstance->GetOwner());
- }
- AddMethodToWorkList(defaultMethod);
- // This should put all the specialized methods in the worklist, including us
- return;
- }
- }
- if (methodInstance->mDeclModule != NULL)
- {
- if (methodInstance->mDeclModule != this)
- {
- methodInstance->mDeclModule->AddMethodToWorkList(methodInstance);
- return;
- }
- }
- else
- {
- auto module = GetOrCreateMethodModule(methodInstance);
- methodInstance->mDeclModule = module;
-
- BfIRValue func = CreateFunctionFrom(methodInstance, false, methodInstance->mAlwaysInline);
- methodInstance->mIRFunction = func;
- module->mFuncReferences[methodInstance] = func;
- module->AddMethodToWorkList(methodInstance);
- return;
- }
- if ((!methodInstance->mIRFunction) && (methodInstance->mIsReified) && (!methodInstance->mIsUnspecialized) &&
- (methodInstance->GetImportCallKind() == BfImportCallKind_None))
- {
- if (!mIsModuleMutable)
- PrepareForIRWriting(methodInstance->GetOwner());
-
- SetAndRestoreValue<bool> prevIgnoreWrites(mBfIRBuilder->mIgnoreWrites, mWantsIRIgnoreWrites);
- BfIRValue func = CreateFunctionFrom(methodInstance, false, methodInstance->mAlwaysInline);
- if (func)
- {
- methodInstance->mIRFunction = func;
- mFuncReferences[methodInstance] = func;
- }
- }
-
- BF_ASSERT(methodInstance->mDeclModule == this);
- if (defaultMethod == methodInstance)
- {
- if (methodInstance->mMethodInstanceGroup->mOnDemandKind != BfMethodOnDemandKind_AlwaysInclude)
- {
- auto owningModule = methodInstance->GetOwner()->GetModule();
- BF_ASSERT(methodInstance->mMethodInstanceGroup->mOnDemandKind != BfMethodOnDemandKind_Referenced);
- if (!mIsScratchModule)
- {
- auto onDemandModule = owningModule;
- if (owningModule->mParentModule != NULL)
- onDemandModule = owningModule->mParentModule;
- owningModule->VerifyOnDemandMethods();
-
- if (methodInstance->mMethodInstanceGroup->mOnDemandKind == BfMethodOnDemandKind_NotSet)
- owningModule->mOnDemandMethodCount++;
- BF_ASSERT(onDemandModule->mOnDemandMethodCount > 0);
- VerifyOnDemandMethods();
- }
- methodInstance->mMethodInstanceGroup->mOnDemandKind = BfMethodOnDemandKind_InWorkList;
- if (methodInstance->mMethodInstanceGroup->mMethodSpecializationMap != NULL)
- {
- for (auto& kv : *methodInstance->mMethodInstanceGroup->mMethodSpecializationMap)
- {
- auto specMethodInstance = kv.mValue;
- if ((!specMethodInstance->mDeclModule->mIsModuleMutable) && (!specMethodInstance->mDeclModule->mReifyQueued))
- {
- specMethodInstance->mDeclModule->PrepareForIRWriting(specMethodInstance->GetOwner());
- }
- specMethodInstance->mDeclModule->AddMethodToWorkList(specMethodInstance);
- }
- }
-
- }
- }
- else
- {
- BF_ASSERT(defaultMethod->mMethodInstanceGroup->IsImplemented());
- }
- BF_ASSERT(methodInstance->mDeclModule != NULL);
- auto typeInstance = methodInstance->GetOwner();
-
- BfMethodProcessRequest* methodProcessRequest = mContext->mMethodWorkList.Alloc();
- if (mCompiler->mCompileState == BfCompiler::CompileState_Unreified)
- {
- if (methodInstance->mIsReified)
- {
- BfLogSysM("Marking method %d as unreified due to CompileState_Unreified\n", methodInstance);
- methodInstance->mIsReified = false;
- }
- }
- //BF_ASSERT(!methodInstance->mIsReified);
- methodProcessRequest->mType = typeInstance;
- methodProcessRequest->mMethodInstance = methodInstance;
- methodProcessRequest->mRevision = typeInstance->mRevision;
- methodProcessRequest->mFromModuleRebuildIdx = mRebuildIdx;
- methodProcessRequest->mFromModule = this;
- if ((!mCompiler->mIsResolveOnly) && (methodInstance->mIsReified))
- {
- if ((!mIsModuleMutable) && (!mIsScratchModule))
- {
- BF_ASSERT(!mGeneratesCode);
- StartNewRevision(BfModule::RebuildKind_None);
- }
- BF_ASSERT(mIsModuleMutable || mReifyQueued);
- }
- BF_ASSERT((mBfIRBuilder != NULL) || (!methodInstance->mIsReified));
- BfLogSysM("Adding to mMethodWorkList Module: %p IncompleteMethodCount: %d Type %p MethodInstance: %p Name:%s TypeRevision: %d ModuleRevision: %d ReqId:%d\n", this, mIncompleteMethodCount, typeInstance, methodInstance, methodInstance->mMethodDef->mName.c_str(), methodProcessRequest->mRevision, methodProcessRequest->mFromModuleRevision, methodProcessRequest->mReqId);
- if (mAwaitingFinish)
- {
- BfLogSysM("Module: %p No longer awaiting finish\n", this);
- mAwaitingFinish = false;
- }
- mCompiler->mStats.mMethodsQueued++;
- mCompiler->UpdateCompletion();
- mIncompleteMethodCount++;
- if (methodInstance->GetNumGenericArguments() != 0)
- mHasGenericMethods = true;
-
- methodInstance->mMethodProcessRequest = methodProcessRequest;
- }
- BfArrayType* BfModule::CreateArrayType(BfType* resolvedType, int dimensions)
- {
- BF_ASSERT(!resolvedType->IsVar());
- BF_ASSERT(!resolvedType->IsIntUnknown());
- auto arrayTypeDef = mCompiler->GetArrayTypeDef(dimensions);
- if (arrayTypeDef == NULL)
- return NULL;
- auto arrayType = mContext->mArrayTypePool.Get();
- delete arrayType->mGenericTypeInfo;
- arrayType->mGenericTypeInfo = new BfGenericTypeInfo();
- arrayType->mContext = mContext;
- arrayType->mTypeDef = arrayTypeDef;
- arrayType->mDimensions = dimensions;
- arrayType->mGenericTypeInfo->mTypeGenericArguments.clear();
- arrayType->mGenericTypeInfo->mTypeGenericArguments.push_back(resolvedType);
- auto resolvedArrayType = ResolveType(arrayType);
- if (resolvedArrayType != arrayType)
- {
- arrayType->Dispose();
- mContext->mArrayTypePool.GiveBack(arrayType);
- }
- return (BfArrayType*)resolvedArrayType;
- }
- BfSizedArrayType* BfModule::CreateSizedArrayType(BfType * resolvedType, int size)
- {
- BF_ASSERT(!resolvedType->IsVar());
- auto arrayType = mContext->mSizedArrayTypePool.Get();
- arrayType->mContext = mContext;
- arrayType->mElementType = resolvedType;
- arrayType->mElementCount = size;
- auto resolvedArrayType = ResolveType(arrayType);
- if (resolvedArrayType != arrayType)
- mContext->mSizedArrayTypePool.GiveBack(arrayType);
- return (BfSizedArrayType*)resolvedArrayType;
- }
- BfUnknownSizedArrayType* BfModule::CreateUnknownSizedArrayType(BfType* resolvedType, BfType* sizeParam)
- {
- BF_ASSERT(!resolvedType->IsVar());
- BF_ASSERT(sizeParam->IsGenericParam());
- auto arrayType = mContext->mUnknownSizedArrayTypePool.Get();
- arrayType->mContext = mContext;
- arrayType->mElementType = resolvedType;
- arrayType->mElementCount = -1;
- arrayType->mElementCountSource = sizeParam;
- auto resolvedArrayType = ResolveType(arrayType);
- if (resolvedArrayType != arrayType)
- mContext->mUnknownSizedArrayTypePool.GiveBack(arrayType);
- return (BfUnknownSizedArrayType*)resolvedArrayType;
- }
- BfPointerType* BfModule::CreatePointerType(BfType* resolvedType)
- {
- BF_ASSERT(!resolvedType->IsVar());
- auto pointerType = mContext->mPointerTypePool.Get();
- pointerType->mContext = mContext;
- pointerType->mElementType = resolvedType;
- auto resolvedPointerType = (BfPointerType*)ResolveType(pointerType);
- if (resolvedPointerType != pointerType)
- mContext->mPointerTypePool.GiveBack(pointerType);
- BF_ASSERT(resolvedPointerType->mElementType == resolvedType);
- return resolvedPointerType;
- }
- BfConstExprValueType* BfModule::CreateConstExprValueType(const BfTypedValue& typedValue, bool allowCreate)
- {
- BfPopulateType populateType = allowCreate ? BfPopulateType_Data : BfPopulateType_Identity;
- BfResolveTypeRefFlags resolveFlags = allowCreate ? BfResolveTypeRefFlag_None : BfResolveTypeRefFlag_NoCreate;
- auto variant = TypedValueToVariant(NULL, typedValue);
- if (variant.mTypeCode == BfTypeCode_None)
- return NULL;
- auto constExprValueType = mContext->mConstExprValueTypePool.Get();
- constExprValueType->mContext = mContext;
- constExprValueType->mType = typedValue.mType;
- constExprValueType->mValue = variant;
- auto resolvedConstExprValueType = (BfConstExprValueType*)ResolveType(constExprValueType, populateType, resolveFlags);
- if (resolvedConstExprValueType != constExprValueType)
- mContext->mConstExprValueTypePool.GiveBack(constExprValueType);
- if (resolvedConstExprValueType != NULL)
- BF_ASSERT(resolvedConstExprValueType->mValue.mInt64 == constExprValueType->mValue.mInt64);
- return resolvedConstExprValueType;
- }
- BfConstExprValueType* BfModule::CreateConstExprValueType(const BfVariant& variant, BfType* type, bool allowCreate)
- {
- BfPopulateType populateType = allowCreate ? BfPopulateType_Data : BfPopulateType_Identity;
- BfResolveTypeRefFlags resolveFlags = allowCreate ? BfResolveTypeRefFlag_None : BfResolveTypeRefFlag_NoCreate;
- if (variant.mTypeCode == BfTypeCode_None)
- return NULL;
- auto constExprValueType = mContext->mConstExprValueTypePool.Get();
- constExprValueType->mContext = mContext;
- constExprValueType->mType = type;
- constExprValueType->mValue = variant;
- auto resolvedConstExprValueType = (BfConstExprValueType*)ResolveType(constExprValueType, populateType, resolveFlags);
- if (resolvedConstExprValueType != constExprValueType)
- mContext->mConstExprValueTypePool.GiveBack(constExprValueType);
- if (resolvedConstExprValueType != NULL)
- BF_ASSERT(resolvedConstExprValueType->mValue.mInt64 == constExprValueType->mValue.mInt64);
- return resolvedConstExprValueType;
- }
- BfTypeInstance* BfModule::GetWrappedStructType(BfType* type, bool allowSpecialized)
- {
- if (type->IsPointer())
- {
- if (allowSpecialized)
- {
- BfPointerType* pointerType = (BfPointerType*)type;
- BfTypeVector typeVector;
- typeVector.Add(pointerType->mElementType);
- return ResolveTypeDef(mCompiler->mPointerTTypeDef, typeVector, BfPopulateType_Data)->ToTypeInstance();
- }
- else
- return ResolveTypeDef(mCompiler->mPointerTTypeDef, BfPopulateType_Data)->ToTypeInstance();
- }
- else if (type->IsMethodRef())
- {
- if (allowSpecialized)
- {
- BfMethodRefType* methodRefType = (BfMethodRefType*)type;
- BfTypeVector typeVector;
- typeVector.Add(methodRefType);
- return ResolveTypeDef(mCompiler->mMethodRefTypeDef, typeVector, BfPopulateType_Data)->ToTypeInstance();
- }
- else
- return ResolveTypeDef(mCompiler->mMethodRefTypeDef, BfPopulateType_Data)->ToTypeInstance();
- }
- else if (type->IsSizedArray())
- {
- if (allowSpecialized)
- {
- if (type->IsUnknownSizedArrayType())
- {
- BfUnknownSizedArrayType* sizedArrayType = (BfUnknownSizedArrayType*)type;
- BfTypeVector typeVector;
- typeVector.Add(sizedArrayType->mElementType);
- typeVector.Add(sizedArrayType->mElementCountSource);
- return ResolveTypeDef(mCompiler->mSizedArrayTypeDef, typeVector, BfPopulateType_Data)->ToTypeInstance();
- }
- BfSizedArrayType* sizedArrayType = (BfSizedArrayType*)type;
- BfTypeVector typeVector;
- typeVector.Add(sizedArrayType->mElementType);
- auto sizeValue = BfTypedValue(GetConstValue(BF_MAX(sizedArrayType->mElementCount, 0)), GetPrimitiveType(BfTypeCode_IntPtr));
- typeVector.Add(CreateConstExprValueType(sizeValue));
- return ResolveTypeDef(mCompiler->mSizedArrayTypeDef, typeVector, BfPopulateType_Data)->ToTypeInstance();
- }
- else
- return ResolveTypeDef(mCompiler->mSizedArrayTypeDef, BfPopulateType_Data)->ToTypeInstance();
- }
- BF_ASSERT(type->IsPrimitiveType());
- return GetPrimitiveStructType(((BfPrimitiveType*)type)->mTypeDef->mTypeCode);
- }
- BfPrimitiveType* BfModule::GetPrimitiveType(BfTypeCode typeCode)
- {
- BfPrimitiveType* primType = mContext->mPrimitiveTypes[typeCode];
- if (primType == NULL)
- {
- switch (typeCode)
- {
- case BfTypeCode_NullPtr:
- primType = (BfPrimitiveType*)ResolveTypeDef(mSystem->mTypeNullPtr);
- break;
- case BfTypeCode_Self:
- primType = (BfPrimitiveType*)ResolveTypeDef(mSystem->mTypeSelf);
- break;
- case BfTypeCode_Dot:
- primType = (BfPrimitiveType*)ResolveTypeDef(mSystem->mTypeDot);
- break;
- case BfTypeCode_Var:
- primType = (BfPrimitiveType*)ResolveTypeDef(mSystem->mTypeVar);
- break;
- case BfTypeCode_Let:
- primType = (BfPrimitiveType*)ResolveTypeDef(mSystem->mTypeLet);
- break;
- case BfTypeCode_None:
- primType = (BfPrimitiveType*)ResolveTypeDef(mSystem->mTypeVoid);
- break;
- case BfTypeCode_Boolean:
- primType = (BfPrimitiveType*)ResolveTypeDef(mSystem->mTypeBool);
- break;
- case BfTypeCode_Int8:
- primType = (BfPrimitiveType*)ResolveTypeDef(mSystem->mTypeInt8);
- break;
- case BfTypeCode_UInt8:
- primType = (BfPrimitiveType*)ResolveTypeDef(mSystem->mTypeUInt8);
- break;
- case BfTypeCode_Int16:
- primType = (BfPrimitiveType*)ResolveTypeDef(mSystem->mTypeInt16);
- break;
- case BfTypeCode_UInt16:
- primType = (BfPrimitiveType*)ResolveTypeDef(mSystem->mTypeUInt16);
- break;
- case BfTypeCode_Int32:
- primType = (BfPrimitiveType*)ResolveTypeDef(mSystem->mTypeInt32);
- break;
- case BfTypeCode_UInt32:
- primType = (BfPrimitiveType*)ResolveTypeDef(mSystem->mTypeUInt32);
- break;
- case BfTypeCode_Int64:
- primType = (BfPrimitiveType*)ResolveTypeDef(mSystem->mTypeInt64);
- break;
- case BfTypeCode_UInt64:
- primType = (BfPrimitiveType*)ResolveTypeDef(mSystem->mTypeUInt64);
- break;
- case BfTypeCode_Char8:
- primType = (BfPrimitiveType*)ResolveTypeDef(mSystem->mTypeChar8);
- break;
- case BfTypeCode_Char16:
- primType = (BfPrimitiveType*)ResolveTypeDef(mSystem->mTypeChar16);
- break;
- case BfTypeCode_Char32:
- primType = (BfPrimitiveType*)ResolveTypeDef(mSystem->mTypeChar32);
- break;
- case BfTypeCode_Float:
- primType = (BfPrimitiveType*)ResolveTypeDef(mSystem->mTypeSingle);
- break;
- case BfTypeCode_Double:
- primType = (BfPrimitiveType*)ResolveTypeDef(mSystem->mTypeDouble);
- break;
- case BfTypeCode_IntPtr:
- primType = (BfPrimitiveType*)ResolveTypeDef(mSystem->mTypeIntPtr);
- break;
- case BfTypeCode_UIntPtr:
- primType = (BfPrimitiveType*)ResolveTypeDef(mSystem->mTypeUIntPtr);
- break;
- case BfTypeCode_IntUnknown:
- primType = (BfPrimitiveType*)ResolveTypeDef(mSystem->mTypeIntUnknown);
- break;
- case BfTypeCode_UIntUnknown:
- primType = (BfPrimitiveType*)ResolveTypeDef(mSystem->mTypeUIntUnknown);
- break;
- case BfTypeCode_StringId:
- BFMODULE_FATAL(this, "Invalid use of StringId");
- break;
- default:
- BF_DBG_FATAL("Invalid type");
- break;
- }
- mContext->mPrimitiveTypes[typeCode] = primType;
- }
- return primType;
- }
- BfIRType BfModule::GetIRLoweredType(BfTypeCode loweredTypeCode, BfTypeCode loweredTypeCode2)
- {
- BF_ASSERT(!mIsComptimeModule);
- BF_ASSERT(loweredTypeCode != BfTypeCode_None);
- if (loweredTypeCode2 == BfTypeCode_None)
- return mBfIRBuilder->GetPrimitiveType(loweredTypeCode);
-
- SizedArray<BfIRType, 2> types;
- types.push_back(mBfIRBuilder->GetPrimitiveType(loweredTypeCode));
- types.push_back(mBfIRBuilder->GetPrimitiveType(loweredTypeCode2));
- return mBfIRBuilder->CreateStructType(types);
- }
- BfMethodRefType* BfModule::CreateMethodRefType(BfMethodInstance* methodInstance, bool mustAlreadyExist)
- {
- // Make sure we don't have a partially-formed local method or lambda coming in, because those may be replaced
- // after the capture phase
- BF_ASSERT(!methodInstance->mDisallowCalling);
- auto methodRefType = new BfMethodRefType();
- methodRefType->mContext = mContext;
- //methodRefType->mCaptureType = NULL;
- methodRefType->mMethodRef = methodInstance;
- methodRefType->mOwner = methodInstance->GetOwner();
- methodRefType->mOwnerRevision = methodRefType->mOwner->mRevision;
- //methodRefType->mMangledName = BfMangler::Mangle(mCompiler->GetMangleKind(), methodInstance);
- methodRefType->mIsAutoCompleteMethod = methodInstance->mIsAutocompleteMethod;
- methodRefType->mIsUnspecialized = methodInstance->mIsUnspecialized;
- methodRefType->mIsUnspecializedVariation = methodInstance->mIsUnspecializedVariation;
- methodRefType->mSize = 0;
- BfResolvedTypeSet::LookupContext lookupCtx;
- lookupCtx.mModule = this;
- BfResolvedTypeSet::Entry* typeEntry = NULL;
- auto inserted = mContext->mResolvedTypes.Insert(methodRefType, &lookupCtx, &typeEntry);
- if (typeEntry->mValue == NULL)
- {
- BF_ASSERT(!mustAlreadyExist);
- BF_ASSERT(!methodInstance->mHasMethodRefType);
- InitType(methodRefType, BfPopulateType_Identity);
- methodRefType->mDefineState = BfTypeDefineState_DefinedAndMethodsSlotted;
- methodInstance->mHasMethodRefType = true;
- methodInstance->mMethodInstanceGroup->mRefCount++;
- typeEntry->mValue = methodRefType;
- BfLogSysM("Create MethodRefType %p MethodInstance: %p\n", methodRefType, methodInstance);
- methodRefType->mRevision = 0;
- AddDependency(methodInstance->GetOwner(), methodRefType, BfDependencyMap::DependencyFlag_Calls);
-
- BfTypeVector tupleTypes;
- Array<String> tupleNames;
- int offset = 0;
- methodRefType->mAlign = 1;
- int dataIdx = 0;
-
- // CRepr, just because we're lazy (for now)
- int implicitParamCount = methodInstance->GetImplicitParamCount();
- for (int implicitParamIdx = methodInstance->HasThis() ? -1 : 0; implicitParamIdx < implicitParamCount; implicitParamIdx++)
- {
- auto paramType = methodInstance->GetParamType(implicitParamIdx);
- if (!paramType->IsValuelessType())
- {
- methodRefType->mDataToParamIdx.Add(implicitParamIdx);
- if (implicitParamIdx >= 0)
- methodRefType->mParamToDataIdx.Add(dataIdx);
- offset = BF_ALIGN(offset, paramType->mAlign);
- offset += paramType->mSize;
- methodRefType->mAlign = std::max(methodRefType->mAlign, paramType->mAlign);
- dataIdx++;
- }
- else
- {
- methodRefType->mParamToDataIdx.Add(-1);
- }
- }
- offset = BF_ALIGN(offset, methodRefType->mAlign);
- methodRefType->mSize = offset;
- // if (!tupleTypes.empty())
- // {
- // methodRefType->mCaptureType = CreateTupleType(tupleTypes, tupleNames);
- // AddDependency(methodRefType->mCaptureType, methodRefType, BfDependencyMap::DependencyFlag_ReadFields);
- //
- // methodRefType->mSize = methodRefType->mCaptureType->mSize;
- // methodRefType->mAlign = methodRefType->mCaptureType->mAlign;
- // }
- // else
- // {
- // methodRefType->mSize = 0;
- // methodRefType->mAlign = 0;
- // }
- }
- else
- {
- methodRefType->mMethodRef = NULL;
- delete methodRefType;
- methodRefType = (BfMethodRefType*)typeEntry->mValue;
- }
- return methodRefType;
- }
- BfType* BfModule::FixIntUnknown(BfType* type)
- {
- if ((type != NULL) && (type->IsPrimitiveType()))
- {
- auto primType = (BfPrimitiveType*)type;
- if (primType->mTypeDef->mTypeCode == BfTypeCode_IntUnknown)
- return GetPrimitiveType(BfTypeCode_IntPtr);
- if (primType->mTypeDef->mTypeCode == BfTypeCode_UIntUnknown)
- return GetPrimitiveType(BfTypeCode_UIntPtr);
- }
- return type;
- }
- void BfModule::FixIntUnknown(BfTypedValue& typedVal, BfType* matchType)
- {
- if (!typedVal.mValue.IsConst())
- {
- if ((typedVal.mType != NULL) && (typedVal.mType->IsPrimitiveType()))
- {
- auto primType = (BfPrimitiveType*)typedVal.mType;
- BF_ASSERT((primType->mTypeDef->mTypeCode != BfTypeCode_IntUnknown) && (primType->mTypeDef->mTypeCode != BfTypeCode_UIntUnknown));
- }
- return;
- }
- if (!typedVal.mType->IsPrimitiveType())
- return;
- BfTypeCode wantTypeCode;
- auto primType = (BfPrimitiveType*)typedVal.mType;
- if (primType->mTypeDef->mTypeCode == BfTypeCode_IntUnknown)
- wantTypeCode = BfTypeCode_IntPtr;
- else if (primType->mTypeDef->mTypeCode == BfTypeCode_UIntUnknown)
- wantTypeCode = BfTypeCode_UIntPtr;
- else
- return;
- auto constant = mBfIRBuilder->GetConstant(typedVal.mValue);
- if ((matchType != NULL) && (matchType->IsPrimitiveType()) && (mBfIRBuilder->IsInt(matchType->ToPrimitiveType()->mTypeDef->mTypeCode)))
- {
- auto wantTypeCode = matchType->ToPrimitiveType()->mTypeDef->mTypeCode;
- if (matchType->mSize < 8)
- {
- int64 minVal = -(1LL << (8 * matchType->mSize - 1));
- int64 maxVal = (1LL << (8 * matchType->mSize - 1)) - 1;
- if ((constant->mInt64 >= minVal) && (constant->mInt64 <= maxVal))
- {
- typedVal.mValue = mBfIRBuilder->CreateNumericCast(typedVal.mValue, mBfIRBuilder->IsSigned(wantTypeCode), wantTypeCode);
- typedVal.mType = GetPrimitiveType(wantTypeCode);
- return;
- }
- }
- }
- if (mSystem->mPtrSize == 4)
- {
- if (primType->mTypeDef->mTypeCode == BfTypeCode_IntUnknown)
- {
- if ((constant->mInt64 >= -0x80000000LL) && (constant->mInt64 <= 0x7FFFFFFFLL))
- {
- typedVal.mValue = mBfIRBuilder->CreateNumericCast(typedVal.mValue, true, BfTypeCode_IntPtr);
- typedVal.mType = GetPrimitiveType(BfTypeCode_IntPtr);
- }
- else
- typedVal.mType = GetPrimitiveType(BfTypeCode_Int64);
- return;
- }
- else
- {
- if ((constant->mInt64 >= 0) && (constant->mInt64 <= 0xFFFFFFFF))
- {
- typedVal.mValue = mBfIRBuilder->CreateNumericCast(typedVal.mValue, false, BfTypeCode_IntPtr);
- typedVal.mType = GetPrimitiveType(BfTypeCode_UIntPtr);
- }
- else
- typedVal.mType = GetPrimitiveType(BfTypeCode_UInt64);
- return;
- }
- }
- typedVal.mType = GetPrimitiveType(wantTypeCode);
- }
- void BfModule::FixIntUnknown(BfTypedValue& lhs, BfTypedValue& rhs)
- {
- if ((lhs.mType != NULL) && (lhs.mType->IsIntUnknown()) && (rhs.mType != NULL) && (rhs.mType->IsInteger()))
- {
- if (CanCast(lhs, rhs.mType))
- {
- lhs = Cast(NULL, lhs, rhs.mType, BfCastFlags_SilentFail);
- if (!lhs)
- lhs = GetDefaultTypedValue(GetPrimitiveType(BfTypeCode_IntPtr));
- return;
- }
- }
- if ((rhs.mType != NULL) && (rhs.mType->IsIntUnknown()) && (lhs.mType != NULL) && (lhs.mType->IsInteger()))
- {
- if (CanCast(rhs, lhs.mType))
- {
- rhs = Cast(NULL, rhs, lhs.mType, BfCastFlags_SilentFail);
- if (!rhs)
- rhs = GetDefaultTypedValue(GetPrimitiveType(BfTypeCode_IntPtr));
- return;
- }
- }
- FixIntUnknown(lhs);
- FixIntUnknown(rhs);
- }
- void BfModule::FixValueActualization(BfTypedValue& typedVal, bool force)
- {
- if (!typedVal.mValue.IsConst())
- return;
- if ((mBfIRBuilder->mIgnoreWrites) && (!force))
- return;
- auto constant = mBfIRBuilder->GetConstant(typedVal.mValue);
- if (!HasUnactializedConstant(constant, mBfIRBuilder))
- return;
- typedVal.mValue = ConstantToCurrent(constant, mBfIRBuilder, typedVal.mType, false);
- }
- BfTypeInstance* BfModule::GetPrimitiveStructType(BfTypeCode typeCode)
- {
- BfTypeInstance* typeInst = NULL;
- switch (typeCode)
- {
- case BfTypeCode_None:
- typeInst = ResolveTypeDef(mSystem->FindTypeDef("System.Void"), BfPopulateType_Identity)->ToTypeInstance(); break;
- case BfTypeCode_Boolean:
- typeInst = ResolveTypeDef(mSystem->FindTypeDef("System.Boolean"), BfPopulateType_Identity)->ToTypeInstance(); break;
- case BfTypeCode_Int8:
- typeInst = ResolveTypeDef(mSystem->FindTypeDef("System.Int8"), BfPopulateType_Identity)->ToTypeInstance(); break;
- case BfTypeCode_UInt8:
- typeInst = ResolveTypeDef(mSystem->FindTypeDef("System.UInt8"), BfPopulateType_Identity)->ToTypeInstance(); break;
- case BfTypeCode_Int16:
- typeInst = ResolveTypeDef(mSystem->FindTypeDef("System.Int16"), BfPopulateType_Identity)->ToTypeInstance(); break;
- case BfTypeCode_UInt16:
- typeInst = ResolveTypeDef(mSystem->FindTypeDef("System.UInt16"), BfPopulateType_Identity)->ToTypeInstance(); break;
- case BfTypeCode_Int32:
- typeInst = ResolveTypeDef(mSystem->FindTypeDef("System.Int32"), BfPopulateType_Identity)->ToTypeInstance(); break;
- case BfTypeCode_UInt32:
- typeInst = ResolveTypeDef(mSystem->FindTypeDef("System.UInt32"), BfPopulateType_Identity)->ToTypeInstance(); break;
- case BfTypeCode_Int64:
- typeInst = ResolveTypeDef(mSystem->FindTypeDef("System.Int64"), BfPopulateType_Identity)->ToTypeInstance(); break;
- case BfTypeCode_UInt64:
- typeInst = ResolveTypeDef(mSystem->FindTypeDef("System.UInt64"), BfPopulateType_Identity)->ToTypeInstance(); break;
- case BfTypeCode_IntPtr:
- case BfTypeCode_IntUnknown:
- typeInst = ResolveTypeDef(mSystem->FindTypeDef("System.Int"), BfPopulateType_Identity)->ToTypeInstance(); break;
- case BfTypeCode_UIntPtr:
- case BfTypeCode_UIntUnknown:
- typeInst = ResolveTypeDef(mSystem->FindTypeDef("System.UInt"), BfPopulateType_Identity)->ToTypeInstance(); break;
- case BfTypeCode_Char8:
- typeInst = ResolveTypeDef(mSystem->FindTypeDef("System.Char8"), BfPopulateType_Identity)->ToTypeInstance(); break;
- case BfTypeCode_Char16:
- typeInst = ResolveTypeDef(mSystem->FindTypeDef("System.Char16"), BfPopulateType_Identity)->ToTypeInstance(); break;
- case BfTypeCode_Char32:
- typeInst = ResolveTypeDef(mSystem->FindTypeDef("System.Char32"), BfPopulateType_Identity)->ToTypeInstance(); break;
- case BfTypeCode_Float:
- typeInst = ResolveTypeDef(mSystem->FindTypeDef("System.Float"), BfPopulateType_Identity)->ToTypeInstance(); break;
- case BfTypeCode_Double:
- typeInst = ResolveTypeDef(mSystem->FindTypeDef("System.Double"), BfPopulateType_Identity)->ToTypeInstance(); break;
- default:
- //BF_FATAL("not implemented");
- break;
- }
- return typeInst;
- }
- BfBoxedType* BfModule::CreateBoxedType(BfType* resolvedTypeRef, bool allowCreate)
- {
- bool isStructPtr = false;
- BfPopulateType populateType = allowCreate ? BfPopulateType_Data : BfPopulateType_Identity;
- BfResolveTypeRefFlags resolveFlags = allowCreate ? BfResolveTypeRefFlag_None : BfResolveTypeRefFlag_NoCreate;
- if (resolvedTypeRef->IsPrimitiveType())
- {
- auto primType = (BfPrimitiveType*)resolvedTypeRef;
- resolvedTypeRef = GetPrimitiveStructType(primType->mTypeDef->mTypeCode);
- if (resolvedTypeRef == NULL)
- return NULL;
- }
- else if (resolvedTypeRef->IsPointer())
- {
- BfPointerType* pointerType = (BfPointerType*)resolvedTypeRef;
- if (pointerType->mElementType->IsStruct())
- {
- resolvedTypeRef = pointerType->mElementType;
- isStructPtr = true;
- }
- else
- {
- BfTypeVector typeVector;
- typeVector.Add(pointerType->mElementType);
- resolvedTypeRef = ResolveTypeDef(mCompiler->mPointerTTypeDef, typeVector, populateType, resolveFlags);
- if (resolvedTypeRef == NULL)
- return NULL;
- }
- }
- else if (resolvedTypeRef->IsMethodRef())
- {
- BfMethodRefType* methodRefType = (BfMethodRefType*)resolvedTypeRef;
- BfTypeVector typeVector;
- typeVector.Add(methodRefType);
- resolvedTypeRef = ResolveTypeDef(mCompiler->mMethodRefTypeDef, typeVector, populateType, resolveFlags);
- if (resolvedTypeRef == NULL)
- return NULL;
- }
- else if (resolvedTypeRef->IsSizedArray())
- {
- BfSizedArrayType* sizedArrayType = (BfSizedArrayType*)resolvedTypeRef;
- BfTypeVector typeVector;
- typeVector.Add(sizedArrayType->mElementType);
- auto sizeValue = BfTypedValue(GetConstValue(sizedArrayType->mElementCount), GetPrimitiveType(BfTypeCode_IntPtr));
- auto sizeValueType = CreateConstExprValueType(sizeValue, allowCreate);
- if (sizeValueType == NULL)
- return NULL;
- typeVector.Add(sizeValueType);
- resolvedTypeRef = ResolveTypeDef(mCompiler->mSizedArrayTypeDef, typeVector, populateType, resolveFlags);
- if (resolvedTypeRef == NULL)
- return NULL;
- }
- BfTypeInstance* typeInst = resolvedTypeRef->ToTypeInstance();
- if ((typeInst == NULL) && (!resolvedTypeRef->IsGenericParam()))
- return NULL;
- auto boxedType = mContext->mBoxedTypePool.Get();
- boxedType->mContext = mContext;
- boxedType->mElementType = resolvedTypeRef;
- if (typeInst != NULL)
- boxedType->mTypeDef = typeInst->mTypeDef->GetDefinition();
- else
- boxedType->mTypeDef = mCompiler->mValueTypeTypeDef;
- boxedType->mBoxedFlags = isStructPtr ? BfBoxedType::BoxedFlags_StructPtr : BfBoxedType::BoxedFlags_None;
- auto resolvedBoxedType = ResolveType(boxedType, populateType, resolveFlags);
- if (resolvedBoxedType != boxedType)
- {
- boxedType->Dispose();
- mContext->mBoxedTypePool.GiveBack(boxedType);
- }
- return (BfBoxedType*)resolvedBoxedType;
- }
- BfTypeInstance* BfModule::CreateTupleType(const BfTypeVector& fieldTypes, const Array<String>& fieldNames, bool allowVar)
- {
- auto baseType = (BfTypeInstance*)ResolveTypeDef(mContext->mCompiler->mValueTypeTypeDef);
- BfTupleType* tupleType = NULL;
-
- auto actualTupleType = mContext->mTupleTypePool.Get();
- actualTupleType->Init(baseType->mTypeDef->mProject, baseType);
- bool isUnspecialzied = false;
- for (int fieldIdx = 0; fieldIdx < (int)fieldTypes.size(); fieldIdx++)
- {
- String fieldName;
- if (fieldIdx < (int)fieldNames.size())
- fieldName = fieldNames[fieldIdx];
- if (fieldName.empty())
- fieldName = StrFormat("%d", fieldIdx);
- BfFieldDef* fieldDef = actualTupleType->AddField(fieldName);
- auto fieldType = fieldTypes[fieldIdx];
- if ((fieldType->IsUnspecializedType()) || (fieldType->IsVar()))
- isUnspecialzied = true;
- }
- tupleType = actualTupleType;
- tupleType->mContext = mContext;
- tupleType->mFieldInstances.Resize(fieldTypes.size());
- for (int fieldIdx = 0; fieldIdx < (int)fieldTypes.size(); fieldIdx++)
- {
- BfFieldInstance* fieldInstance = (BfFieldInstance*)&tupleType->mFieldInstances[fieldIdx];
- fieldInstance->mFieldIdx = fieldIdx;
- BfType* fieldType = fieldTypes[fieldIdx];
- if ((fieldType->IsVar()) && (!allowVar))
- fieldType = mContext->mBfObjectType;
- fieldInstance->SetResolvedType(fieldType);
- fieldInstance->mOwner = tupleType;
- }
-
- tupleType->mIsUnspecializedType = false;
- tupleType->mIsUnspecializedTypeVariation = false;
- if (isUnspecialzied)
- {
- tupleType->mIsUnspecializedType = true;
- tupleType->mIsUnspecializedTypeVariation = true;
- }
- auto resolvedTupleType = ResolveType(tupleType);
- if (resolvedTupleType != tupleType)
- {
- BF_ASSERT(tupleType->mContext != NULL);
- tupleType->Dispose();
- mContext->mTupleTypePool.GiveBack((BfTupleType*)tupleType);
- }
-
- return (BfTupleType*)resolvedTupleType;
- }
- BfTypeInstance* BfModule::SantizeTupleType(BfTypeInstance* tupleType)
- {
- bool needsSanitize = false;
- for (int fieldIdx = 0; fieldIdx < (int)tupleType->mFieldInstances.size(); fieldIdx++)
- {
- BfFieldInstance* fieldInstance = (BfFieldInstance*)&tupleType->mFieldInstances[fieldIdx];
- if ((fieldInstance->mResolvedType->IsVar()) || (fieldInstance->mResolvedType->IsLet()))
- {
- needsSanitize = true;
- break;
- }
- }
- if (!needsSanitize)
- return tupleType;
- BfTypeVector fieldTypes;
- Array<String> fieldNames;
- for (int fieldIdx = 0; fieldIdx < (int)tupleType->mFieldInstances.size(); fieldIdx++)
- {
- BfFieldInstance* fieldInstance = (BfFieldInstance*)&tupleType->mFieldInstances[fieldIdx];
- auto fieldDef = fieldInstance->GetFieldDef();
- if ((fieldInstance->mResolvedType->IsVar()) || (fieldInstance->mResolvedType->IsLet()))
- fieldTypes.Add(mContext->mBfObjectType);
- else
- fieldTypes.Add(fieldInstance->mResolvedType);
- if (!fieldDef->IsUnnamedTupleField())
- {
- for (int i = 0; i < fieldIdx; i++)
- fieldNames.Add(String());
- fieldNames.Add(fieldDef->mName);
- }
- }
- return CreateTupleType(fieldTypes, fieldNames);
- }
- BfRefType* BfModule::CreateRefType(BfType* resolvedTypeRef, BfRefType::RefKind refKind)
- {
- auto refType = mContext->mRefTypePool.Get();
- refType->mContext = mContext;
- refType->mElementType = resolvedTypeRef;
- refType->mRefKind = refKind;
- auto resolvedRefType = ResolveType(refType);
- if (resolvedRefType != refType)
- mContext->mRefTypePool.GiveBack(refType);
- return (BfRefType*)resolvedRefType;
- }
- BfModifiedTypeType* BfModule::CreateModifiedTypeType(BfType* resolvedTypeRef, BfToken modifiedKind)
- {
- auto retTypeType = mContext->mModifiedTypeTypePool.Get();
- retTypeType->mContext = mContext;
- retTypeType->mModifiedKind = modifiedKind;
- retTypeType->mElementType = resolvedTypeRef;
- auto resolvedRetTypeType = ResolveType(retTypeType);
- if (resolvedRetTypeType != retTypeType)
- mContext->mModifiedTypeTypePool.GiveBack(retTypeType);
- return (BfModifiedTypeType*)resolvedRetTypeType;
- }
- BfConcreteInterfaceType* BfModule::CreateConcreteInterfaceType(BfTypeInstance* interfaceType)
- {
- auto concreteInterfaceType = mContext->mConcreteInterfaceTypePool.Get();
- concreteInterfaceType->mContext = mContext;
- concreteInterfaceType->mInterface = interfaceType;
- auto resolvedConcreteInterfaceType = ResolveType(concreteInterfaceType);
- if (resolvedConcreteInterfaceType != concreteInterfaceType)
- mContext->mConcreteInterfaceTypePool.GiveBack(concreteInterfaceType);
- return (BfConcreteInterfaceType*)resolvedConcreteInterfaceType;
- }
- BfPointerType* BfModule::CreatePointerType(BfTypeReference* typeRef)
- {
- auto resolvedTypeRef = ResolveTypeRef(typeRef);
- if (resolvedTypeRef == NULL)
- return NULL;
- return CreatePointerType(resolvedTypeRef);
- }
- BfType* BfModule::ResolveTypeDef(BfTypeDef* typeDef, BfPopulateType populateType, BfResolveTypeRefFlags resolveFlags)
- {
- BF_ASSERT(typeDef->mDefState != BfTypeDef::DefState_Emitted);
- if (typeDef->mTypeDeclaration == NULL)
- {
- BF_ASSERT(!typeDef->mIsDelegate && !typeDef->mIsFunction);
- }
- //BF_ASSERT(typeDef->mTypeCode != BfTypeCode_Extension);
- BF_ASSERT(!typeDef->mIsPartial || typeDef->mIsCombinedPartial);
- BF_ASSERT(typeDef->mDefState != BfTypeDef::DefState_Deleted);
- BF_ASSERT((typeDef->mOuterType == NULL) || (typeDef->mOuterType->mDefState != BfTypeDef::DefState_Deleted));
- if (typeDef->mGenericParamDefs.size() != 0)
- return ResolveTypeDef(typeDef, BfTypeVector(), populateType, resolveFlags);
- auto typeDefTypeRef = mContext->mTypeDefTypeRefPool.Get();
- typeDefTypeRef->mTypeDef = typeDef;
- auto resolvedtypeDefType = ResolveTypeRef(typeDefTypeRef, populateType);
- if (resolvedtypeDefType == NULL)
- {
- mContext->mTypeDefTypeRefPool.GiveBack(typeDefTypeRef);
- return NULL;
- }
- mContext->mTypeDefTypeRefPool.GiveBack(typeDefTypeRef);
- //BF_ASSERT(resolvedtypeDefType->IsTypeInstance() || resolvedtypeDefType->IsPrimitiveType());
- return resolvedtypeDefType;
- }
- // Get BaseClass even when we haven't populated the type yet
- BfTypeInstance* BfModule::GetBaseType(BfTypeInstance* typeInst)
- {
- if (typeInst->mBaseType == NULL)
- {
- auto checkTypeState = mContext->mCurTypeState;
- while (checkTypeState != NULL)
- {
- if (checkTypeState->mType == typeInst)
- return NULL;
- checkTypeState = checkTypeState->mPrevState;
- }
- }
- if ((typeInst->mBaseType == NULL) && (typeInst != mContext->mBfObjectType))
- PopulateType(typeInst, BfPopulateType_BaseType);
- return typeInst->mBaseType;
- }
- void BfModule::HandleTypeGenericParamRef(BfAstNode* refNode, BfTypeDef* typeDef, int typeGenericParamIdx)
- {
- if (mCompiler->IsAutocomplete())
- {
- BfAutoComplete* autoComplete = mCompiler->mResolvePassData->mAutoComplete;
- if ((autoComplete != NULL) && (autoComplete->mIsGetDefinition) && (autoComplete->IsAutocompleteNode(refNode)))
- {
- if ((autoComplete->mDefMethod == NULL) && (autoComplete->mDefField == NULL) &&
- (autoComplete->mDefProp == NULL))
- {
- autoComplete->mDefType = typeDef;
- autoComplete->mDefTypeGenericParamIdx = typeGenericParamIdx;
- autoComplete->SetDefinitionLocation(refNode);
- }
- }
- }
- if (mCompiler->mResolvePassData != NULL)
- mCompiler->mResolvePassData->HandleTypeGenericParam(refNode, typeDef, typeGenericParamIdx);
- }
- void BfModule::HandleMethodGenericParamRef(BfAstNode* refNode, BfTypeDef* typeDef, BfMethodDef* methodDef, int methodGenericParamIdx)
- {
- if (mCompiler->IsAutocomplete())
- {
- BfAutoComplete* autoComplete = mCompiler->mResolvePassData->mAutoComplete;
- if ((autoComplete != NULL) && (autoComplete->mIsGetDefinition) && (autoComplete->IsAutocompleteNode(refNode)))
- {
- if ((autoComplete->mDefMethod == NULL) && (autoComplete->mDefField == NULL) &&
- (autoComplete->mDefProp == NULL))
- {
- autoComplete->mDefType = typeDef;
- autoComplete->mDefMethod = methodDef;
- autoComplete->mDefMethodGenericParamIdx = methodGenericParamIdx;
- autoComplete->SetDefinitionLocation(refNode);
- }
- }
- }
- if (mCompiler->mResolvePassData != NULL)
- mCompiler->mResolvePassData->HandleMethodGenericParam(refNode, typeDef, methodDef, methodGenericParamIdx);
- }
- BfType* BfModule::ResolveInnerType(BfType* outerType, BfAstNode* typeRef, BfPopulateType populateType, bool ignoreErrors, int numGenericArgs)
- {
- BfTypeDef* nestedTypeDef = NULL;
- if (outerType->IsBoxed())
- outerType = outerType->GetUnderlyingType();
- BfNamedTypeReference* namedTypeRef = NULL;
- BfGenericInstanceTypeRef* genericTypeRef = NULL;
- BfDirectStrTypeReference* directStrTypeRef = NULL;
- BfIdentifierNode* identifierNode = NULL;
- if ((namedTypeRef = BfNodeDynCast<BfNamedTypeReference>(typeRef)))
- {
- //TYPEDEF nestedTypeDef = namedTypeRef->mTypeDef;
- }
- else if ((genericTypeRef = BfNodeDynCast<BfGenericInstanceTypeRef>(typeRef)))
- {
- namedTypeRef = BfNodeDynCast<BfNamedTypeReference>(genericTypeRef->mElementType);
- //TYPEDEF nestedTypeDef = namedTypeRef->mTypeDef;
- }
- else if ((identifierNode = BfNodeDynCast<BfIdentifierNode>(typeRef)))
- {
- //TYPEDEF nestedTypeDef = namedTypeRef->mTypeDef;
- }
- else if ((directStrTypeRef = BfNodeDynCast<BfDirectStrTypeReference>(typeRef)))
- {
- //
- }
- BF_ASSERT((identifierNode != NULL) || (namedTypeRef != NULL) || (directStrTypeRef != NULL));
- auto usedOuterType = outerType;
- if (nestedTypeDef == NULL)
- {
- StringView findName;
- if (namedTypeRef != NULL)
- findName = namedTypeRef->mNameNode->ToStringView();
- else if (identifierNode != NULL)
- findName = identifierNode->ToStringView();
- else
- findName = directStrTypeRef->mTypeName;
- if (!findName.Contains('.'))
- {
- if (outerType->IsTypeInstance())
- {
- auto outerTypeInstance = outerType->ToTypeInstance();
- for (int pass = 0; pass < 2; pass++)
- {
- bool isFailurePass = pass == 1;
- bool allowPrivate = (mCurTypeInstance != NULL) &&
- ((mCurTypeInstance == outerTypeInstance) || TypeHasParentOrEquals(mCurTypeInstance->mTypeDef, outerTypeInstance->mTypeDef));
- bool allowProtected = allowPrivate;/*(mCurTypeInstance != NULL) &&
- (allowPrivate || (mCurTypeInstance->mSkipTypeProtectionChecks) || TypeIsSubTypeOf(mCurTypeInstance, outerTypeInstance));*/
- auto checkOuterType = outerTypeInstance;
- while (checkOuterType != NULL)
- {
- for (auto checkType : checkOuterType->mTypeDef->mNestedTypes)
- {
- auto latestCheckType = checkType->GetLatest();
- if ((!isFailurePass) && (!CheckProtection(latestCheckType->mProtection, latestCheckType, allowProtected, allowPrivate)))
- continue;
- if (checkType->mProject != checkOuterType->mTypeDef->mProject)
- {
- auto visibleProjectSet = GetVisibleProjectSet();
- if ((visibleProjectSet == NULL) || (!visibleProjectSet->Contains(checkType->mProject)))
- continue;
- }
- if ((checkType->mName->mString == findName) && (checkType->GetSelfGenericParamCount() == numGenericArgs))
- {
- if (isFailurePass)
- {
- // This is the one error we don't ignore when ignoreErrors is set
- Fail(StrFormat("'%s.%s' is inaccessible due to its protection level", TypeToString(checkOuterType).c_str(), BfTypeUtils::TypeToString(typeRef).c_str()), typeRef); // CS0122
- }
- usedOuterType = checkOuterType;
- nestedTypeDef = checkType;
- break;
- }
- }
- if (nestedTypeDef != NULL)
- break;
- allowPrivate = false;
- checkOuterType = GetBaseType(checkOuterType);
- }
- if (nestedTypeDef != NULL)
- break;
- if ((outerTypeInstance->IsEnum()) && (findName == "UnderlyingType"))
- {
- auto underlyingType = outerTypeInstance->GetUnderlyingType();
- if (underlyingType != NULL)
- return underlyingType;
- }
- }
- }
- }
- if (nestedTypeDef == NULL)
- {
- if (!mIgnoreErrors && !ignoreErrors)
- {
- StringT<64> name;
- name.Append(findName);
- Fail(StrFormat("'%s' does not contain a definition for '%s'", TypeToString(outerType).c_str(), name.c_str()), typeRef);
- }
- return NULL;
- }
- }
- SetAndRestoreValue<bool> prevIgnoreErrors(mIgnoreErrors, ignoreErrors || mIgnoreErrors);
- if ((genericTypeRef != NULL) || (usedOuterType->IsGenericTypeInstance()))
- {
- BfTypeVector genericArgs;
- if (usedOuterType->IsGenericTypeInstance())
- {
- auto genericTypeInst = (BfTypeInstance*)usedOuterType;
- genericArgs = genericTypeInst->mGenericTypeInfo->mTypeGenericArguments;
- }
- if (genericTypeRef != NULL)
- {
- for (auto genericArgTypeRef : genericTypeRef->mGenericArguments)
- {
- auto genericArgType = ResolveTypeRef(genericArgTypeRef, NULL, BfPopulateType_IdentityNoRemapAlias);
- if (genericArgType == NULL)
- return NULL;
- genericArgs.push_back(genericArgType);
- }
- }
- if (genericArgs.size() != nestedTypeDef->mGenericParamDefs.size())
- {
- if (populateType == BfPopulateType_TypeDef)
- {
- // Probably from inside ResolveGenericInstanceDef, just return unresolved typedef
- genericArgs.clear();
- }
- else
- {
- ShowGenericArgCountError(typeRef, (int)nestedTypeDef->mGenericParamDefs.size() - (int)nestedTypeDef->mOuterType->mGenericParamDefs.size());
- return NULL;
- }
- }
- if (nestedTypeDef->mIsPartial)
- {
- nestedTypeDef = GetCombinedPartialTypeDef(nestedTypeDef);
- if (nestedTypeDef == NULL)
- return NULL;
- }
- return ResolveTypeDef(nestedTypeDef, genericArgs, BfPopulateType_IdentityNoRemapAlias);
- }
- else
- {
- if (nestedTypeDef->mIsPartial)
- {
- nestedTypeDef = GetCombinedPartialTypeDef(nestedTypeDef);
- if (nestedTypeDef == NULL)
- return NULL;
- }
- return ResolveTypeDef(nestedTypeDef, BfPopulateType_IdentityNoRemapAlias);
- }
- return NULL;
- }
- BfTypeDef* BfModule::GetCombinedPartialTypeDef(BfTypeDef* typeDef)
- {
- BF_ASSERT(!typeDef->mIsExplicitPartial);
- if (!typeDef->mIsPartial)
- return typeDef;
- auto result = mSystem->FindTypeDef(typeDef->mFullName.ToString(), (int)typeDef->mGenericParamDefs.size());
- return result;
- }
- BfTypeInstance* BfModule::GetOuterType(BfType* type)
- {
- if (type == NULL)
- return NULL;
- if (type->IsBoxed())
- return GetOuterType(((BfBoxedType*)type)->mElementType);
- auto typeInst = type->ToTypeInstance();
- if ((typeInst == NULL) || (typeInst->mTypeDef->mOuterType == NULL))
- return NULL;
- auto outerTypeDef = typeInst->mTypeDef->mOuterType;
- if (outerTypeDef->mIsPartial)
- {
- outerTypeDef = GetCombinedPartialTypeDef(outerTypeDef);
- if (outerTypeDef == NULL)
- return NULL;
- }
- BfTypeVector typeGenericArguments;
- if (type->IsGenericTypeInstance())
- {
- auto genericType = (BfTypeInstance*)type;
- typeGenericArguments = genericType->mGenericTypeInfo->mTypeGenericArguments;
- }
- BF_ASSERT((intptr)typeGenericArguments.size() >= (intptr)outerTypeDef->mGenericParamDefs.size());
- typeGenericArguments.resize(outerTypeDef->mGenericParamDefs.size());
- //auto outerType = ResolveTypeDef(outerTypeDef, typeGenericArguments, BfPopulateType_Declaration);
- auto outerType = ResolveTypeDef(outerTypeDef, typeGenericArguments, BfPopulateType_Identity);
- if (outerType == NULL)
- return NULL;
- return outerType->ToTypeInstance();
- }
- bool BfModule::IsInnerType(BfType* checkInnerType, BfType* checkOuterType)
- {
- BfType* outerType = GetOuterType(checkInnerType);
- if (outerType == NULL)
- return false;
- if (outerType == checkOuterType)
- return true;
- return IsInnerType(outerType, checkOuterType);
- }
- bool BfModule::IsInnerType(BfTypeDef* checkInnerType, BfTypeDef* checkOuterType)
- {
- BF_ASSERT(!checkOuterType->mIsPartial);
- if (checkInnerType->mNestDepth <= checkOuterType->mNestDepth)
- return false;
- while (true)
- {
- BfTypeDef* outerType = checkInnerType->mOuterType;
- if (outerType == NULL)
- return false;
- if (outerType->mIsPartial)
- outerType = mSystem->GetCombinedPartial(outerType);
- if (outerType->GetDefinition() == checkOuterType->GetDefinition())
- return true;
- checkInnerType = checkInnerType->mOuterType;
- }
- }
- BfType* BfModule::ResolveTypeDef(BfTypeDef* typeDef, const BfTypeVector& genericArgs, BfPopulateType populateType, BfResolveTypeRefFlags resolveFlags)
- {
- BF_ASSERT(typeDef->mDefState != BfTypeDef::DefState_Emitted);
- if (typeDef->mGenericParamDefs.size() == 0)
- return ResolveTypeDef(typeDef, populateType, resolveFlags);
- if ((typeDef == mCompiler->mArray1TypeDef) || (typeDef == mCompiler->mArray2TypeDef))
- {
- auto arrayInstType = mContext->mArrayTypeInstancePool.Get();
- arrayInstType->mContext = mContext;
- if (typeDef == mCompiler->mArray1TypeDef)
- arrayInstType->mDimensions = 1;
- else
- arrayInstType->mDimensions = 2;
- auto typeRef = mContext->mTypeDefTypeRefPool.Get();
- typeRef->mTypeDef = typeDef;
- delete arrayInstType->mGenericTypeInfo;
- arrayInstType->mGenericTypeInfo = new BfGenericTypeInfo();
- arrayInstType->mTypeDef = typeDef;
- arrayInstType->mGenericTypeInfo->mIsUnspecialized = false;
- arrayInstType->mGenericTypeInfo->mTypeGenericArguments.clear();
- for (auto genericArg : genericArgs)
- {
- arrayInstType->mGenericTypeInfo->mIsUnspecialized |= genericArg->IsGenericParam();
- arrayInstType->mGenericTypeInfo->mTypeGenericArguments.push_back(genericArg);
- }
- if (genericArgs.size() == 0)
- {
- for (int i = 0; i < (int)typeDef->mGenericParamDefs.size(); i++)
- {
- auto genericParamTypeRef = GetGenericParamType(BfGenericParamKind_Type, i);
- arrayInstType->mGenericTypeInfo->mTypeGenericArguments.push_back(genericParamTypeRef);
- arrayInstType->mGenericTypeInfo->mIsUnspecialized = true;
- }
- }
- auto resolvedType = ResolveType(arrayInstType, populateType, resolveFlags);
- if (resolvedType != arrayInstType)
- {
- delete arrayInstType->mGenericTypeInfo;
- arrayInstType->mGenericTypeInfo = NULL;
- arrayInstType->Dispose();
- mContext->mArrayTypeInstancePool.GiveBack(arrayInstType);
- mContext->mTypeDefTypeRefPool.GiveBack(typeRef);
- }
- BF_ASSERT((resolvedType == NULL) || resolvedType->IsTypeInstance() || resolvedType->IsPrimitiveType());
- return resolvedType;
- }
- BfTypeInstance* genericInstType;
- if (typeDef->mTypeCode == BfTypeCode_TypeAlias)
- genericInstType = mContext->mAliasTypePool.Get();
- else
- genericInstType = mContext->mGenericTypeInstancePool.Get();
- delete genericInstType->mGenericTypeInfo;
- genericInstType->mGenericTypeInfo = new BfGenericTypeInfo();
- BF_ASSERT(genericInstType->mGenericTypeInfo->mGenericParams.size() == 0);
- BF_ASSERT((genericInstType->mRebuildFlags & BfTypeRebuildFlag_AddedToWorkList) == 0);
- genericInstType->mRebuildFlags = (BfTypeRebuildFlags)(genericInstType->mRebuildFlags & ~BfTypeRebuildFlag_InTempPool);
- genericInstType->mContext = mContext;
- auto typeRef = mContext->mTypeDefTypeRefPool.Get();
- typeRef->mTypeDef = typeDef;
- genericInstType->mTypeDef = typeDef;
- genericInstType->mGenericTypeInfo->mIsUnspecialized = false;
- genericInstType->mGenericTypeInfo->mTypeGenericArguments.clear();
- genericInstType->mTypeFailed = false;
- for (auto genericArg : genericArgs)
- {
- genericInstType->mGenericTypeInfo->mIsUnspecialized |= genericArg->IsGenericParam();
- genericInstType->mGenericTypeInfo->mTypeGenericArguments.push_back(genericArg);
- }
- if (genericArgs.size() == 0)
- {
- for (int i = 0; i < (int)typeDef->mGenericParamDefs.size(); i++)
- {
- auto genericParamTypeRef = GetGenericParamType(BfGenericParamKind_Type, i);
- genericInstType->mGenericTypeInfo->mTypeGenericArguments.push_back(genericParamTypeRef);
- genericInstType->mGenericTypeInfo->mIsUnspecialized = true;
- }
- }
- BfType* resolvedType = NULL;
- bool failed = false;
- resolvedType = ResolveType(genericInstType, populateType, resolveFlags);
- if (resolvedType != genericInstType)
- {
- BF_ASSERT(genericInstType->mGenericTypeInfo->mGenericParams.size() == 0);
- BF_ASSERT((genericInstType->mRebuildFlags & BfTypeRebuildFlag_AddedToWorkList) == 0);
- genericInstType->mRebuildFlags = (BfTypeRebuildFlags)(genericInstType->mRebuildFlags | BfTypeRebuildFlag_InTempPool);
- delete genericInstType->mGenericTypeInfo;
- genericInstType->mGenericTypeInfo = NULL;
- if (typeDef->mTypeCode == BfTypeCode_TypeAlias)
- mContext->mAliasTypePool.GiveBack((BfTypeAliasType*)genericInstType);
- else
- {
- genericInstType->Dispose();
- mContext->mGenericTypeInstancePool.GiveBack(genericInstType);
- }
- mContext->mTypeDefTypeRefPool.GiveBack(typeRef);
- }
- BF_ASSERT((resolvedType == NULL) || resolvedType->IsTypeInstance() || resolvedType->IsPrimitiveType());
- return resolvedType;
- }
- int checkIdx = 0;
- BfTypeDef* BfModule::ResolveGenericInstanceDef(BfGenericInstanceTypeRef* genericTypeRef, BfType** outType, BfResolveTypeRefFlags resolveFlags)
- {
- if (outType != NULL)
- *outType = NULL;
- BfTypeReference* typeRef = genericTypeRef->mElementType;
- int numGenericParams = genericTypeRef->GetGenericArgCount();
- BfTypeDef* curTypeDef = NULL;
- if (mCurTypeInstance != NULL)
- curTypeDef = mCurTypeInstance->mTypeDef->GetDefinition();
- if (auto directTypeDef = BfNodeDynCast<BfDirectTypeReference>(typeRef))
- {
- auto typeInst = directTypeDef->mType->ToTypeInstance();
- return typeInst->mTypeDef->GetDefinition();
- }
- auto namedTypeRef = BfNodeDynCast<BfNamedTypeReference>(typeRef);
- auto directStrTypeDef = BfNodeDynCastExact<BfDirectStrTypeReference>(typeRef);
- if ((namedTypeRef != NULL) || (directStrTypeDef != NULL))
- {
- BfTypeLookupError error;
- error.mRefNode = typeRef;
- BfTypeDef* typeDef = FindTypeDef(typeRef, NULL, &error, numGenericParams, resolveFlags);
- if (typeDef != NULL)
- {
- BfAutoComplete* autoComplete = NULL;
- if (mCompiler->IsAutocomplete())
- autoComplete = mCompiler->mResolvePassData->mAutoComplete;
-
- if ((autoComplete != NULL) && (autoComplete->mIsGetDefinition) && (autoComplete->IsAutocompleteNode(typeRef)))
- {
- if ((autoComplete->mDefMethod == NULL) && (autoComplete->mDefField == NULL) &&
- (autoComplete->mDefProp == NULL) && (typeDef->mTypeDeclaration != NULL))
- {
- autoComplete->mDefType = typeDef;
- autoComplete->SetDefinitionLocation(typeDef->mTypeDeclaration->mNameNode);
- }
- }
- if (mCompiler->mResolvePassData != NULL)
- mCompiler->mResolvePassData->HandleTypeReference(typeRef, typeDef);
- return typeDef;
- }
- if (mCurTypeInstance != NULL)
- {
- bool wasGenericParam = false;
- // Check generics first
- if (typeRef->IsA<BfNamedTypeReference>())
- {
- String findName = typeRef->ToString();
- if ((resolveFlags & BfResolveTypeRefFlag_Attribute) != 0)
- findName += "Attribute";
- if ((mCurTypeInstance != NULL) && (mCurTypeInstance->IsGenericTypeInstance()))
- {
- auto genericTypeInst = (BfTypeInstance*)mCurTypeInstance;
- for (int genericParamIdx = 0; genericParamIdx < (int)curTypeDef->mGenericParamDefs.size(); genericParamIdx++)
- {
- String genericName = curTypeDef->mGenericParamDefs[genericParamIdx]->mName;
- if (genericName == findName)
- wasGenericParam = true;
- }
- }
- if (mCurMethodInstance != NULL)
- {
- for (int genericParamIdx = 0; genericParamIdx < (int)mCurMethodInstance->mMethodDef->mGenericParams.size(); genericParamIdx++)
- {
- String genericName = mCurMethodInstance->mMethodDef->mGenericParams[genericParamIdx]->mName;
- if (genericName == findName)
- wasGenericParam = true;
- }
- }
- }
- if ((wasGenericParam) && ((resolveFlags & BfResolveTypeRefFlag_IgnoreLookupError) == 0))
- Fail("Cannot use generic param as generic instance type", typeRef);
- }
-
- if (typeDef == NULL)
- {
- if ((resolveFlags & BfResolveTypeRefFlag_IgnoreLookupError) == 0)
- TypeRefNotFound(typeRef);
- return NULL;
- }
- }
- if (auto qualifiedTypeRef = BfNodeDynCast<BfQualifiedTypeReference>(typeRef))
- {
- BfAutoParentNodeEntry autoParentNodeEntry(this, genericTypeRef);
- auto type = ResolveTypeRef(qualifiedTypeRef, BfPopulateType_TypeDef, BfResolveTypeRefFlag_None, numGenericParams);
- if (type == NULL)
- return NULL;
- if (outType != NULL)
- *outType = type;
- auto typeInst = type->ToTypeInstance();
- if (typeInst != NULL)
- return typeInst->mTypeDef->GetDefinition();
- }
- if ((resolveFlags & BfResolveTypeRefFlag_IgnoreLookupError) == 0)
- Fail("Invalid generic type", typeRef);
- return NULL;
- }
- BfType* BfModule::ResolveGenericType(BfType* unspecializedType, BfTypeVector* typeGenericArguments, BfTypeVector* methodGenericArguments, bool allowFail)
- {
- if (unspecializedType->IsGenericParam())
- {
- auto genericParam = (BfGenericParamType*)unspecializedType;
- if ((genericParam->mGenericParamKind == BfGenericParamKind_Type) && (typeGenericArguments != NULL))
- {
- if (genericParam->mGenericParamIdx < (int)typeGenericArguments->size())
- return FixIntUnknown((*typeGenericArguments)[genericParam->mGenericParamIdx]);
- BF_ASSERT(allowFail);
- }
- if ((genericParam->mGenericParamKind == BfGenericParamKind_Method) && (methodGenericArguments != NULL))
- {
- if (genericParam->mGenericParamIdx < (int)methodGenericArguments->size())
- {
- auto resolvedType = FixIntUnknown((*methodGenericArguments)[genericParam->mGenericParamIdx]);
- if ((resolvedType != NULL) && (resolvedType->IsGenericParam()))
- {
- auto genericParamType = (BfGenericParamType*)resolvedType;
- //BF_ASSERT(genericParamType->mGenericParamKind != BfGenericParamKind_Method);
- }
- return resolvedType;
- }
- BF_ASSERT(allowFail);
- }
- return unspecializedType;
- }
- if ((unspecializedType->IsSelf()) && (mCurTypeInstance != NULL))
- return mCurTypeInstance;
- if (!unspecializedType->IsUnspecializedType())
- {
- return unspecializedType;
- }
- if (unspecializedType->IsUnknownSizedArrayType())
- {
- auto* arrayType = (BfUnknownSizedArrayType*)unspecializedType;
- auto elementType = ResolveGenericType(arrayType->mElementType, typeGenericArguments, methodGenericArguments, allowFail);
- if (elementType == NULL)
- return NULL;
- if (elementType->IsVar())
- return elementType;
- auto sizeType = ResolveGenericType(arrayType->mElementCountSource, typeGenericArguments, methodGenericArguments, allowFail);
- if (sizeType == NULL)
- return NULL;
- if (sizeType->IsConstExprValue())
- {
- return CreateSizedArrayType(elementType, ((BfConstExprValueType*)sizeType)->mValue.mInt32);
- }
- return CreateUnknownSizedArrayType(elementType, sizeType);
- }
- if (unspecializedType->IsSizedArray())
- {
- auto* arrayType = (BfSizedArrayType*)unspecializedType;
- auto elementType = ResolveGenericType(arrayType->mElementType, typeGenericArguments, methodGenericArguments, allowFail);
- if (elementType == NULL)
- return NULL;
- if (elementType->IsVar())
- return elementType;
- elementType = FixIntUnknown(elementType);
- return CreateSizedArrayType(elementType, (int)arrayType->mElementCount);
- }
- if (unspecializedType->IsRef())
- {
- auto refType = (BfRefType*)unspecializedType;
- auto elementType = ResolveGenericType(refType->GetUnderlyingType(), typeGenericArguments, methodGenericArguments, allowFail);
- if (elementType == NULL)
- return NULL;
- if (elementType->IsVar())
- return elementType;
- elementType = FixIntUnknown(elementType);
- return CreateRefType(elementType, refType->mRefKind);
- }
- if (unspecializedType->IsPointer())
- {
- auto ptrType = (BfPointerType*)unspecializedType;
- auto elementType = ResolveGenericType(ptrType->GetUnderlyingType(), typeGenericArguments, methodGenericArguments, allowFail);
- if (elementType == NULL)
- return NULL;
- if (elementType->IsVar())
- return elementType;
- elementType = FixIntUnknown(elementType);
- return CreatePointerType(elementType);
- }
- if (unspecializedType->IsConcreteInterfaceType())
- {
- auto concreteType = (BfConcreteInterfaceType*)unspecializedType;
- auto elementType = ResolveGenericType(concreteType->GetUnderlyingType(), typeGenericArguments, methodGenericArguments, allowFail);
- if (elementType == NULL)
- return NULL;
- auto elementTypeInstance = elementType->ToTypeInstance();
- if (elementTypeInstance == NULL)
- return unspecializedType;
- return CreateConcreteInterfaceType(elementTypeInstance);
- }
- if (unspecializedType->IsArray())
- {
- auto arrayType = (BfArrayType*)unspecializedType;
- auto elementType = ResolveGenericType(arrayType->GetUnderlyingType(), typeGenericArguments, methodGenericArguments, allowFail);
- if (elementType == NULL)
- return NULL;
- if (elementType->IsVar())
- return elementType;
- elementType = FixIntUnknown(elementType);
- return CreateArrayType(elementType, arrayType->mDimensions);
- }
- if (unspecializedType->IsTuple())
- {
- bool wantGeneric = false;
- bool isUnspecialized = false;
- auto unspecializedTupleType = (BfTypeInstance*)unspecializedType;
- auto unspecializedGenericTupleType = unspecializedTupleType->ToGenericTypeInstance();
- Array<String> fieldNames;
- BfTypeVector fieldTypes;
- bool hadChange = false;
- for (auto& fieldInstance : unspecializedTupleType->mFieldInstances)
- {
- fieldNames.push_back(fieldInstance.GetFieldDef()->mName);
- auto origGenericArg = fieldInstance.mResolvedType;
- auto newGenericArg = ResolveGenericType(origGenericArg, typeGenericArguments, methodGenericArguments, allowFail);
- if (newGenericArg == NULL)
- return NULL;
- if (newGenericArg->IsVar())
- return newGenericArg;
- if (newGenericArg->IsTypeGenericParam())
- wantGeneric = true;
- if (newGenericArg->IsUnspecializedType())
- isUnspecialized = true;
- if (newGenericArg->IsVar())
- wantGeneric = mContext->mBfObjectType;
- //wantGeneric = true;
- if (newGenericArg != origGenericArg)
- hadChange = true;
- fieldTypes.push_back(newGenericArg);
- }
- if (!hadChange)
- return unspecializedType;
-
- if (unspecializedGenericTupleType == NULL)
- wantGeneric = false;
- //TODO:
- wantGeneric = false;
- auto baseType = (BfTypeInstance*)ResolveTypeDef(mContext->mCompiler->mValueTypeTypeDef);
- BfTupleType* tupleType = NULL;
- if (wantGeneric)
- {
- Array<BfType*> genericArgs;
- for (int genericArgIdx = 0; genericArgIdx < (int)unspecializedGenericTupleType->mGenericTypeInfo->mTypeGenericArguments.size(); genericArgIdx++)
- {
- BfType* resolvedArg = unspecializedGenericTupleType->mGenericTypeInfo->mTypeGenericArguments[genericArgIdx];
- if (resolvedArg->IsUnspecializedType())
- {
- resolvedArg = ResolveGenericType(resolvedArg, typeGenericArguments, methodGenericArguments, allowFail);
- if (resolvedArg == NULL)
- return NULL;
- if (resolvedArg->IsVar())
- return resolvedArg;
- }
- genericArgs.push_back(resolvedArg);
- }
- auto actualTupleType = mContext->mTupleTypePool.Get();
- delete actualTupleType->mGenericTypeInfo;
- actualTupleType->mGenericDepth = 0;
- actualTupleType->mGenericTypeInfo = new BfGenericTypeInfo();
- actualTupleType->mGenericTypeInfo->mIsUnspecialized = false;
- actualTupleType->mGenericTypeInfo->mIsUnspecializedVariation = false;
- actualTupleType->mGenericTypeInfo->mTypeGenericArguments = genericArgs;
- for (int genericArgIdx = 0; genericArgIdx < (int)unspecializedGenericTupleType->mGenericTypeInfo->mTypeGenericArguments.size(); genericArgIdx++)
- {
- auto typeGenericArg = genericArgs[genericArgIdx];
- if ((typeGenericArg->IsGenericParam()) || (typeGenericArg->IsUnspecializedType()))
- actualTupleType->mGenericTypeInfo->mIsUnspecialized = true;
- actualTupleType->mGenericTypeInfo->mGenericParams.push_back(unspecializedGenericTupleType->mGenericTypeInfo->mGenericParams[genericArgIdx]->AddRef());
- }
- CheckUnspecializedGenericType(actualTupleType, BfPopulateType_Identity);
- if (isUnspecialized)
- {
- actualTupleType->mGenericTypeInfo->mIsUnspecialized = true;
- actualTupleType->mGenericTypeInfo->mIsUnspecializedVariation = true;
- }
- actualTupleType->mIsUnspecializedType = actualTupleType->mGenericTypeInfo->mIsUnspecialized;
- actualTupleType->mIsUnspecializedTypeVariation = actualTupleType->mGenericTypeInfo->mIsUnspecializedVariation;
- actualTupleType->Init(baseType->mTypeDef->mProject, baseType);
- for (int fieldIdx = 0; fieldIdx < (int)fieldTypes.size(); fieldIdx++)
- {
- String fieldName = fieldNames[fieldIdx];
- BfFieldDef* fieldDef = actualTupleType->AddField(fieldName);
- }
- tupleType = actualTupleType;
- }
- else
- {
- auto actualTupleType = new BfTupleType();
- actualTupleType->mIsUnspecializedType = isUnspecialized;
- actualTupleType->mIsUnspecializedTypeVariation = isUnspecialized;
- actualTupleType->Init(baseType->mTypeDef->mProject, baseType);
- for (int fieldIdx = 0; fieldIdx < (int)fieldTypes.size(); fieldIdx++)
- {
- String fieldName = fieldNames[fieldIdx];
- BfFieldDef* fieldDef = actualTupleType->AddField(fieldName);
- }
- tupleType = actualTupleType;
- }
- tupleType->mContext = mContext;
- tupleType->mFieldInstances.Resize(fieldTypes.size());
- for (int fieldIdx = 0; fieldIdx < (int)fieldTypes.size(); fieldIdx++)
- {
- BfFieldInstance* fieldInstance = (BfFieldInstance*)&tupleType->mFieldInstances[fieldIdx];
- fieldInstance->mFieldIdx = fieldIdx;
- fieldInstance->SetResolvedType(fieldTypes[fieldIdx]);
- fieldInstance->mOwner = tupleType;
- tupleType->mGenericDepth = BF_MAX(tupleType->mGenericDepth, fieldInstance->mResolvedType->GetGenericDepth() + 1);
- }
- bool failed = false;
- BfType* resolvedType = NULL;
- if (!failed)
- resolvedType = ResolveType(tupleType, BfPopulateType_Identity);
-
- if (resolvedType != tupleType)
- {
- delete tupleType->mGenericTypeInfo;
- tupleType->mGenericTypeInfo = NULL;
- tupleType->Dispose();
- mContext->mTupleTypePool.GiveBack((BfTupleType*)tupleType);
- }
- BF_ASSERT((resolvedType == NULL) || resolvedType->IsTypeInstance() || resolvedType->IsPrimitiveType());
- return resolvedType;
- }
- if ((unspecializedType->IsDelegateFromTypeRef()) || (unspecializedType->IsFunctionFromTypeRef()))
- {
- BfTypeInstance* unspecializedDelegateType = (BfTypeInstance*)unspecializedType;
- BfTypeInstance* unspecializedGenericDelegateType = unspecializedType->ToGenericTypeInstance();
- BfDelegateInfo* unspecializedDelegateInfo = unspecializedType->GetDelegateInfo();
-
- bool wantGeneric = false;
- bool isUnspecialized = false;
- auto _CheckType = [&](BfType* type)
- {
- if (type->IsTypeGenericParam())
- wantGeneric = true;
- if (type->IsUnspecializedType())
- isUnspecialized = true;
- };
- bool failed = false;
- bool hasTypeGenerics = false;
- auto returnType = ResolveGenericType(unspecializedDelegateInfo->mReturnType, typeGenericArguments, methodGenericArguments, allowFail);
-
- if (returnType == NULL)
- return NULL;
- if (returnType->IsVar())
- return returnType;
- _CheckType(returnType);
- if (returnType->IsGenericParam())
- hasTypeGenerics |= ((BfGenericParamType*)returnType)->mGenericParamKind == BfGenericParamKind_Type;
- Array<BfType*> paramTypes;
- for (auto param : unspecializedDelegateInfo->mParams)
- {
- auto paramType = ResolveGenericType(param, typeGenericArguments, methodGenericArguments, allowFail);
- if (paramType == NULL)
- return NULL;
- if (paramType->IsVar())
- return paramType;
- paramTypes.Add(paramType);
- _CheckType(paramType);
- }
- if (unspecializedGenericDelegateType == NULL)
- wantGeneric = false;
- //TODO:
- wantGeneric = false;
- BfTypeInstance* delegateType = NULL;
- auto baseDelegateType = ResolveTypeDef(mCompiler->mDelegateTypeDef)->ToTypeInstance();
-
- if (wantGeneric)
- {
- Array<BfType*> genericArgs;
- for (int genericArgIdx = 0; genericArgIdx < (int)unspecializedGenericDelegateType->mGenericTypeInfo->mTypeGenericArguments.size(); genericArgIdx++)
- {
- BfType* resolvedArg = unspecializedGenericDelegateType->mGenericTypeInfo->mTypeGenericArguments[genericArgIdx];
- if (resolvedArg->IsUnspecializedType())
- {
- resolvedArg = ResolveGenericType(resolvedArg, typeGenericArguments, methodGenericArguments, allowFail);
- if (resolvedArg == NULL)
- return NULL;
- if (resolvedArg->IsVar())
- return resolvedArg;
- }
- genericArgs.push_back(resolvedArg);
- }
- auto dlgType = mContext->mDelegateTypePool.Get();
- delete dlgType->mGenericTypeInfo;
- dlgType->mGenericTypeInfo = new BfGenericTypeInfo();
- dlgType->mGenericTypeInfo->mFinishedGenericParams = true;
- dlgType->mGenericTypeInfo->mIsUnspecialized = false;
- dlgType->mGenericTypeInfo->mIsUnspecializedVariation = false;
- dlgType->mGenericTypeInfo->mTypeGenericArguments = genericArgs;
- for (int genericArgIdx = 0; genericArgIdx < (int)unspecializedGenericDelegateType->mGenericTypeInfo->mTypeGenericArguments.size(); genericArgIdx++)
- {
- auto typeGenericArg = genericArgs[genericArgIdx];
- if ((typeGenericArg->IsGenericParam()) || (typeGenericArg->IsUnspecializedType()))
- dlgType->mGenericTypeInfo->mIsUnspecialized = true;
- dlgType->mGenericTypeInfo->mGenericParams.push_back(unspecializedGenericDelegateType->mGenericTypeInfo->mGenericParams[genericArgIdx]->AddRef());
- }
- CheckUnspecializedGenericType(dlgType, BfPopulateType_Identity);
- if (isUnspecialized)
- {
- dlgType->mGenericTypeInfo->mIsUnspecialized = true;
- dlgType->mGenericTypeInfo->mIsUnspecializedVariation = true;
- }
- dlgType->mIsUnspecializedType = dlgType->mGenericTypeInfo->mIsUnspecialized;
- dlgType->mIsUnspecializedTypeVariation = dlgType->mGenericTypeInfo->mIsUnspecializedVariation;
- delegateType = dlgType;
- }
- else
- {
- auto dlgType = mContext->mDelegateTypePool.Get();
- dlgType->mIsUnspecializedType = isUnspecialized;
- dlgType->mIsUnspecializedTypeVariation = isUnspecialized;
- delegateType = dlgType;
- }
- delete delegateType->mTypeDef;
- delegateType->mTypeDef = NULL;
- BfDelegateInfo* delegateInfo = delegateType->GetDelegateInfo();
- delegateInfo->mParams.Clear();
-
- BfTypeDef* typeDef = new BfTypeDef();
- typeDef->mProject = baseDelegateType->mTypeDef->mProject;
- typeDef->mSystem = mCompiler->mSystem;
- typeDef->mName = mSystem->mEmptyAtom;
- typeDef->mTypeCode = unspecializedDelegateType->mTypeDef->mTypeCode;
- typeDef->mIsDelegate = unspecializedDelegateType->mTypeDef->mIsDelegate;
- typeDef->mIsFunction = unspecializedDelegateType->mTypeDef->mIsFunction;
-
- BfMethodDef* unspecializedInvokeMethodDef = unspecializedDelegateType->mTypeDef->GetMethodByName("Invoke");
- BfMethodDef* methodDef = new BfMethodDef();
- methodDef->mDeclaringType = typeDef;
- methodDef->mName = "Invoke";
- methodDef->mProtection = BfProtection_Public;
- methodDef->mIdx = 0;
- methodDef->mIsStatic = !typeDef->mIsDelegate && !unspecializedDelegateInfo->mHasExplicitThis;
- methodDef->mHasExplicitThis = unspecializedDelegateInfo->mHasExplicitThis;
-
- auto directTypeRef = BfAstNode::ZeroedAlloc<BfDirectTypeReference>();
- delegateInfo->mDirectAllocNodes.push_back(directTypeRef);
- if (typeDef->mIsDelegate)
- directTypeRef->Init(delegateType);
- else
- directTypeRef->Init(ResolveTypeDef(mCompiler->mFunctionTypeDef));
- typeDef->mBaseTypes.push_back(directTypeRef);
- directTypeRef = BfAstNode::ZeroedAlloc<BfDirectTypeReference>();
- delegateInfo->mDirectAllocNodes.push_back(directTypeRef);
- directTypeRef->Init(returnType);
- methodDef->mReturnTypeRef = directTypeRef;
- delegateInfo->mReturnType = returnType;
- delegateInfo->mHasExplicitThis = unspecializedDelegateInfo->mHasExplicitThis;
- delegateInfo->mHasVarArgs = unspecializedDelegateInfo->mHasVarArgs;
- int paramIdx = 0;
- for (int paramIdx = 0; paramIdx < (int)paramTypes.size(); paramIdx++)
- {
- auto paramType = paramTypes[paramIdx];
-
- BfParameterDef* unspecializedParamDef = unspecializedInvokeMethodDef->mParams[paramIdx];
-
- if (!paramType->IsReified())
- delegateType->mIsReified = false;
-
- auto directTypeRef = BfAstNode::ZeroedAlloc<BfDirectTypeReference>();
- delegateInfo->mDirectAllocNodes.push_back(directTypeRef);
- directTypeRef->Init(paramType);
- BfParameterDef* paramDef = new BfParameterDef();
- paramDef->mTypeRef = directTypeRef;
- paramDef->mName = unspecializedParamDef->mName;
- methodDef->mParams.push_back(paramDef);
- delegateInfo->mParams.Add(paramType);
- }
- typeDef->mMethods.push_back(methodDef);
- if (unspecializedInvokeMethodDef->mIsMutating)
- {
- if ((delegateInfo->mParams[0]->IsValueType()) || (delegateInfo->mParams[0]->IsGenericParam()))
- methodDef->mIsMutating = unspecializedInvokeMethodDef->mIsMutating;
- }
- //
-
- if (typeDef->mIsDelegate)
- {
- BfDefBuilder::AddMethod(typeDef, BfMethodType_Ctor, BfProtection_Public, false, "");
- BfDefBuilder::AddDynamicCastMethods(typeDef);
- }
- delegateType->mContext = mContext;
- delegateType->mTypeDef = typeDef;
-
- BfType* resolvedType = NULL;
- if (!failed)
- resolvedType = ResolveType(delegateType, BfPopulateType_Identity);
- if (resolvedType == delegateType)
- {
- AddDependency(directTypeRef->mType, delegateType, BfDependencyMap::DependencyFlag_ParamOrReturnValue);
- for (auto paramType : paramTypes)
- AddDependency(paramType, delegateType, BfDependencyMap::DependencyFlag_ParamOrReturnValue);
- }
- else
- {
- delegateType->Dispose();
- mContext->mDelegateTypePool.GiveBack((BfDelegateType*)delegateType);
- }
- BF_ASSERT((resolvedType == NULL) || resolvedType->IsTypeInstance() || resolvedType->IsPrimitiveType());
- return resolvedType;
- }
- if (unspecializedType->IsGenericTypeInstance())
- {
- auto genericTypeInst = (BfTypeInstance*)unspecializedType;
- BfTypeVector genericArgs;
- for (auto genericArg : genericTypeInst->mGenericTypeInfo->mTypeGenericArguments)
- {
- if (genericArg->IsUnspecializedType())
- {
- auto resolvedArg = ResolveGenericType(genericArg, typeGenericArguments, methodGenericArguments, allowFail);
- if (resolvedArg == NULL)
- return NULL;
- if (resolvedArg->IsVar())
- return resolvedArg;
- genericArgs.push_back(resolvedArg);
- }
- else
- genericArgs.push_back(genericArg);
- }
- auto resolvedType = ResolveTypeDef(genericTypeInst->mTypeDef->GetDefinition(), genericArgs, BfPopulateType_BaseType);
- BfTypeInstance* specializedType = NULL;
- if (resolvedType != NULL)
- specializedType = resolvedType->ToGenericTypeInstance();
- if (specializedType != NULL)
- {
- if (specializedType->mGenericTypeInfo->mHadValidateErrors)
- return NULL;
- }
- return specializedType;
- }
- return unspecializedType;
- }
- BfType* BfModule::ResolveSelfType(BfType* type, BfTypeInstance* selfType)
- {
- if (!type->IsUnspecializedTypeVariation())
- return type;
- SetAndRestoreValue<BfTypeInstance*> prevCurTypeInst(mCurTypeInstance, selfType);
- return ResolveGenericType(type, NULL, NULL);
- }
- BfType* BfModule::ResolveType(BfType* lookupType, BfPopulateType populateType, BfResolveTypeRefFlags resolveFlags)
- {
- BfResolvedTypeSet::LookupContext lookupCtx;
- lookupCtx.mModule = this;
- lookupCtx.mResolveFlags = resolveFlags;
- BfResolvedTypeSet::Entry* resolvedEntry = NULL;
- bool inserted = mContext->mResolvedTypes.Insert(lookupType, &lookupCtx, &resolvedEntry);
- if (resolvedEntry == NULL)
- return NULL;
- if (!inserted)
- {
- auto resolvedTypeRef = resolvedEntry->mValue;
- PopulateType(resolvedTypeRef, populateType);
- return resolvedTypeRef;
- }
-
- if (lookupType->IsGenericTypeInstance())
- CheckUnspecializedGenericType((BfTypeInstance*)lookupType, populateType);
- if (lookupType->IsTuple())
- {
- auto tupleType = (BfTupleType*)lookupType;
- tupleType->Finish();
- }
- resolvedEntry->mValue = lookupType;
- InitType(lookupType, populateType);
- return lookupType;
- }
- bool BfModule::IsUnboundGeneric(BfType* type)
- {
- if (type->IsVar())
- return true;
- if (!type->IsGenericParam())
- return false;
- auto genericParamInst = GetGenericParamInstance((BfGenericParamType*)type);
- return (genericParamInst->mGenericParamFlags & BfGenericParamFlag_Var) != 0;
- }
- BfGenericParamInstance* BfModule::GetGenericTypeParamInstance(int genericParamIdx)
- {
- // When we're evaluating a method, make sure the params refer back to that method context
- auto curTypeInstance = mCurTypeInstance;
- //TODO: This caused MethodToString issues with interface "implementation method not found" errors
- // if (mCurMethodInstance != NULL)
- // curTypeInstance = mCurMethodInstance->mMethodInstanceGroup->mOwner;
- BfTypeInstance* genericTypeInst = curTypeInstance->ToGenericTypeInstance();
- if ((genericTypeInst->IsIncomplete()) && (genericTypeInst->mGenericTypeInfo->mGenericParams.size() == 0))
- {
- // Set this to NULL so we don't recurse infinitely
- SetAndRestoreValue<BfTypeInstance*> prevTypeInst(mCurTypeInstance, NULL);
- PopulateType(genericTypeInst, BfPopulateType_Declaration);
- }
- if (genericParamIdx >= (int)genericTypeInst->mGenericTypeInfo->mTypeGenericArguments.size())
- {
- if (genericParamIdx >= genericTypeInst->mGenericTypeInfo->mGenericParams.mSize)
- FatalError("Invalid GetGenericTypeParamInstance");
- // Extern constraints should always be directly used - they don't get extended
- return genericTypeInst->mGenericTypeInfo->mGenericParams[genericParamIdx];
- }
- if (genericTypeInst->mGenericTypeInfo->mGenericExtensionInfo != NULL)
- {
- auto activeTypeDef = GetActiveTypeDef(NULL, true);
- if ((activeTypeDef->mTypeDeclaration != genericTypeInst->mTypeDef->mTypeDeclaration) && (activeTypeDef->IsExtension()))
- {
- BfTypeDef* lookupTypeDef = activeTypeDef;
- while (lookupTypeDef->mNestDepth > genericTypeInst->mTypeDef->mNestDepth)
- lookupTypeDef = lookupTypeDef->mOuterType;
- BfGenericExtensionEntry* genericExEntry;
- if (genericTypeInst->mGenericTypeInfo->mGenericExtensionInfo->mExtensionMap.TryGetValue(lookupTypeDef, &genericExEntry))
- {
- return genericExEntry->mGenericParams[genericParamIdx];
- }
- else
- {
- if ((mCompiler->mResolvePassData == NULL) || (mCompiler->mResolvePassData->mAutoComplete == NULL))
- {
- FatalError("Invalid GetGenericParamInstance with extension");
- }
- }
- }
- }
- BF_ASSERT(genericTypeInst != NULL);
- return genericTypeInst->mGenericTypeInfo->mGenericParams[genericParamIdx];
- }
- void BfModule::GetActiveTypeGenericParamInstances(SizedArray<BfGenericParamInstance*, 4>& genericParamInstances)
- {
- // When we're evaluating a method, make sure the params refer back to that method context
- auto curTypeInstance = mCurTypeInstance;
- if (mCurMethodInstance != NULL)
- curTypeInstance = mCurMethodInstance->mMethodInstanceGroup->mOwner;
- BfTypeInstance* genericTypeInst = curTypeInstance->ToGenericTypeInstance();
- if ((genericTypeInst->IsIncomplete()) && (genericTypeInst->mGenericTypeInfo->mGenericParams.size() == 0))
- {
- // Set this to NULL so we don't recurse infinitely
- SetAndRestoreValue<BfTypeInstance*> prevTypeInst(mCurTypeInstance, NULL);
- PopulateType(genericTypeInst, BfPopulateType_Declaration);
- }
-
- if (genericTypeInst->mGenericTypeInfo->mGenericExtensionInfo != NULL)
- {
- auto activeTypeDef = GetActiveTypeDef(NULL, true);
- if ((activeTypeDef->mTypeDeclaration != genericTypeInst->mTypeDef->mTypeDeclaration) && (activeTypeDef->IsExtension()))
- {
- BfTypeDef* lookupTypeDef = activeTypeDef;
- while (lookupTypeDef->mNestDepth > genericTypeInst->mTypeDef->mNestDepth)
- lookupTypeDef = lookupTypeDef->mOuterType;
- BfGenericExtensionEntry* genericExEntry;
- if (genericTypeInst->mGenericTypeInfo->mGenericExtensionInfo->mExtensionMap.TryGetValue(lookupTypeDef, &genericExEntry))
- {
- for (auto entry : genericExEntry->mGenericParams)
- genericParamInstances.Add(entry);
- auto genericTypeInfo = genericTypeInst->mGenericTypeInfo;
- // Add root extern constraints - they don't get extended
- for (int genericParamIdx = (int)genericTypeInst->mGenericTypeInfo->mTypeGenericArguments.size(); genericParamIdx < genericTypeInst->mGenericTypeInfo->mGenericParams.size(); genericParamIdx++)
- genericParamInstances.Add(genericTypeInst->mGenericTypeInfo->mGenericParams[genericParamIdx]);
- return;
- }
- else
- {
- if ((mCompiler->mResolvePassData == NULL) || (mCompiler->mResolvePassData->mAutoComplete == NULL))
- {
- BFMODULE_FATAL(this, "Invalid GetGenericParamInstance with extension");
- }
- }
- }
- }
- BF_ASSERT(genericTypeInst != NULL);
- for (auto entry : genericTypeInst->mGenericTypeInfo->mGenericParams)
- genericParamInstances.Add(entry);
- }
- BfGenericParamInstance* BfModule::GetMergedGenericParamData(BfGenericParamType* type, BfGenericParamFlags& outFlags, BfType*& outTypeConstraint)
- {
- BfGenericParamInstance* genericParam = GetGenericParamInstance(type);
- outFlags = genericParam->mGenericParamFlags;
- outTypeConstraint = genericParam->mTypeConstraint;
- // Check method generic constraints
- if ((mCurMethodInstance != NULL) && (mCurMethodInstance->mIsUnspecialized) && (mCurMethodInstance->mMethodInfoEx != NULL))
- {
- for (int genericParamIdx = (int)mCurMethodInstance->mMethodInfoEx->mMethodGenericArguments.size();
- genericParamIdx < mCurMethodInstance->mMethodInfoEx->mGenericParams.size(); genericParamIdx++)
- {
- auto genericParam = mCurMethodInstance->mMethodInfoEx->mGenericParams[genericParamIdx];
- if (genericParam->mExternType == type)
- {
- outFlags = (BfGenericParamFlags)(outFlags | genericParam->mGenericParamFlags);
- if (genericParam->mTypeConstraint != NULL)
- outTypeConstraint = genericParam->mTypeConstraint;
- }
- }
- }
- return genericParam;
- }
- BfGenericParamInstance* BfModule::GetGenericParamInstance(BfGenericParamType* type)
- {
- if (type->mGenericParamKind == BfGenericParamKind_Method)
- {
- if ((mCurMethodInstance->mMethodInfoEx == NULL) || (type->mGenericParamIdx >= mCurMethodInstance->mMethodInfoEx->mGenericParams.mSize))
- {
- FatalError("Invalid GetGenericParamInstance method generic param");
- return NULL;
- }
- return mCurMethodInstance->mMethodInfoEx->mGenericParams[type->mGenericParamIdx];
- }
- return GetGenericTypeParamInstance(type->mGenericParamIdx);
- }
- bool BfModule::ResolveTypeResult_Validate(BfAstNode* typeRef, BfType* resolvedTypeRef)
- {
- if ((typeRef == NULL) || (resolvedTypeRef == NULL))
- return true;
- BfTypeInstance* genericTypeInstance = resolvedTypeRef->ToGenericTypeInstance();
-
- if ((genericTypeInstance != NULL) && (genericTypeInstance != mCurTypeInstance))
- {
- bool doValidate = (genericTypeInstance->mGenericTypeInfo->mHadValidateErrors) ||
- (!genericTypeInstance->mGenericTypeInfo->mValidatedGenericConstraints) ||
- (genericTypeInstance->mGenericTypeInfo->mIsUnspecializedVariation);
- if ((mCurMethodInstance != NULL) && (mCurMethodInstance->IsOrInUnspecializedVariation()))
- doValidate = false;
- if (mCurTypeInstance != NULL)
- {
- if (mCurTypeInstance->IsUnspecializedTypeVariation())
- doValidate = false;
- if (auto curGenericTypeInstance = mCurTypeInstance->ToGenericTypeInstance())
- {
- if ((curGenericTypeInstance->mDependencyMap.mMinDependDepth > 32) &&
- (genericTypeInstance->mDependencyMap.mMinDependDepth > 32))
- {
- Fail(StrFormat("Generic type dependency depth exceeded for type '%s'", TypeToString(genericTypeInstance).c_str()), typeRef);
- return false;
- }
- if (curGenericTypeInstance->mGenericTypeInfo->mHadValidateErrors)
- doValidate = false;
- }
- if ((mContext->mCurTypeState != NULL) && (mContext->mCurTypeState->mCurBaseTypeRef != NULL) && (!mContext->mCurTypeState->mType->IsTypeAlias())) // We validate constraints for base types later
- doValidate = false;
- }
- if (doValidate)
- ValidateGenericConstraints(typeRef, genericTypeInstance, false);
- }
- if (auto genericInstanceTypeRef = BfNodeDynCastExact<BfGenericInstanceTypeRef>(typeRef))
- {
- if (genericTypeInstance != NULL)
- {
- auto genericTypeInfo = genericTypeInstance->GetGenericTypeInfo();
- for (int argIdx = 0; argIdx < (int)genericInstanceTypeRef->mGenericArguments.size(); argIdx++)
- {
- ResolveTypeResult_Validate(genericInstanceTypeRef->mGenericArguments[argIdx], genericTypeInfo->mTypeGenericArguments[argIdx]);
- }
- }
- }
- else if (auto elementedTypeRef = BfNodeDynCast<BfElementedTypeRef>(typeRef))
- {
- return ResolveTypeResult_Validate(elementedTypeRef, resolvedTypeRef->GetUnderlyingType());
- }
- return true;
- }
- BfType* BfModule::ResolveTypeResult(BfTypeReference* typeRef, BfType* resolvedTypeRef, BfPopulateType populateType, BfResolveTypeRefFlags resolveFlags)
- {
- if ((mCompiler->mIsResolveOnly) && (!IsInSpecializedSection()))
- {
- bool isGetDefinition = false;
- BfAutoComplete* autoComplete = NULL;
- if (mCompiler->IsAutocomplete())
- {
- autoComplete = mCompiler->mResolvePassData->mAutoComplete;
- isGetDefinition = autoComplete->mIsGetDefinition || (autoComplete->mResolveType == BfResolveType_GetResultString);
- }
- BfSourceData* typeRefSource = NULL;
- if (typeRef->IsTemporary())
- {
- BfTypeReference* checkTypeRef = typeRef;
- if (auto genericTypeRef = BfNodeDynCast<BfGenericInstanceTypeRef>(checkTypeRef))
- checkTypeRef = genericTypeRef->mElementType;
- if (auto namedTypeRef = BfNodeDynCast<BfNamedTypeReference>(checkTypeRef))
- typeRefSource = namedTypeRef->mNameNode->GetSourceData();
- }
- else
- typeRefSource = typeRef->GetSourceData();
- bool wantsFileNamespaceInfo = (((mCompiler->mResolvePassData->mSourceClassifier != NULL) || (isGetDefinition) || (mCompiler->mResolvePassData->mGetSymbolReferenceKind == BfGetSymbolReferenceKind_Namespace)) &&
- (typeRefSource != NULL) && (mCompiler->mResolvePassData->mParser != NULL) &&
- (typeRefSource == mCompiler->mResolvePassData->mParser->mSourceData));
- bool wantsAllNamespaceInfo = (mCompiler->mResolvePassData->mGetSymbolReferenceKind == BfGetSymbolReferenceKind_Namespace) && (mCompiler->mResolvePassData->mParser == NULL);
- if (wantsFileNamespaceInfo || wantsAllNamespaceInfo)
- {
- //TODO: By only breaking out for "mIgnoreErrors", we classified elements (below) even when a resolvedTypeRef was not found!
- //Why did we have this mIgnoreErrors check in there?
- // if ((resolvedTypeRef == NULL) && (mIgnoreErrors))
- if (resolvedTypeRef == NULL)
- {
- return NULL;
- }
- BfTypeInstance* resolvedTypeInstance = NULL;
- if (resolvedTypeRef != NULL)
- resolvedTypeInstance = resolvedTypeRef->ToTypeInstance();
- bool isNamespace = false;
- auto checkTypeRef = typeRef;
- if (auto genericTypeRef = BfNodeDynCast<BfGenericInstanceTypeRef>(checkTypeRef))
- checkTypeRef = genericTypeRef->mElementType;
- auto headTypeRef = checkTypeRef;
- if (auto elementedTypeRef = BfNodeDynCast<BfElementedTypeRef>(checkTypeRef))
- checkTypeRef = elementedTypeRef->mElementType;
- if (!mIsInsideAutoComplete)
- {
- if ((resolvedTypeInstance != NULL) && (resolvedTypeInstance->mTypeDef->IsGlobalsContainer()))
- {
- isNamespace = true;
- }
- else
- {
- //TODO: This broke colorizing of inner expressions for things like "T2[T3]"
- //mCompiler->mResolvePassData->mSourceClassifier->VisitChildNoRef(typeRef);
- }
- }
-
- BfSourceElementType elemType = BfSourceElementType_Type;
- {
- auto typeRef = resolvedTypeRef;
- while (typeRef->IsTypeAlias())
- {
- typeRef = typeRef->GetUnderlyingType();
- if (typeRef == NULL)
- {
- typeRef = resolvedTypeRef;
- break;
- }
- }
- if (typeRef->IsInterface())
- elemType = BfSourceElementType_Interface;
- else if (typeRef->IsObject())
- elemType = BfSourceElementType_RefType;
- else if (typeRef->IsGenericParam())
- elemType = BfSourceElementType_GenericParam;
- else if (typeRef->IsPrimitiveType())
- elemType = BfSourceElementType_PrimitiveType;
- else if (typeRef->IsStruct() || (typeRef->IsTypedPrimitive() && !typeRef->IsEnum()))
- elemType = BfSourceElementType_Struct;
- }
- while (auto qualifiedTypeRef = BfNodeDynCast<BfQualifiedTypeReference>(checkTypeRef))
- {
- if ((mCompiler->mResolvePassData->mSourceClassifier != NULL) && (checkTypeRef == headTypeRef) && (elemType != BfSourceElementType_Type))
- mCompiler->mResolvePassData->mSourceClassifier->SetElementType(qualifiedTypeRef->mRight, elemType);
- StringView leftString = qualifiedTypeRef->mLeft->ToStringView();
- BfSizedAtomComposite leftComposite;
- bool isValid = mSystem->ParseAtomComposite(leftString, leftComposite);
- if (mCompiler->mResolvePassData->mSourceClassifier != NULL)
- mCompiler->mResolvePassData->mSourceClassifier->SetHighestElementType(qualifiedTypeRef->mRight, isNamespace ? BfSourceElementType_Namespace : BfSourceElementType_Type);
- if (resolvedTypeInstance == NULL)
- {
- if ((isValid) && (mCompiler->mSystem->ContainsNamespace(leftComposite, mCurTypeInstance->mTypeDef->mProject)))
- isNamespace = true;
- }
- else if ((isValid) && (resolvedTypeInstance->mTypeDef->mNamespace.EndsWith(leftComposite)) && (resolvedTypeInstance->mTypeDef->mOuterType == NULL))
- {
- if (autoComplete != NULL)
- {
- if (autoComplete->CheckFixit(typeRef))
- autoComplete->FixitCheckNamespace(GetActiveTypeDef(), qualifiedTypeRef->mLeft, qualifiedTypeRef->mDot);
- autoComplete->CheckNamespace(qualifiedTypeRef->mLeft, resolvedTypeInstance->mTypeDef->mNamespace);
- }
- mCompiler->mResolvePassData->HandleNamespaceReference(qualifiedTypeRef->mLeft, resolvedTypeInstance->mTypeDef->mNamespace);
-
- isNamespace = true;
- }
- checkTypeRef = qualifiedTypeRef->mLeft;
- }
- if (auto namedTypeRef = BfNodeDynCast<BfNamedTypeReference>(checkTypeRef))
- {
- auto checkNameNode = namedTypeRef->mNameNode;
- bool setType = false;
- if ((mCompiler->mResolvePassData->mSourceClassifier != NULL) && (checkTypeRef == headTypeRef) && (elemType != BfSourceElementType_Type))
- {
- if (auto qualifiedNameNode = BfNodeDynCast<BfQualifiedNameNode>(checkNameNode))
- {
- mCompiler->mResolvePassData->mSourceClassifier->SetElementType(qualifiedNameNode->mRight, elemType);
- }
- else
- {
- setType = true;
- mCompiler->mResolvePassData->mSourceClassifier->SetElementType(checkNameNode, elemType);
- }
- }
- while (auto qualifiedNameNode = BfNodeDynCast<BfQualifiedNameNode>(checkNameNode))
- {
- StringView leftString = qualifiedNameNode->mLeft->ToStringView();
- BfSizedAtomComposite leftComposite;
- bool isValid = mSystem->ParseAtomComposite(leftString, leftComposite);
- if (mCompiler->mResolvePassData->mSourceClassifier != NULL)
- mCompiler->mResolvePassData->mSourceClassifier->SetHighestElementType(qualifiedNameNode->mRight, isNamespace ? BfSourceElementType_Namespace : BfSourceElementType_Type);
- if (resolvedTypeInstance == NULL)
- {
- if ((isValid) && (mCompiler->mSystem->ContainsNamespace(leftComposite, mCurTypeInstance->mTypeDef->mProject)))
- isNamespace = true;
- }
- else if ((isValid) && (resolvedTypeInstance->mTypeDef->mOuterType == NULL) && (resolvedTypeInstance->mTypeDef->mNamespace.EndsWith(leftComposite)))
- {
- if (autoComplete != NULL)
- {
- if (autoComplete->CheckFixit(typeRef))
- autoComplete->FixitCheckNamespace(GetActiveTypeDef(), qualifiedNameNode->mLeft, qualifiedNameNode->mDot);
- autoComplete->CheckNamespace(qualifiedNameNode->mLeft, resolvedTypeInstance->mTypeDef->mNamespace);
- }
- mCompiler->mResolvePassData->HandleNamespaceReference(qualifiedNameNode->mLeft, resolvedTypeInstance->mTypeDef->mNamespace);
- isNamespace = true;
- }
- checkNameNode = qualifiedNameNode->mLeft;
- }
- if ((mCompiler->mResolvePassData->mSourceClassifier != NULL) &&
- ((!setType) || (checkNameNode != namedTypeRef->mNameNode)))
- mCompiler->mResolvePassData->mSourceClassifier->SetHighestElementType(checkNameNode, isNamespace ? BfSourceElementType_Namespace : BfSourceElementType_Type);
- }
- }
- if (((mCompiler->mResolvePassData->mGetSymbolReferenceKind == BfGetSymbolReferenceKind_Type) || (isGetDefinition)) &&
- ((resolveFlags & BfResolveTypeRefFlag_FromIndirectSource) == 0) && (resolvedTypeRef != NULL) && (typeRefSource != NULL))
- {
- BfAstNode* elementTypeRef = typeRef;
- if (auto namedTypeRef = BfNodeDynCast<BfNamedTypeReference>(elementTypeRef))
- elementTypeRef = namedTypeRef->mNameNode;
- if (elementTypeRef != NULL)
- {
- BfType* elementType = resolvedTypeRef;
- if (BfTypeInstance* elementTypeInst = elementType->ToTypeInstance())
- {
- mCompiler->mResolvePassData->HandleTypeReference(elementTypeRef, elementTypeInst->mTypeDef);
- if (mCompiler->IsAutocomplete())
- {
- BfAutoComplete* autoComplete = mCompiler->mResolvePassData->mAutoComplete;
- if ((isGetDefinition) && (autoComplete->IsAutocompleteNode(elementTypeRef)))
- {
- BfAstNode* baseNode = elementTypeRef;
- while (true)
- {
- if (auto qualifiedTypeRef = BfNodeDynCast<BfQualifiedTypeReference>(baseNode))
- {
- baseNode = qualifiedTypeRef->mRight;
- }
- else if (auto elementedTypeRef = BfNodeDynCast<BfElementedTypeRef>(baseNode))
- {
- baseNode = elementedTypeRef->mElementType;
- }
- else if (auto namedTypeRef = BfNodeDynCast<BfNamedTypeReference>(baseNode))
- {
- baseNode = namedTypeRef->mNameNode;
- }
- else if (auto qualifiedNameNode = BfNodeDynCast<BfQualifiedNameNode>(baseNode))
- {
- baseNode = qualifiedNameNode->mRight;
- }
- else if (auto declTypeRef = BfNodeDynCast<BfExprModTypeRef>(baseNode))
- {
- baseNode = NULL;
- break;
- }
- else
- break;
- }
- if ((baseNode != NULL) && (autoComplete->IsAutocompleteNode(baseNode)))
- {
- // We didn't have this mDefType check before - why? We always want to catch the FIRST definition,
- // so 'Type?' will catch on 'Type' and not 'Type?'
- if ((autoComplete->mDefType == NULL) &&
- (autoComplete->mDefMethod == NULL) && (autoComplete->mDefField == NULL) &&
- (autoComplete->mDefProp == NULL) && (elementTypeInst->mTypeDef->mTypeDeclaration != NULL))
- {
- autoComplete->mDefType = elementTypeInst->mTypeDef;
- autoComplete->SetDefinitionLocation(elementTypeInst->mTypeDef->mTypeDeclaration->mNameNode);
- }
- if ((autoComplete->mResolveType == BfResolveType_GetResultString) && (resolvedTypeRef != NULL))
- {
- autoComplete->SetResultStringType(resolvedTypeRef);
- }
- }
- }
- }
- }
- }
- }
- }
- if (resolvedTypeRef == NULL)
- return NULL;
- if (mCurTypeInstance == NULL)
- {
- // No deps
- }
- else if (resolvedTypeRef->IsTuple())
- {
- // Add the fields from the tuple as references since those inner fields types would have been explicitly stated, so we need
- // to make sure to record the current type instance as a referring type. This mostly matters for symbol renaming.
- BfTypeInstance* payloadTupleType = (BfTypeInstance*)resolvedTypeRef;
- for (auto& payloadFieldInst : payloadTupleType->mFieldInstances)
- {
- auto payloadFieldType = payloadFieldInst.mResolvedType;
- AddDependency(payloadFieldType, mCurTypeInstance, BfDependencyMap::DependencyFlag_TypeReference);
- }
- }
- else if (resolvedTypeRef->IsDelegateFromTypeRef() || resolvedTypeRef->IsFunctionFromTypeRef())
- {
- auto delegateInfo = resolvedTypeRef->GetDelegateInfo();
- // if (delegateInfo->mFunctionThisType != NULL)
- // AddDependency(delegateInfo->mFunctionThisType, mCurTypeInstance, BfDependencyMap::DependencyFlag_TypeReference);
- AddDependency(delegateInfo->mReturnType, mCurTypeInstance, BfDependencyMap::DependencyFlag_TypeReference);
- for (auto& param : delegateInfo->mParams)
- AddDependency(param, mCurTypeInstance, BfDependencyMap::DependencyFlag_TypeReference);
- }
- BfTypeInstance* typeInstance = resolvedTypeRef->ToTypeInstance();
- BfTypeInstance* genericTypeInstance = resolvedTypeRef->ToGenericTypeInstance();
-
- auto populateModule = this;
- if ((resolveFlags & BfResolveTypeRefFlag_NoReify) != 0)
- populateModule = mContext->mUnreifiedModule;
-
- populateModule->PopulateType(resolvedTypeRef, populateType);
-
- if ((typeInstance != NULL) && (typeInstance->mTypeDef != NULL) && (typeInstance->mTypeDef->mProtection == BfProtection_Internal) &&
- (typeInstance != mCurTypeInstance) && (typeInstance->mTypeDef->mOuterType == NULL) && (!typeRef->IsTemporary()))
- {
- if (!CheckProtection(typeInstance->mTypeDef->mProtection, typeInstance->mTypeDef, false, false))
- Fail(StrFormat("'%s' is inaccessible due to its protection level", TypeToString(typeInstance).c_str()), typeRef); // CS0122
- }
- if ((populateType > BfPopulateType_IdentityNoRemapAlias) && (!ResolveTypeResult_Validate(typeRef, resolvedTypeRef)))
- return NULL;
-
- if (populateType != BfPopulateType_IdentityNoRemapAlias)
- {
- while ((resolvedTypeRef != NULL) && (resolvedTypeRef->IsTypeAlias()))
- {
- if (mCurTypeInstance != NULL)
- AddDependency(resolvedTypeRef, mCurTypeInstance, BfDependencyMap::DependencyFlag_NameReference);
- if (resolvedTypeRef->mDefineState == BfTypeDefineState_Undefined)
- PopulateType(resolvedTypeRef);
- if ((typeInstance->mCustomAttributes != NULL) && (!typeRef->IsTemporary()))
- CheckErrorAttributes(typeInstance, NULL, typeInstance->mCustomAttributes, typeRef);
- resolvedTypeRef = resolvedTypeRef->GetUnderlyingType();
- if (resolvedTypeRef != NULL)
- typeInstance = resolvedTypeRef->ToTypeInstance();
- else
- typeInstance = NULL;
- }
- }
- if (typeInstance != NULL)
- {
- if ((!typeRef->IsTemporary()) && ((resolveFlags & BfResolveTypeRefFlag_FromIndirectSource) == 0))
- {
- if (typeInstance->mCustomAttributes != NULL)
- CheckErrorAttributes(typeInstance, NULL, typeInstance->mCustomAttributes, typeRef);
- else if ((typeInstance->mTypeDef->mTypeDeclaration != NULL) && (typeInstance->mTypeDef->mTypeDeclaration->mAttributes != NULL))
- {
- auto typeRefVerifyRequest = mContext->mTypeRefVerifyWorkList.Alloc();
- typeRefVerifyRequest->mCurTypeInstance = mCurTypeInstance;
- typeRefVerifyRequest->mRefNode = typeRef;
- typeRefVerifyRequest->mType = typeInstance;
- typeRefVerifyRequest->mFromModule = this;
- typeRefVerifyRequest->mFromModuleRevision = mRevision;
- }
- }
- if (typeInstance->IsTuple())
- {
- //TODO: This can cause circular reference issues. Is there a case this is needed?
- //if (typeInstance->mDefineState < BfTypeDefineState_Defined)
- // PopulateType(typeInstance);
- if (typeInstance->mHasDeclError)
- {
- if (auto tupleTypeRef = BfNodeDynCast<BfTupleTypeRef>(typeRef))
- {
- HashSet<String> names;
- for (auto nameIdentifier : tupleTypeRef->mFieldNames)
- {
- if (nameIdentifier == NULL)
- continue;
- StringT<64> fieldName;
- nameIdentifier->ToString(fieldName);
- if (!names.Add(fieldName))
- {
- Fail(StrFormat("A field named '%s' has already been declared", fieldName.c_str()), nameIdentifier);
- }
- }
- }
- }
- }
- }
- return resolvedTypeRef;
- }
- void BfModule::ShowAmbiguousTypeError(BfAstNode* refNode, BfTypeDef* typeDef, BfTypeDef* otherTypeDef)
- {
- BfType* type = ResolveTypeDef(typeDef, BfPopulateType_Identity);
- if (type == NULL)
- return;
- BfType* otherType = ResolveTypeDef(otherTypeDef, BfPopulateType_Identity);
- if (otherType == NULL)
- return;
- auto error = Fail(StrFormat("'%s' is an ambiguous reference between '%s' and '%s'",
- refNode->ToString().c_str(), TypeToString(type, BfTypeNameFlags_None).c_str(), TypeToString(otherType, BfTypeNameFlags_None).c_str()), refNode); // CS0104
- if (error != NULL)
- {
- mCompiler->mPassInstance->MoreInfo("See first definition", typeDef->mTypeDeclaration->mNameNode);
- mCompiler->mPassInstance->MoreInfo("See second definition", otherTypeDef->mTypeDeclaration->mNameNode);
- }
- }
- void BfModule::ShowGenericArgCountError(BfAstNode* typeRef, int wantedGenericParams)
- {
- BfGenericInstanceTypeRef* genericTypeInstRef = BfNodeDynCast<BfGenericInstanceTypeRef>(typeRef);
- BfAstNode* lastNode = typeRef;
- int genericArgDiffCount;
- if (genericTypeInstRef != NULL)
- {
- genericArgDiffCount = (int)genericTypeInstRef->mGenericArguments.size() - wantedGenericParams;
- lastNode = genericTypeInstRef->mOpenChevron;
- if (genericTypeInstRef->mCloseChevron != NULL)
- lastNode = genericTypeInstRef->mCloseChevron;
- if (genericTypeInstRef->mGenericArguments.size() > wantedGenericParams)
- {
- lastNode = genericTypeInstRef->mGenericArguments[wantedGenericParams];
- if (genericArgDiffCount == 1)
- Fail("Too many generic parameters, expected one fewer", lastNode);
- else
- Fail(StrFormat("Too many generic parameters, expected %d fewer", genericArgDiffCount), lastNode);
- return;
- }
- }
- else
- genericArgDiffCount = -wantedGenericParams;
-
- if (wantedGenericParams == 1)
- Fail("Too few generic parameters, expected one more", lastNode);
- else
- Fail(StrFormat("Too few generic parameters, expected %d more", -genericArgDiffCount), lastNode);
- }
- BfTypeDef* BfModule::GetActiveTypeDef(BfTypeInstance* typeInstanceOverride, bool useMixinDecl)
- {
- BfTypeDef* useTypeDef = NULL;
- BfTypeInstance* typeInstance = (typeInstanceOverride != NULL) ? typeInstanceOverride : mCurTypeInstance;
- if ((mContext->mCurTypeState != NULL) && (mContext->mCurTypeState->mForceActiveTypeDef != NULL))
- return mContext->mCurTypeState->mForceActiveTypeDef;
- if (typeInstance != NULL)
- useTypeDef = typeInstance->mTypeDef->GetDefinition();
- if ((mCurMethodState != NULL) && (mCurMethodState->mMixinState != NULL) && (useMixinDecl))
- useTypeDef = mCurMethodState->mMixinState->mMixinMethodInstance->mMethodDef->mDeclaringType->GetDefinition();
- else if ((mCurMethodInstance != NULL) && (mCurMethodInstance->mMethodDef->mDeclaringType != NULL))
- useTypeDef = mCurMethodInstance->mMethodDef->mDeclaringType->GetDefinition();
- else if (mContext->mCurTypeState != NULL)
- {
- if ((mContext->mCurTypeState->mCurFieldDef != NULL) && (mContext->mCurTypeState->mCurFieldDef->mDeclaringType != NULL))
- useTypeDef = mContext->mCurTypeState->mCurFieldDef->mDeclaringType->GetDefinition();
- else if (mContext->mCurTypeState->mCurTypeDef != NULL)
- useTypeDef = mContext->mCurTypeState->mCurTypeDef->GetDefinition();
- }
- return useTypeDef;
- }
- BfTypeDef* BfModule::FindTypeDefRaw(const BfAtomComposite& findName, int numGenericArgs, BfTypeInstance* typeInstance, BfTypeDef* useTypeDef, BfTypeLookupError* error, BfTypeLookupResultCtx* lookupResultCtx, BfResolveTypeRefFlags resolveFlags)
- {
- if ((findName.mSize == 1) && (findName.mParts[0]->mIsSystemType))
- {
- //BP_ZONE("BfModule::FindTypeDefRaw_1");
- return mSystem->FindTypeDef(findName, 0, useTypeDef->mProject);
- }
- BfTypeInstance* skipCheckBaseType = NULL;
- if (mContext->mCurTypeState != NULL)
- {
- if (mContext->mCurTypeState->mCurBaseTypeRef != NULL)
- skipCheckBaseType = mContext->mCurTypeState->mType->ToTypeInstance();
- if (mContext->mCurTypeState->mResolveKind == BfTypeState::ResolveKind_BuildingGenericParams)
- skipCheckBaseType = mContext->mCurTypeState->mType->ToTypeInstance();
- }
- BfTypeDefLookupContext lookupCtx;
- bool allowPrivate = true;
- int curPri = 1000;
- auto checkTypeInst = typeInstance;
- BfTypeDef* protErrorTypeDef = NULL;
- BfTypeInstance* protErrorOuterType = NULL;
-
- BfTypeDef* foundInnerType = NULL;
- if ((lookupResultCtx != NULL) && (lookupResultCtx->mIsVerify))
- {
- if (lookupResultCtx->mResult->mFoundInnerType)
- return lookupCtx.mBestTypeDef;
- }
- else
- {
- if ((!lookupCtx.HasValidMatch()) && (typeInstance != NULL))
- {
- std::function<bool(BfTypeInstance*)> _CheckType = [&](BfTypeInstance* typeInstance)
- {
- auto checkTypeInst = typeInstance;
- allowPrivate = true;
- while (checkTypeInst != NULL)
- {
- if (!checkTypeInst->mTypeDef->mNestedTypes.IsEmpty())
- {
- if (mSystem->FindTypeDef(findName, numGenericArgs, useTypeDef->mProject, checkTypeInst->mTypeDef->mFullNameEx, allowPrivate, &lookupCtx))
- {
- foundInnerType = lookupCtx.mBestTypeDef;
- if (lookupCtx.HasValidMatch())
- return true;
- if ((lookupCtx.mBestTypeDef->mProtection == BfProtection_Private) && (!allowPrivate))
- {
- protErrorTypeDef = lookupCtx.mBestTypeDef;
- protErrorOuterType = checkTypeInst;
- }
- }
- }
- if (checkTypeInst == skipCheckBaseType)
- break;
- checkTypeInst = GetBaseType(checkTypeInst);
- allowPrivate = false;
- }
- checkTypeInst = typeInstance;
- allowPrivate = true;
- while (checkTypeInst != NULL)
- {
- auto outerTypeInst = GetOuterType(checkTypeInst);
- if (outerTypeInst != NULL)
- {
- if (_CheckType(outerTypeInst))
- return true;
- }
- if (checkTypeInst == skipCheckBaseType)
- break;
- checkTypeInst = GetBaseType(checkTypeInst);
- allowPrivate = false;
- }
- return false;
- };
- _CheckType(typeInstance);
- }
- }
- if (!lookupCtx.HasValidMatch())
- {
- if (mSystem->mTypeDefs.TryGet(findName, NULL))
- mSystem->FindTypeDef(findName, numGenericArgs, useTypeDef->mProject, BfAtomComposite(), allowPrivate, &lookupCtx);
-
- for (auto& checkNamespace : useTypeDef->mNamespaceSearch)
- {
- BfAtom* atom = findName.mParts[0];
- BfAtom* prevAtom = checkNamespace.mParts[checkNamespace.mSize - 1];
- if (atom->mPrevNamesMap.ContainsKey(prevAtom))
- mSystem->FindTypeDef(findName, numGenericArgs, useTypeDef->mProject, checkNamespace, allowPrivate, &lookupCtx);
- }
- }
- if (!lookupCtx.HasValidMatch())
- {
- auto staticSearch = GetStaticSearch();
- if (staticSearch != NULL)
- {
- for (auto staticTypeInstance : staticSearch->mStaticTypes)
- {
- if (mSystem->FindTypeDef(findName, numGenericArgs, useTypeDef->mProject, staticTypeInstance->mTypeDef->mFullNameEx, false, &lookupCtx))
- {
- if (lookupCtx.HasValidMatch())
- break;
-
- if (lookupCtx.mBestTypeDef->mProtection < BfProtection_Public)
- {
- protErrorTypeDef = lookupCtx.mBestTypeDef;
- protErrorOuterType = staticTypeInstance;
- }
- }
- }
- }
- }
-
- if ((!lookupCtx.HasValidMatch()) && (typeInstance == NULL))
- {
- if (useTypeDef->mOuterType != NULL)
- return FindTypeDefRaw(findName, numGenericArgs, typeInstance, useTypeDef->mOuterType, error);
- }
-
- if ((error != NULL) && (lookupCtx.mAmbiguousTypeDef != NULL))
- {
- if (error->mErrorKind == BfTypeLookupError::BfErrorKind_None)
- error->mErrorKind = BfTypeLookupError::BfErrorKind_Ambiguous;
- error->mAmbiguousTypeDef = lookupCtx.mAmbiguousTypeDef;
- if (error->mRefNode != NULL)
- ShowAmbiguousTypeError(error->mRefNode, lookupCtx.mBestTypeDef, lookupCtx.mAmbiguousTypeDef);
- }
- if ((protErrorTypeDef != NULL) && (lookupCtx.mBestTypeDef == protErrorTypeDef) && (error != NULL) && (error->mRefNode != NULL))
- Fail(StrFormat("'%s.%s' is inaccessible due to its protection level", TypeToString(protErrorOuterType).c_str(), findName.ToString().c_str()), error->mRefNode); // CS0122
- if ((lookupResultCtx != NULL) && (lookupResultCtx->mResult != NULL) && (!lookupResultCtx->mIsVerify) && (foundInnerType != NULL) && (foundInnerType == lookupCtx.mBestTypeDef))
- lookupResultCtx->mResult->mFoundInnerType = true;
- if (((resolveFlags & BfResolveTypeRefFlag_AllowGlobalContainer) == 0) && (lookupCtx.mBestTypeDef != NULL) && (lookupCtx.mBestTypeDef->IsGlobalsContainer()))
- return NULL;
- return lookupCtx.mBestTypeDef;
- }
- BfTypeDef* BfModule::FindTypeDef(const BfAtomComposite& findName, int numGenericArgs, BfTypeInstance* typeInstanceOverride, BfTypeLookupError* error, BfResolveTypeRefFlags resolveFlags)
- {
- BP_ZONE("BfModule::FindTypeDef_1");
- BfTypeInstance* typeInstance = (typeInstanceOverride != NULL) ? typeInstanceOverride : mCurTypeInstance;
- auto useTypeDef = GetActiveTypeDef(typeInstanceOverride, true);
- if ((typeInstance == NULL) && (useTypeDef == NULL))
- {
- BfProject* project = NULL;
- if ((mCompiler->mResolvePassData != NULL) && (mCompiler->mResolvePassData->mParser != NULL))
- project = mCompiler->mResolvePassData->mParser->mProject;
- BP_ZONE("System.FindTypeDef_2");
- Array<BfAtomComposite> namespaceSearch;
- if (mContext->mCurNamespaceNodes != NULL)
- {
- String checkNamespace;
- for (auto namespaceNode : *mContext->mCurNamespaceNodes)
- {
- if (namespaceNode->mNameNode != NULL)
- {
- if (!checkNamespace.IsEmpty())
- checkNamespace += ".";
- namespaceNode->mNameNode->ToString(checkNamespace);
- }
- }
- if (!checkNamespace.IsEmpty())
- {
- BfAtomComposite atomComposite;
- if (mSystem->ParseAtomComposite(checkNamespace, atomComposite))
- namespaceSearch.Add(atomComposite);
- }
- }
- BfTypeDef* ambiguousTypeDef = NULL;
- BfTypeDef *result = mSystem->FindTypeDef(findName, numGenericArgs, project, namespaceSearch, &ambiguousTypeDef);
- if ((ambiguousTypeDef != NULL) && (error != NULL))
- {
- error->mErrorKind = BfTypeLookupError::BfErrorKind_Ambiguous;
- error->mAmbiguousTypeDef = ambiguousTypeDef;
- if (error->mRefNode != NULL)
- ShowAmbiguousTypeError(error->mRefNode, result, ambiguousTypeDef);
- }
- return result;
- }
- if ((mCompiler->mResolvePassData != NULL) && (mCompiler->mResolvePassData->mAutoComplete != NULL) && (typeInstance != NULL))
- {
- if (mCompiler->mResolvePassData->mAutoCompleteTempTypes.Contains(useTypeDef))
- return FindTypeDefRaw(findName, numGenericArgs, typeInstance, useTypeDef, error, NULL, resolveFlags);
- }
- BfTypeLookupEntry typeLookupEntry;
- typeLookupEntry.mName = findName;
- typeLookupEntry.mNumGenericParams = numGenericArgs;
- typeLookupEntry.mUseTypeDef = useTypeDef;
- BfTypeLookupEntry* typeLookupEntryPtr = NULL;
- BfTypeLookupResult* resultPtr = NULL;
- if ((typeInstance != NULL) && (typeInstance->mLookupResults.TryAdd(typeLookupEntry, &typeLookupEntryPtr, &resultPtr)))
- {
- typeLookupEntryPtr->mAtomUpdateIdx = typeLookupEntry.mName.GetAtomUpdateIdx();
- // FindTypeDefRaw may re-enter when finding base types, so we need to expect that resultPtr can change
- resultPtr->mForceLookup = true;
- resultPtr->mTypeDef = NULL;
- int prevAllocSize = (int)typeInstance->mLookupResults.size();
- BfTypeLookupError localError;
- BfTypeLookupError* errorPtr = (error != NULL) ? error : &localError;
- BfTypeLookupResultCtx lookupResultCtx;
- lookupResultCtx.mResult = resultPtr;
- auto typeDef = FindTypeDefRaw(findName, numGenericArgs, typeInstance, useTypeDef, errorPtr, &lookupResultCtx, resolveFlags);
- if (prevAllocSize != typeInstance->mLookupResults.size())
- {
- bool found = typeInstance->mLookupResults.TryGetValue(typeLookupEntry, &resultPtr);
- BF_ASSERT(found);
- }
- resultPtr->mTypeDef = typeDef;
- resultPtr->mForceLookup = errorPtr->mErrorKind != BfTypeLookupError::BfErrorKind_None;
- return typeDef;
- }
- else
- {
- if ((resultPtr == NULL) || (resultPtr->mForceLookup))
- return FindTypeDefRaw(findName, numGenericArgs, typeInstance, useTypeDef, error, NULL, resolveFlags);
- else
- return resultPtr->mTypeDef;
- }
- }
- BfTypeDef* BfModule::FindTypeDef(const StringImpl& typeName, int numGenericArgs, BfTypeInstance* typeInstanceOverride, BfTypeLookupError* error, BfResolveTypeRefFlags resolveFlags)
- {
- BP_ZONE("BfModule::FindTypeDef_4");
- BfSizedAtomComposite findName;
- if (!mSystem->ParseAtomComposite(typeName, findName))
- return NULL;
- auto result = FindTypeDef(findName, numGenericArgs, typeInstanceOverride, error, resolveFlags);
- // Don't allow just finding extensions here. This can happen in some 'using static' cases but generally shouldn't happen
- if ((result != NULL) && (result->mTypeCode == BfTypeCode_Extension))
- return NULL;
- return result;
- }
- BfTypeDef* BfModule::FindTypeDef(BfTypeReference* typeRef, BfTypeInstance* typeInstanceOverride, BfTypeLookupError* error, int numGenericParams, BfResolveTypeRefFlags resolveFlags)
- {
- BP_ZONE("BfModule::FindTypeDef_5");
- if (auto typeDefTypeRef = BfNodeDynCast<BfDirectTypeDefReference>(typeRef))
- {
- if (typeDefTypeRef->mTypeDef != NULL)
- return mSystem->FilterDeletedTypeDef(typeDefTypeRef->mTypeDef);
- }
- //TODO: When does this get called?
- if (auto elementedType = BfNodeDynCast<BfElementedTypeRef>(typeRef))
- return FindTypeDef(elementedType->mElementType, typeInstanceOverride, error);
- BF_ASSERT(typeRef->IsA<BfNamedTypeReference>() || typeRef->IsA<BfQualifiedTypeReference>() || typeRef->IsA<BfDirectStrTypeReference>());
- auto namedTypeRef = BfNodeDynCast<BfNamedTypeReference>(typeRef);
- StringView findNameStr;
- if (namedTypeRef != NULL)
- findNameStr = namedTypeRef->mNameNode->ToStringView();
- else
- {
- auto directStrTypeDef = BfNodeDynCastExact<BfDirectStrTypeReference>(typeRef);
- if (directStrTypeDef != NULL)
- findNameStr = directStrTypeDef->mTypeName;
- else
- BFMODULE_FATAL(this, "Error?");
- }
- if (findNameStr.mLength == 6)
- {
- if (findNameStr == "object")
- {
- findNameStr = "System.Object";
- Fail("'object' alias not supported, use 'Object'", typeRef);
- }
- else if (findNameStr == "string")
- {
- findNameStr = "System.String";
- Fail("'string' alias not supported, use 'String'", typeRef);
- }
- }
- BfSizedAtomComposite findName;
- if ((resolveFlags & BfResolveTypeRefFlag_Attribute) != 0)
- {
- String attributeName;
- attributeName += findNameStr;
- attributeName += "Attribute";
- if (!mSystem->ParseAtomComposite(attributeName, findName))
- return NULL;
- }
- else
- {
- if (!mSystem->ParseAtomComposite(findNameStr, findName))
- return NULL;
- }
-
-
- #ifdef BF_AST_HAS_PARENT_MEMBER
- if (auto parentGenericTypeRef = BfNodeDynCast<BfGenericInstanceTypeRef>(typeRef->mParent))
- {
- if (parentGenericTypeRef->mElementType == typeRef)
- BF_ASSERT(numGenericParams == parentGenericTypeRef->GetGenericArgCount());
- }
- #endif
- auto typeDef = FindTypeDef(findName, numGenericParams, typeInstanceOverride, error, resolveFlags);
- //TYPEDEF if (namedTypeRef != NULL)
- // namedTypeRef->mTypeDef = typeDef;
- return typeDef;
- }
- void BfModule::CheckTypeRefFixit(BfAstNode* typeRef, const char* appendName)
- {
- if ((mCompiler->IsAutocomplete()) && (mCompiler->mResolvePassData->mAutoComplete->CheckFixit((typeRef))))
- {
- String typeName = typeRef->ToString();
- if (appendName != NULL)
- typeName += appendName;
-
- std::set<String> fixitNamespaces;
- //TODO: Do proper value for numGenericArgs
- mSystem->FindFixitNamespaces(typeName, -1, mCompiler->mResolvePassData->mParser->mProject, fixitNamespaces);
- int insertLoc = 0;
- BfUsingFinder usingFinder;
- usingFinder.VisitMembers(typeRef->GetSourceData()->mRootNode);
- for (auto& namespaceStr : fixitNamespaces)
- {
- BfParserData* parser = typeRef->GetSourceData()->ToParserData();
- if (parser != NULL)
- mCompiler->mResolvePassData->mAutoComplete->AddEntry(AutoCompleteEntry("fixit", StrFormat("using %s;\t.using|%s|%d||using %s;", namespaceStr.c_str(), parser->mFileName.c_str(), usingFinder.mLastIdx, namespaceStr.c_str()).c_str()));
- }
- }
- }
- void BfModule::CheckIdentifierFixit(BfAstNode* node)
- {
- //TODO: Check globals, possibly spelling mistakes?
- }
- void BfModule::TypeRefNotFound(BfTypeReference* typeRef, const char* appendName)
- {
- if (typeRef->IsTemporary())
- return;
- if (PreFail())
- Fail("Type could not be found (are you missing a using directive or library reference?)", typeRef);
- if (!mIgnoreErrors)
- {
- while (auto elementedType = BfNodeDynCast<BfElementedTypeRef>(typeRef))
- typeRef = elementedType->mElementType;
- if (auto namedTypeRef = BfNodeDynCast<BfNamedTypeReference>(typeRef))
- {
- String findNameStr = namedTypeRef->mNameNode->ToString();
- if (appendName != NULL)
- findNameStr += appendName;
- BfSizedAtomComposite findName;
- if ((!mSystem->ParseAtomComposite(findNameStr, findName)) && (mCurTypeInstance != NULL))
- {
- //BfTypeInstance* typeInstance = (typeInstanceOverride != NULL) ? typeInstanceOverride : mCurTypeInstance;
- // We don't need a typeInstanceOverride because that is used to lookup references
- // from mixins, but it's the type using the mixin (mCurTypeInstance) that needs
- // rebuilding if the lookup fails
- BfTypeInstance* typeInstance = mCurTypeInstance;
- BfTypeLookupEntry typeLookupEntry;
- typeLookupEntry.mNumGenericParams = 0;
- typeLookupEntry.mAtomUpdateIdx = mSystem->mAtomUpdateIdx;
- typeInstance->mLookupResults.TryAdd(typeLookupEntry, BfTypeLookupResult());
- }
- }
- }
- CheckTypeRefFixit(typeRef, appendName);
- }
- bool BfModule::ValidateTypeWildcard(BfAstNode* typeRef, bool isAttributeRef)
- {
- if (typeRef == NULL)
- return false;
- if (auto wildcardTypeRef = BfNodeDynCast<BfWildcardTypeReference>(typeRef))
- return true;
-
- StringT<128> nameStr;
- typeRef->ToString(nameStr);
- if (isAttributeRef)
- nameStr.Append("Attribute");
- auto typeDef = mSystem->FindTypeDef(nameStr, (BfProject*)NULL);
- if ((typeDef != NULL) && (typeDef->mGenericParamDefs.IsEmpty()))
- return true;
- if (auto qualifiedTypeRef = BfNodeDynCast<BfQualifiedTypeReference>(typeRef))
- {
- if (qualifiedTypeRef->mLeft == NULL)
- return false;
- StringT<128> leftNameStr;
- BfType* leftType = NULL;
- BfAtomComposite leftComposite;
- qualifiedTypeRef->mLeft->ToString(leftNameStr);
- if (!mSystem->ParseAtomComposite(leftNameStr, leftComposite))
- return false;
- if (auto wildcardTypeRef = BfNodeDynCast<BfWildcardTypeReference>(qualifiedTypeRef->mRight))
- {
- if (mSystem->ContainsNamespace(leftComposite, NULL))
- return true;
- return ValidateTypeWildcard(qualifiedTypeRef->mLeft, false);
- }
- }
- if (auto genericTypeRef = BfNodeDynCast<BfGenericInstanceTypeRef>(typeRef))
- {
- StringT<128> nameStr;
- genericTypeRef->mElementType->ToString(nameStr);
- auto typeDef = mSystem->FindTypeDef(nameStr, (int)genericTypeRef->mGenericArguments.size(), NULL);
- if (typeDef == NULL)
- return false;
- if (typeDef->mGenericParamDefs.size() != genericTypeRef->GetGenericArgCount())
- return false;
- for (auto genericArgTypeRef : genericTypeRef->mGenericArguments)
- {
- if ((genericTypeRef != NULL) && (!ValidateTypeWildcard(genericArgTypeRef, false)))
- return false;
- }
- return true;
- }
- if (auto elementedTypeRef = BfNodeDynCast<BfElementedTypeRef>(typeRef))
- {
- return ValidateTypeWildcard(elementedTypeRef->mElementType, false);
- }
- return false;
- }
- //int sResolveTypeRefIdx = 0;
- BfTypedValue BfModule::TryLookupGenericConstVaue(BfIdentifierNode* identifierNode, BfType* expectingType)
- {
- BfTypeInstance* contextTypeInstance = mCurTypeInstance;
- BfMethodInstance* contextMethodInstance = mCurMethodInstance;
- if ((mCurMethodState != NULL) && (mCurMethodState->mMixinState != NULL))
- {
- contextTypeInstance = mCurMethodState->mMixinState->mMixinMethodInstance->GetOwner();
- contextMethodInstance = mCurMethodState->mMixinState->mMixinMethodInstance;
- }
- BfTypeDef* curTypeDef = NULL;
- if (contextTypeInstance != NULL)
- {
- curTypeDef = contextTypeInstance->mTypeDef;
-
- StringT<128> findName;
- identifierNode->ToString(findName);
- auto genericCheckTypeInstance = contextTypeInstance;
- if (contextTypeInstance->IsBoxed())
- genericCheckTypeInstance = contextTypeInstance->GetUnderlyingType()->ToTypeInstance();
- bool doUndefVal = false;
- if (genericCheckTypeInstance->IsUnspecializedTypeVariation())
- {
- genericCheckTypeInstance = GetUnspecializedTypeInstance(genericCheckTypeInstance);
- doUndefVal = true;
- }
-
- BfGenericParamDef* genericParamDef = NULL;
- BfGenericParamDef* origGenericParamDef = NULL;
- BfType* genericParamResult = NULL;
- BfType* genericTypeConstraint = NULL;
- bool disallowConstExprValue = false;
- if ((genericCheckTypeInstance != NULL) && (genericCheckTypeInstance->IsGenericTypeInstance()))
- {
- auto genericTypeInst = (BfTypeInstance*)genericCheckTypeInstance;
- auto* genericParams = &curTypeDef->mGenericParamDefs;
- auto* origGenericParams = &curTypeDef->mGenericParamDefs;
-
- if (genericTypeInst->mGenericTypeInfo->mGenericExtensionInfo != NULL)
- {
- auto activeTypeDef = GetActiveTypeDef(NULL, true);
- genericParams = &activeTypeDef->mGenericParamDefs;
- }
-
- for (int genericParamIdx = (int)genericParams->size() - 1; genericParamIdx >= 0; genericParamIdx--)
- {
- auto checkGenericParamDef = (*genericParams)[genericParamIdx];
- String genericName = checkGenericParamDef->mName;
-
- if (genericName == findName)
- {
- genericParamDef = checkGenericParamDef;
- origGenericParamDef = (*origGenericParams)[genericParamIdx];
- genericParamResult = genericTypeInst->mGenericTypeInfo->mTypeGenericArguments[genericParamIdx];
- genericTypeConstraint = genericTypeInst->mGenericTypeInfo->mGenericParams[genericParamIdx]->mTypeConstraint;
- if (contextTypeInstance != genericCheckTypeInstance)
- {
- // Don't allow an 'unspecialized variation' generic param
- auto checkResult = contextTypeInstance->mGenericTypeInfo->mTypeGenericArguments[genericParamIdx];
- if (!checkResult->IsGenericParam())
- genericParamResult = checkResult;
- }
- HandleTypeGenericParamRef(identifierNode, genericTypeInst->mTypeDef, genericParamIdx);
- }
- }
- }
- if ((contextMethodInstance != NULL) && (genericParamResult == NULL))
- {
- auto checkMethodInstance = contextMethodInstance;
- if (checkMethodInstance->mIsUnspecializedVariation)
- checkMethodInstance = GetUnspecializedMethodInstance(checkMethodInstance);
- for (int genericParamIdx = (int)checkMethodInstance->mMethodDef->mGenericParams.size() - 1; genericParamIdx >= 0; genericParamIdx--)
- {
- auto checkGenericParamDef = checkMethodInstance->mMethodDef->mGenericParams[genericParamIdx];
- String genericName = checkGenericParamDef->mName;
- if (genericName == findName)
- {
- genericParamDef = checkGenericParamDef;
- origGenericParamDef = checkGenericParamDef;
- genericParamResult = checkMethodInstance->mMethodInfoEx->mMethodGenericArguments[genericParamIdx];
- genericTypeConstraint = checkMethodInstance->mMethodInfoEx->mGenericParams[genericParamIdx]->mTypeConstraint;
- if (contextMethodInstance != checkMethodInstance)
- {
- // Don't allow an 'unspecialized variation' generic param
- auto checkResult = contextMethodInstance->mMethodInfoEx->mMethodGenericArguments[genericParamIdx];
- if (!checkResult->IsGenericParam())
- genericParamResult = checkResult;
- }
- HandleMethodGenericParamRef(identifierNode, contextMethodInstance->GetOwner()->mTypeDef, checkMethodInstance->mMethodDef, genericParamIdx);
- }
- }
- }
- if (genericParamResult != NULL)
- {
- auto typeRefSource = identifierNode->GetSourceData();
- if ((mCompiler->mResolvePassData != NULL) && (mCompiler->mResolvePassData->mSourceClassifier != NULL) && (typeRefSource != NULL) && (typeRefSource == mCompiler->mResolvePassData->mParser->mSourceData))
- mCompiler->mResolvePassData->mSourceClassifier->SetElementType(identifierNode, BfSourceElementType_GenericParam);
- if (genericParamResult->IsConstExprValue())
- {
- BfConstExprValueType* constExprValueType = (BfConstExprValueType*)genericParamResult;
- auto constType = genericTypeConstraint;
- if (constType == NULL)
- constType = GetPrimitiveType(BfTypeCode_IntPtr);
- BfExprEvaluator exprEvaluator(this);
- exprEvaluator.mExpectingType = constType;
- exprEvaluator.GetLiteral(identifierNode, constExprValueType->mValue);
- if (exprEvaluator.mResult)
- {
- auto castedVal = CastToValue(identifierNode, exprEvaluator.mResult, constType, (BfCastFlags)(BfCastFlags_Explicit | BfCastFlags_SilentFail));
- if (castedVal)
- return BfTypedValue(castedVal, constType);
- }
-
- return exprEvaluator.mResult;
- }
- else if (genericParamResult->IsGenericParam())
- {
- if ((doUndefVal) && (genericTypeConstraint != NULL))
- {
- return GetDefaultTypedValue(genericTypeConstraint, false, BfDefaultValueKind_Undef);
- }
- if (((genericParamDef->mGenericParamFlags | origGenericParamDef->mGenericParamFlags) & BfGenericParamFlag_Const) != 0)
- {
- BfTypedValue result;
- result.mType = genericParamResult;
- result.mKind = BfTypedValueKind_GenericConstValue;
- return result;
- }
- }
- }
- }
- return BfTypedValue();
- }
- void BfModule::GetDelegateTypeRefAttributes(BfDelegateTypeRef* delegateTypeRef, BfCallingConvention& callingConvention)
- {
- if (delegateTypeRef->mAttributes == NULL)
- return;
- BfCaptureInfo captureInfo;
- auto customAttributes = GetCustomAttributes(delegateTypeRef->mAttributes, (BfAttributeTargets)(BfAttributeTargets_DelegateTypeRef | BfAttributeTargets_FunctionTypeRef), BfGetCustomAttributesFlags_KeepConstsInModule);
- if (customAttributes != NULL)
- {
- auto linkNameAttr = customAttributes->Get(mCompiler->mCallingConventionAttributeTypeDef);
- if (linkNameAttr != NULL)
- {
- if (linkNameAttr->mCtorArgs.size() == 1)
- {
- auto constant = mBfIRBuilder->GetConstant(linkNameAttr->mCtorArgs[0]);
- if (constant != NULL)
- callingConvention = (BfCallingConvention)constant->mInt32;
- }
- }
- }
- }
- BfType* BfModule::ResolveTypeRef(BfTypeReference* typeRef, BfPopulateType populateType, BfResolveTypeRefFlags resolveFlags, int numGenericArgs)
- {
- BP_ZONE("BfModule::ResolveTypeRef");
- if (typeRef == NULL)
- {
- AssertErrorState();
- return NULL;
- }
- if (resolveFlags & BfResolveTypeRefFlag_AutoComplete)
- {
- resolveFlags = (BfResolveTypeRefFlags)(resolveFlags & ~BfResolveTypeRefFlag_AutoComplete);
- auto autoComplete = mCompiler->GetAutoComplete();
- if (autoComplete != NULL)
- autoComplete->CheckTypeRef(typeRef, false);
- }
- if ((resolveFlags & BfResolveTypeRefFlag_AllowRef) == 0)
- {
- if (auto refTypeRef = BfNodeDynCast<BfRefTypeRef>(typeRef))
- {
- const char* refTypeStr = BfTokenToString(refTypeRef->mRefToken->mToken);
- Fail(StrFormat("Invalid use of '%s'. Only method parameters, return types, and local variables can be declared as %s types", refTypeStr, refTypeStr), refTypeRef->mRefToken);
- return ResolveTypeRef(refTypeRef->mElementType, populateType, resolveFlags, numGenericArgs);
- }
- }
- if (auto directTypeRef = BfNodeDynCastExact<BfDirectTypeReference>(typeRef))
- {
- return directTypeRef->mType;
- }
- if (auto dotType = BfNodeDynCastExact<BfDotTypeReference>(typeRef))
- {
- Fail(StrFormat("Invalid use of '%s'", BfTokenToString(dotType->mDotToken->mToken)), typeRef);
- return NULL;
- }
- if (auto varRefType = BfNodeDynCastExact<BfVarRefTypeReference>(typeRef))
- {
- Fail("Invalid use of 'var ref'. Generally references are generated with a 'var' declaration with 'ref' applied to the initializer", typeRef);
- return NULL;
- }
- if (mNoResolveGenericParams)
- resolveFlags = (BfResolveTypeRefFlags)(resolveFlags | BfResolveTypeRefFlag_NoResolveGenericParam);
- SetAndRestoreValue<bool> prevNoResolveGenericParams(mNoResolveGenericParams, (resolveFlags & BfResolveTypeRefFlag_NoResolveGenericParam) != 0);
- //
- resolveFlags = (BfResolveTypeRefFlags)(resolveFlags & ~BfResolveTypeRefFlag_NoResolveGenericParam);
- BfTypeInstance* contextTypeInstance = mCurTypeInstance;
- BfMethodInstance* contextMethodInstance = mCurMethodInstance;
- if ((mCurMethodInstance != NULL) && (mCurMethodInstance->mIsForeignMethodDef))
- contextTypeInstance = mCurMethodInstance->mMethodInfoEx->mForeignType;
- if ((mCurMethodState != NULL) && (mCurMethodState->mMixinState != NULL))
- {
- contextTypeInstance = mCurMethodState->mMixinState->mMixinMethodInstance->GetOwner();
- contextMethodInstance = mCurMethodState->mMixinState->mMixinMethodInstance;
- }
- BfTypeDef* curTypeDef = NULL;
- if (contextTypeInstance != NULL)
- {
- curTypeDef = contextTypeInstance->mTypeDef;
- // Check generics first
- auto namedTypeRef = BfNodeDynCastExact<BfNamedTypeReference>(typeRef);
- auto directStrTypeRef = BfNodeDynCastExact<BfDirectStrTypeReference>(typeRef);
- if (((namedTypeRef != NULL) && (namedTypeRef->mNameNode != NULL)) || (directStrTypeRef != NULL))
- {
- StringT<128> findName;
- if (namedTypeRef != NULL)
- namedTypeRef->mNameNode->ToString(findName);
- else
- findName = directStrTypeRef->mTypeName;
- if (findName == "Self")
- {
- BfType* selfType = mCurTypeInstance;
- if (selfType->IsTypeAlias())
- selfType = GetOuterType(selfType);
- if (selfType != NULL)
- {
- if (selfType->IsInterface()) // For interfaces, 'Self' refers to the identity of the implementing type, so we use a placeholder
- return GetPrimitiveType(BfTypeCode_Self);
- else
- resolveFlags = (BfResolveTypeRefFlags)(resolveFlags | BfResolveTypeRefFlag_FromIndirectSource);
- if (selfType->IsBoxed())
- selfType = selfType->GetUnderlyingType();
- if ((resolveFlags & BfResolveTypeRefFlag_NoResolveGenericParam) != 0)
- {
- if ((selfType->IsSpecializedType()) || (selfType->IsUnspecializedTypeVariation()))
- selfType = ResolveTypeDef(selfType->ToTypeInstance()->mTypeDef, populateType);
- }
- }
- if (selfType != NULL)
- {
- auto selfTypeInst = selfType->ToTypeInstance();
- if ((selfTypeInst != NULL) && (selfTypeInst->mTypeDef->IsGlobalsContainer()) && ((resolveFlags & BfResolveTypeRefFlag_AllowGlobalsSelf) == 0))
- selfType = NULL;
- }
- if (selfType == NULL)
- {
- Fail("'Self' type is not usable here", typeRef);
- }
- return ResolveTypeResult(typeRef, selfType, populateType, resolveFlags);
- }
- else if (findName == "SelfBase")
- {
- BfType* selfType = mCurTypeInstance;
- if (selfType->IsTypeAlias())
- selfType = GetOuterType(selfType);
- if (selfType != NULL)
- {
- resolveFlags = (BfResolveTypeRefFlags)(resolveFlags | BfResolveTypeRefFlag_FromIndirectSource);
- if (selfType->IsBoxed())
- selfType = selfType->GetUnderlyingType();
- if ((resolveFlags & BfResolveTypeRefFlag_NoResolveGenericParam) != 0)
- {
- if ((selfType->IsSpecializedType()) || (selfType->IsUnspecializedTypeVariation()))
- selfType = ResolveTypeDef(selfType->ToTypeInstance()->mTypeDef, populateType);
- }
- }
- BfType* baseType = NULL;
- if (selfType != NULL)
- {
- if (selfType->IsTypedPrimitive())
- baseType = selfType->GetUnderlyingType();
- else
- {
- auto selfTypeInst = selfType->ToTypeInstance();
- if (selfTypeInst != NULL)
- {
- baseType = selfTypeInst->mBaseType;
- }
- }
- }
- if (baseType == NULL)
- {
- Fail("'SelfBase' type is not usable here", typeRef);
- }
- return ResolveTypeResult(typeRef, baseType, populateType, resolveFlags);
- }
- else if (findName == "SelfOuter")
- {
- BfType* selfType = mCurTypeInstance;
- if (selfType->IsTypeAlias())
- selfType = GetOuterType(selfType);
- if (selfType != NULL)
- {
- resolveFlags = (BfResolveTypeRefFlags)(resolveFlags | BfResolveTypeRefFlag_FromIndirectSource);
- if (selfType->IsBoxed())
- selfType = selfType->GetUnderlyingType();
- if ((resolveFlags & BfResolveTypeRefFlag_NoResolveGenericParam) != 0)
- {
- if ((selfType->IsSpecializedType()) || (selfType->IsUnspecializedTypeVariation()))
- selfType = ResolveTypeDef(selfType->ToTypeInstance()->mTypeDef, populateType);
- }
- selfType = GetOuterType(selfType->ToTypeInstance());
- }
- if (selfType == NULL)
- Fail("'SelfOuter' type is not usable here", typeRef);
- return ResolveTypeResult(typeRef, selfType, populateType, resolveFlags);
- }
- else if (findName == "ExpectedType")
- {
- Fail("'ExpectedType' is not usable here", typeRef);
- return ResolveTypeResult(typeRef, NULL, populateType, resolveFlags);
- }
- auto genericCheckTypeInstance = contextTypeInstance;
- if (contextTypeInstance->IsBoxed())
- genericCheckTypeInstance = contextTypeInstance->GetUnderlyingType()->ToTypeInstance();
- BfGenericParamDef* genericParamDef = NULL;
- BfType* genericParamResult = NULL;
- bool disallowConstExprValue = false;
- if ((contextMethodInstance != NULL) && (genericParamResult == NULL))
- {
- BfMethodInstance* prevMethodInstance = NULL;
- // If we're in a closure then use the outside method generic arguments
- auto checkMethodInstance = contextMethodInstance;
- if ((mCurMethodState != NULL) && (checkMethodInstance->mIsClosure))
- {
- auto checkMethodState = mCurMethodState;
- while (checkMethodState != NULL)
- {
- if ((checkMethodState->mMethodInstance != NULL) && (checkMethodState->mMethodInstance->mIsClosure))
- {
- checkMethodInstance = checkMethodState->mPrevMethodState->mMethodInstance;
- }
- checkMethodState = checkMethodState->mPrevMethodState;
- }
- }
- for (int genericParamIdx = (int)checkMethodInstance->mMethodDef->mGenericParams.size() - 1; genericParamIdx >= 0; genericParamIdx--)
- {
- auto checkGenericParamDef = checkMethodInstance->mMethodDef->mGenericParams[genericParamIdx];
- String genericName = checkGenericParamDef->mName;
- if (genericName == findName)
- {
- genericParamDef = checkGenericParamDef;
- if (((genericParamDef->mGenericParamFlags & BfGenericParamFlag_Const) != 0) &&
- ((resolveFlags & BfResolveTypeRefFlag_AllowGenericMethodParamConstValue) == 0))
- disallowConstExprValue = true;
- HandleMethodGenericParamRef(typeRef, checkMethodInstance->GetOwner()->mTypeDef, checkMethodInstance->mMethodDef, genericParamIdx);
- if ((resolveFlags & BfResolveTypeRefFlag_NoResolveGenericParam) != 0)
- return GetGenericParamType(BfGenericParamKind_Method, genericParamIdx);
- else
- {
- if ((mContext->mCurConstraintState != NULL) && (mContext->mCurConstraintState->mMethodInstance == checkMethodInstance) &&
- (mContext->mCurConstraintState->mMethodGenericArgsOverride != NULL))
- {
- return ResolveTypeResult(typeRef, (*mContext->mCurConstraintState->mMethodGenericArgsOverride)[genericParamIdx], populateType, resolveFlags);
- }
- SetAndRestoreValue<BfGetSymbolReferenceKind> prevSymbolRefKind;
- if (mCompiler->mResolvePassData != NULL) // Don't add these typeRefs, they are indirect
- prevSymbolRefKind.Init(mCompiler->mResolvePassData->mGetSymbolReferenceKind, BfGetSymbolReferenceKind_None);
- genericParamResult = checkMethodInstance->mMethodInfoEx->mMethodGenericArguments[genericParamIdx];
- if ((genericParamResult != NULL) &&
- (genericParamResult->IsConstExprValue()) &&
- ((resolveFlags & BfResolveTypeRefFlag_AllowGenericMethodParamConstValue) == 0))
- disallowConstExprValue = true;
- }
- }
- }
- }
-
- if ((genericCheckTypeInstance != NULL) && (genericCheckTypeInstance->IsGenericTypeInstance()) && (genericParamResult == NULL))
- {
- auto genericTypeInst = (BfTypeInstance*)genericCheckTypeInstance;
- auto* genericParams = &curTypeDef->mGenericParamDefs;
- if (genericTypeInst->mGenericTypeInfo->mGenericExtensionInfo != NULL)
- {
- auto activeTypeDef = GetActiveTypeDef(NULL, true);
- genericParams = &activeTypeDef->mGenericParamDefs;
- }
- for (int genericParamIdx = (int)genericParams->size() - 1; genericParamIdx >= 0; genericParamIdx--)
- {
- auto checkGenericParamDef = (*genericParams)[genericParamIdx];
- String genericName = checkGenericParamDef->mName;
- if (genericName == findName)
- {
- genericParamDef = checkGenericParamDef;
- if (((genericParamDef->mGenericParamFlags & BfGenericParamFlag_Const) != 0) &&
- ((resolveFlags & BfResolveTypeRefFlag_AllowGenericTypeParamConstValue) == 0))
- disallowConstExprValue = true;
- HandleTypeGenericParamRef(typeRef, curTypeDef, genericParamIdx);
- if ((resolveFlags & BfResolveTypeRefFlag_NoResolveGenericParam) != 0)
- return GetGenericParamType(BfGenericParamKind_Type, genericParamIdx);
- else
- {
- SetAndRestoreValue<BfGetSymbolReferenceKind> prevSymbolRefKind;
- if (mCompiler->mResolvePassData != NULL) // Don't add these typeRefs, they are indirect
- prevSymbolRefKind.Init(mCompiler->mResolvePassData->mGetSymbolReferenceKind, BfGetSymbolReferenceKind_None);
- genericParamResult = genericTypeInst->mGenericTypeInfo->mTypeGenericArguments[genericParamIdx];
- if ((genericParamResult != NULL) &&
- (genericParamResult->IsConstExprValue()) &&
- ((resolveFlags & BfResolveTypeRefFlag_AllowGenericTypeParamConstValue) == 0))
- disallowConstExprValue = true;
- }
- }
- }
- }
- if (genericParamResult != NULL)
- {
- if (disallowConstExprValue)
- {
- Fail("Invalid use of constant generic value", typeRef);
- return ResolveTypeResult(typeRef, NULL, populateType, resolveFlags);
- }
- if (genericParamResult->IsRef())
- {
- if ((resolveFlags & BfResolveTypeRefFlag_AllowRefGeneric) == 0)
- genericParamResult = genericParamResult->GetUnderlyingType();
- }
- return ResolveTypeResult(typeRef, genericParamResult, populateType, (BfResolveTypeRefFlags)(resolveFlags | BfResolveTypeRefFlag_FromIndirectSource));
- }
- }
- }
- BfTypeDef* typeDef = NULL;
-
- if (typeRef->IsNamedTypeReference())
- {
- BfTypeLookupError error;
- error.mRefNode = typeRef;
- typeDef = FindTypeDef(typeRef, contextTypeInstance, &error, 0, resolveFlags);
- if (auto namedTypeRef = BfNodeDynCast<BfNamedTypeReference>(typeRef))
- {
- if (auto qualifiedNameNode = BfNodeDynCast<BfQualifiedNameNode>(namedTypeRef->mNameNode))
- {
- // This handles the case where we have an "BaseClass.InnerClass", but the name is qualified as "DerivedClass.InnerClass"
- auto leftType = ResolveTypeRef(qualifiedNameNode->mLeft, NULL, BfPopulateType_Identity, (BfResolveTypeRefFlags)(resolveFlags | BfResolveTypeRefFlag_NoResolveGenericParam | BfResolveTypeRefFlag_AllowRef));
- if ((leftType != NULL) && (qualifiedNameNode->mRight != NULL))
- {
- // Try searching within inner type
- auto resolvedType = ResolveInnerType(leftType, qualifiedNameNode->mRight, populateType, true);
- if (resolvedType != NULL)
- {
- if (mCurTypeInstance != NULL)
- AddDependency(leftType, mCurTypeInstance, BfDependencyMap::DependencyFlag_NameReference);
- return ResolveTypeResult(typeRef, resolvedType, populateType, resolveFlags);
- }
- }
- }
- }
-
- if ((typeDef == NULL) && (mCurTypeInstance != NULL))
- {
- // Try searching within inner type
- auto checkOuterType = mCurTypeInstance;
- while (checkOuterType != NULL)
- {
- // We check for mBaseType to not be NULL because we can't inherit from an inner type, so don't even search there
- // Causes reference cycles (bad).
- if ((checkOuterType != mCurTypeInstance) || (checkOuterType->mBaseType != NULL))
- {
- auto resolvedType = ResolveInnerType(checkOuterType, typeRef, populateType, true);
- if (resolvedType != NULL)
- {
- if (mCurTypeInstance != NULL)
- AddDependency(checkOuterType, mCurTypeInstance, BfDependencyMap::DependencyFlag_NameReference);
- return ResolveTypeResult(typeRef, resolvedType, populateType, resolveFlags);
- }
- }
- checkOuterType = GetOuterType(checkOuterType);
- }
- }
-
- if (typeDef == NULL)
- {
- auto staticSearch = GetStaticSearch();
- if (staticSearch != NULL)
- {
- for (auto staticTypeInst : staticSearch->mStaticTypes)
- {
- auto resolvedType = ResolveInnerType(staticTypeInst, typeRef, populateType, true);
- if (resolvedType != NULL)
- {
- if (mCurTypeInstance != NULL)
- AddDependency(staticTypeInst, mCurTypeInstance, BfDependencyMap::DependencyFlag_NameReference);
- return ResolveTypeResult(typeRef, resolvedType, populateType, resolveFlags);
- }
- }
- }
- }
- if (typeDef == NULL)
- {
- #ifdef BF_AST_HAS_PARENT_MEMBER
- if (auto parentQualifiedTypeRef = BfNodeDynCast<BfQualifiedTypeReference>(typeRef->mParent))
- {
- BF_ASSERT(typeRef->mParent == mParentNodeEntry->mNode);
- }
- #endif
- if (mParentNodeEntry != NULL)
- {
- if (auto parentQualifiedTypeRef = BfNodeDynCast<BfQualifiedTypeReference>(mParentNodeEntry->mNode))
- {
- if (typeRef == parentQualifiedTypeRef->mLeft)
- {
- if ((resolveFlags & BfResolveTypeRefFlag_IgnoreLookupError) == 0)
- TypeRefNotFound(typeRef);
- return ResolveTypeResult(typeRef, NULL, populateType, resolveFlags);
- }
- }
- }
- if ((resolveFlags & BfResolveTypeRefFlag_IgnoreLookupError) == 0)
- {
- TypeRefNotFound(typeRef, ((resolveFlags & Beefy::BfResolveTypeRefFlag_Attribute) != 0) ? "Attribute" : NULL);
- return ResolveTypeResult(typeRef, NULL, populateType, resolveFlags);
- }
- return NULL;
- }
- }
- else if (auto typeDefTypeRef = BfNodeDynCastExact<BfDirectTypeDefReference>(typeRef))
- {
- typeDef = typeDefTypeRef->mTypeDef;
- }
- if (auto qualifiedTypeRef = BfNodeDynCast<BfQualifiedTypeReference>(typeRef))
- {
- //TODO: Determine why we had this prevIgnoreErrors set here. It causes things like IEnumerator<Hey.Test<INVALIDNAME>> not fail
- // properly on INVALIDNAME
- SetAndRestoreValue<bool> prevIgnoreErrors(mIgnoreErrors, /*true*/mIgnoreErrors);
- StringView leftNameStr;
- BfType* leftType = NULL;
- BfSizedAtomComposite leftComposite;
- bool leftIsValid = false;
- //bool leftIsValid = (qualifiedTypeRef->mLeft != NULL) && mSystem->ParseAtomComposite(qualifiedTypeRef->mLeft->ToString(), leftComposite);
- if (qualifiedTypeRef->mLeft != NULL)
- {
- leftNameStr = qualifiedTypeRef->mLeft->ToStringView();
- if (mSystem->ParseAtomComposite(leftNameStr, leftComposite))
- leftIsValid = true;
- }
- if ((leftIsValid) && (qualifiedTypeRef->mRight != NULL))
- {
- StringT<128> findName;
- auto genericTypeRef = BfNodeDynCast<BfGenericInstanceTypeRef>(qualifiedTypeRef->mRight);
- auto activeTypeDef = GetActiveTypeDef();
- BfProject* bfProject = NULL;
- if (activeTypeDef != NULL)
- bfProject = activeTypeDef->mProject;
- if (mSystem->ContainsNamespace(leftComposite, bfProject))
- {
- qualifiedTypeRef->mLeft->ToString(findName);
- findName.Append('.');
- if (genericTypeRef != NULL)
- genericTypeRef->mElementType->ToString(findName);
- else
- qualifiedTypeRef->mRight->ToString(findName);
- }
- else if ((activeTypeDef != NULL) && (activeTypeDef->mNamespace.EndsWith(leftComposite)))
- {
- // Partial namespace reference, extend to a full reference
- findName += activeTypeDef->mNamespace.ToString();
- findName.Append('.');
- qualifiedTypeRef->mRight->ToString(findName);
- }
- if (!findName.IsEmpty())
- {
- int wantNumGenericArgs = 0;
- #ifdef BF_AST_HAS_PARENT_MEMBER
- if (auto genericTypeParent = BfNodeDynCast<BfGenericInstanceTypeRef>(typeRef->mParent))
- {
- BF_ASSERT(mParentNodeEntry->mNode == genericTypeParent);
- //wantNumGenericArgs = (int)genericTypeParent->mGenericArguments.size();
- //genericTypeRef = genericTypeParent;
- }
- #endif
- if (mParentNodeEntry != NULL)
- {
- if (auto genericTypeParent = BfNodeDynCast<BfGenericInstanceTypeRef>(mParentNodeEntry->mNode))
- {
- wantNumGenericArgs = (int)genericTypeParent->mGenericArguments.size();
- genericTypeRef = genericTypeParent;
- }
- }
- BfTypeDef* ambiguousTypeDef = NULL;
- //auto typeDef = mSystem->FindTypeDef(findName, wantNumGenericArgs, bfProject, {}, &ambiguousTypeDef);
- //auto typeDef = mSystem->FindTypeDef(findName, wantNumGenericArgs, bfProject, {}, &ambiguousTypeDef);
- BfTypeLookupError lookupError;
- auto typeDef = FindTypeDef(findName, wantNumGenericArgs, NULL, &lookupError);
- if (typeDef != NULL)
- {
- if (ambiguousTypeDef != NULL)
- ShowAmbiguousTypeError(typeRef, typeDef, ambiguousTypeDef);
- BfTypeVector genericArgs;
- if (populateType != BfPopulateType_TypeDef)
- {
- if (genericTypeRef != NULL)
- {
- for (auto genericParamTypeRef : genericTypeRef->mGenericArguments)
- {
- auto genericParam = ResolveTypeRef(genericParamTypeRef, NULL, BfPopulateType_Declaration);
- if (genericParam == NULL)
- return ResolveTypeResult(typeRef, NULL, populateType, resolveFlags);
- genericArgs.push_back(genericParam);
- }
- }
- if (typeDef->mGenericParamDefs.size() != genericArgs.size())
- {
- prevIgnoreErrors.Restore();
- BfAstNode* refNode = typeRef;
- if (genericTypeRef != NULL)
- refNode = genericTypeRef->mOpenChevron;
- int wantedGenericParams = (int)typeDef->mGenericParamDefs.size();
- if (wantedGenericParams == 1)
- Fail("Expected one generic argument", refNode);
- else
- Fail(StrFormat("Expected %d generic arguments", wantedGenericParams), refNode);
- return ResolveTypeResult(typeRef, NULL, populateType, resolveFlags);
- }
- }
- return ResolveTypeResult(typeRef, ResolveTypeDef(typeDef, genericArgs, populateType), populateType, resolveFlags);
- }
- }
- }
- if (leftType == NULL)
- {
- BfAutoParentNodeEntry autoParentNodeEntry(this, qualifiedTypeRef);
- leftType = ResolveTypeRef(qualifiedTypeRef->mLeft, BfPopulateType_Identity, (BfResolveTypeRefFlags)(resolveFlags | BfResolveTypeRefFlag_IgnoreLookupError)); // We throw an error below if we can't find the type
- }
-
- if (leftType == NULL)
- {
- mIgnoreErrors = prevIgnoreErrors.mPrevVal;
- BfTypeReference* errorRefNode = qualifiedTypeRef->mLeft;
- if ((leftIsValid) && (mCurTypeInstance != NULL) && (mSystem->ContainsNamespace(leftComposite, curTypeDef->mProject)))
- {
- // The left was a namespace name, so throw an error on the whole string
- errorRefNode = qualifiedTypeRef;
- }
- TypeRefNotFound(errorRefNode);
- return ResolveTypeResult(typeRef, NULL, populateType, resolveFlags);
- }
- prevIgnoreErrors.Restore();
- if (qualifiedTypeRef->mRight == NULL)
- {
- FailAfter("Expected identifier", qualifiedTypeRef->mDot);
- //AssertErrorState();
- return ResolveTypeResult(typeRef, NULL, populateType, resolveFlags);
- }
- if (leftType->IsGenericParam())
- {
- auto genericParam = GetGenericParamInstance((BfGenericParamType*)leftType);
- if ((genericParam->mGenericParamFlags & BfGenericParamFlag_Var) != 0)
- return ResolveTypeResult(typeRef, GetPrimitiveType(BfTypeCode_Var), populateType, resolveFlags);
- if ((genericParam->IsEnum()) && (qualifiedTypeRef->mRight != NULL))
- {
- StringView findNameRight = qualifiedTypeRef->mRight->ToStringView();
- if (findNameRight == "UnderlyingType")
- return ResolveTypeResult(typeRef, GetPrimitiveType(BfTypeCode_Var), populateType, resolveFlags);
- }
- }
- auto resolvedType = ResolveInnerType(leftType, qualifiedTypeRef->mRight, populateType, false, numGenericArgs);
- if ((resolvedType != NULL) && (mCurTypeInstance != NULL))
- AddDependency(leftType, mCurTypeInstance, BfDependencyMap::DependencyFlag_NameReference);
- return ResolveTypeResult(typeRef, resolvedType, populateType, resolveFlags);
- // If we did a ResolveTypeResult, then that may process an alias as the alias-to type instead of the actual alias
- //return ResolveInnerType(leftType, qualifiedTypeRef->mRight, populateType);
- }
- if (auto resolvedTypeRef = BfNodeDynCast<BfResolvedTypeReference>(typeRef))
- {
- return ResolveTypeResult(typeRef, resolvedTypeRef->mType, populateType, resolveFlags);
- }
- if (auto retTypeTypeRef = BfNodeDynCastExact<BfModifiedTypeRef>(typeRef))
- {
- if (retTypeTypeRef->mRetTypeToken->mToken == BfToken_RetType)
- {
- bool allowThrough = false;
- BfType* resolvedType = NULL;
- if (retTypeTypeRef->mElementType != NULL)
- {
- auto innerType = ResolveTypeRef(retTypeTypeRef->mElementType, BfPopulateType_Declaration, BfResolveTypeRefFlag_AllowGenericParamConstValue);
- if (innerType != NULL)
- {
- if ((innerType->IsDelegate()) || (innerType->IsFunction()))
- {
- PopulateType(innerType, BfPopulateType_DataAndMethods);
- BfMethodInstance* invokeMethodInstance = GetRawMethodInstanceAtIdx(innerType->ToTypeInstance(), 0, "Invoke");
- if (invokeMethodInstance != NULL)
- {
- resolvedType = invokeMethodInstance->mReturnType;
- if ((resolvedType != NULL) && (resolvedType->IsRef()))
- resolvedType = resolvedType->GetUnderlyingType();
- return ResolveTypeResult(typeRef, resolvedType, populateType, resolveFlags);
- }
- }
- else if (innerType->IsGenericParam())
- {
- if ((mCurTypeInstance != NULL) && (mCurTypeInstance->IsUnspecializedTypeVariation()))
- {
- // We could have case where we have "rettype(@T0)" and @T0 gets a type variation of @M0, but we can't do a
- // GetGenericParamInstance on that
- allowThrough = true;
- }
- else
- {
- auto genericParamInstance = GetGenericParamInstance((BfGenericParamType*)innerType);
- if (genericParamInstance->mTypeConstraint != NULL)
- {
- if ((genericParamInstance->mTypeConstraint->IsDelegate()) || (genericParamInstance->mTypeConstraint->IsFunction()))
- {
- resolvedType = GetDelegateReturnType(genericParamInstance->mTypeConstraint);
- return ResolveTypeResult(typeRef, resolvedType, populateType, resolveFlags);
- }
- else if ((genericParamInstance->mTypeConstraint->IsInstanceOf(mCompiler->mDelegateTypeDef)) ||
- (genericParamInstance->mTypeConstraint->IsInstanceOf(mCompiler->mFunctionTypeDef)))
- {
- allowThrough = true;
- }
- }
- }
- }
- else if (innerType->IsMethodRef())
- {
- auto methodRefType = (BfMethodRefType*)innerType;
- resolvedType = methodRefType->mMethodRef->mReturnType;
- if ((resolvedType != NULL) && (resolvedType->IsRef()))
- resolvedType = resolvedType->GetUnderlyingType();
- return ResolveTypeResult(typeRef, resolvedType, populateType, resolveFlags);
- }
- }
- }
- if (!allowThrough)
- {
- Fail("'rettype' can only be used on delegate or function types", retTypeTypeRef->mRetTypeToken);
- return ResolveTypeResult(typeRef, resolvedType, populateType, resolveFlags);
- }
- }
- else if (retTypeTypeRef->mRetTypeToken->mToken == BfToken_AllocType)
- {
- BfType* resolvedType = NULL;
- if (retTypeTypeRef->mElementType != NULL)
- {
- resolvedType = ResolveTypeRef(retTypeTypeRef->mElementType, BfPopulateType_Declaration, BfResolveTypeRefFlag_AllowGenericParamConstValue);
- if (resolvedType != NULL)
- {
- if (resolvedType->IsGenericParam())
- {
- auto genericParam = GetGenericParamInstance((BfGenericParamType*)resolvedType);
- if (((genericParam->mTypeConstraint != NULL) && (genericParam->mTypeConstraint->IsValueType())) ||
- ((genericParam->mGenericParamFlags & (BfGenericParamFlag_Struct | BfGenericParamFlag_StructPtr | BfGenericParamFlag_Enum)) != 0))
- {
- resolvedType = CreatePointerType(resolvedType);
- }
- else if (((genericParam->mTypeConstraint != NULL) && (!genericParam->mTypeConstraint->IsValueType())) ||
- ((genericParam->mGenericParamFlags & (BfGenericParamFlag_Class)) != 0))
- {
- // Leave as 'T'
- }
- else
- resolvedType = CreateModifiedTypeType(resolvedType, BfToken_AllocType);
- }
- else if (resolvedType->IsValueType())
- resolvedType = CreatePointerType(resolvedType);
- }
- }
- return ResolveTypeResult(typeRef, resolvedType, populateType, resolveFlags);
- }
- else if (retTypeTypeRef->mRetTypeToken->mToken == BfToken_Nullable)
- {
- bool allowThrough = false;
- BfType* resolvedType = NULL;
- if (retTypeTypeRef->mElementType != NULL)
- {
- resolvedType = ResolveTypeRef(retTypeTypeRef->mElementType, BfPopulateType_Declaration, BfResolveTypeRefFlag_AllowGenericParamConstValue);
- }
- if ((resolvedType != NULL) && (resolvedType->IsGenericParam()))
- {
- //resolvedType = CreateModifiedTypeType(resolvedType, BfToken_Nullable);
- BfTypeVector typeVec;
- typeVec.push_back(resolvedType);
- resolvedType = ResolveTypeDef(mCompiler->mNullableTypeDef, typeVec, BfPopulateType_Declaration);
- }
- else if (resolvedType != NULL)
- {
- if (resolvedType->IsValueType())
- {
- if (InDefinitionSection())
- Warn(0, StrFormat("Consider using '%s?' instead of nullable modifier", TypeToString(resolvedType).c_str()), retTypeTypeRef);
- BfTypeVector typeVec;
- typeVec.push_back(resolvedType);
- resolvedType = ResolveTypeDef(mCompiler->mNullableTypeDef, typeVec, BfPopulateType_Declaration);
- }
- else
- {
- if (InDefinitionSection())
- Warn(0, StrFormat("Unneeded nullable modifier, %s is already nullable", TypeToString(resolvedType).c_str()), retTypeTypeRef->mRetTypeToken);
- }
- }
- if (resolvedType != NULL)
- PopulateType(resolvedType, populateType);
- return resolvedType;
- }
- else
- BFMODULE_FATAL(this, "Unhandled");
- }
- if (auto refTypeRef = BfNodeDynCastExact<BfRefTypeRef>(typeRef))
- {
- if ((refTypeRef->mRefToken != NULL) && (refTypeRef->mRefToken->GetToken() == BfToken_Mut) && (refTypeRef->mElementType != NULL))
- {
- bool needsRefWrap = false;
- auto resolvedType = ResolveTypeRef(refTypeRef->mElementType, BfPopulateType_Identity, BfResolveTypeRefFlag_AllowGenericParamConstValue);
- if (resolvedType != NULL)
- {
- if ((resolvedType->IsValueType()) || (resolvedType->IsGenericParam()))
- needsRefWrap = true;
- if ((InDefinitionSection()) && (!resolvedType->IsGenericParam()) && ((resolveFlags & BfResolveTypeRefFlag_NoWarnOnMut) == 0))
- {
- if (!resolvedType->IsValueType())
- Warn(0, StrFormat("Specified 'mut' has no effect on '%s' since reference types are always mutable", TypeToString(resolvedType).c_str()), refTypeRef->mRefToken);
- else
- Warn(0, "Use 'mut' for generic arguments which may or may not be reference types. Consider using 'ref' here, instead.", refTypeRef->mRefToken);
- }
- }
- if (!needsRefWrap)
- {
- // Non-composites (including pointers) don't actually need ref-wrapping for 'mut'
- return ResolveTypeResult(typeRef, resolvedType, populateType, resolveFlags);
- }
- }
- }
- static int sCallIdx = 0;
- int callIdx = sCallIdx++;
- if (callIdx == 0x00006CA4)
- {
- NOP;
- }
- BfResolvedTypeSet::LookupContext lookupCtx;
- lookupCtx.mResolveFlags = (BfResolveTypeRefFlags)(resolveFlags & (BfResolveTypeRefFlag_NoCreate | BfResolveTypeRefFlag_IgnoreLookupError |
- BfResolveTypeRefFlag_DisallowComptime | BfResolveTypeRefFlag_AllowInferredSizedArray | BfResolveTypeRefFlag_Attribute));
- lookupCtx.mRootTypeRef = typeRef;
- lookupCtx.mRootTypeDef = typeDef;
- lookupCtx.mModule = this;
- BfResolvedTypeSet::Entry* resolvedEntry = NULL;
- if (auto delegateTypeRef = BfNodeDynCastExact<BfDelegateTypeRef>(typeRef))
- GetDelegateTypeRefAttributes(delegateTypeRef, lookupCtx.mCallingConvention);
- auto inserted = mContext->mResolvedTypes.Insert(typeRef, &lookupCtx, &resolvedEntry);
- if (resolvedEntry == NULL)
- {
- if (lookupCtx.mHadVar)
- return ResolveTypeResult(typeRef, GetPrimitiveType(BfTypeCode_Var), populateType, resolveFlags);
- return ResolveTypeResult(typeRef, NULL, populateType, resolveFlags);
- }
- if (!inserted)
- {
- BF_ASSERT(resolvedEntry->mValue != NULL);
- BF_ASSERT(!resolvedEntry->mValue->IsDeleting());
- return ResolveTypeResult(typeRef, resolvedEntry->mValue, populateType, resolveFlags);
- }
- if ((resolveFlags & BfResolveTypeRefFlag_NoCreate) != 0)
- {
- mContext->mResolvedTypes.RemoveEntry(resolvedEntry);
- return ResolveTypeResult(typeRef, NULL, populateType, resolveFlags);
- }
- BfModule* populateModule = this;
- if ((resolveFlags & BfResolveTypeRefFlag_NoReify) != 0)
- populateModule = mContext->mUnreifiedModule;
- if (typeRef->IsTypeDefTypeReference())
- {
- //BF_ASSERT(typeDefTypeRef->mTypeDef != NULL); // Resolved higher up
- //auto typeDef = typeDefTypeRef->mTypeDef;
- if ((typeDef->mTypeCode >= BfTypeCode_None) && (typeDef->mTypeCode <= BfTypeCode_Double))
- {
- BfPrimitiveType* primType = new BfPrimitiveType();
- primType->mTypeDef = typeDef;
- resolvedEntry->mValue = primType;
- BF_ASSERT(BfResolvedTypeSet::Hash(primType, &lookupCtx, false) == resolvedEntry->mHash);
- populateModule->InitType(primType, populateType);
- return ResolveTypeResult(typeRef, primType, populateType, resolveFlags);
- }
- BfTypeInstance* outerTypeInstance = lookupCtx.mRootOuterTypeInstance;
- if (outerTypeInstance == NULL)
- outerTypeInstance = mCurTypeInstance;
- if ((outerTypeInstance != NULL) && (typeDef->mGenericParamDefs.size() != 0))
- {
- // Try to inherit generic params from current parent
-
- BfTypeDef* outerType = mSystem->GetCombinedPartial(typeDef->mOuterType);
- BF_ASSERT(!outerType->mIsPartial);
- if (TypeHasParentOrEquals(outerTypeInstance->mTypeDef, outerType))
- {
- BfType* checkCurType = outerTypeInstance;
- if (checkCurType->IsBoxed())
- checkCurType = checkCurType->GetUnderlyingType();
- if (checkCurType->IsTypeAlias())
- checkCurType = GetOuterType(checkCurType);
- BF_ASSERT(checkCurType->IsGenericTypeInstance());
- int numParentGenericParams = (int)outerType->mGenericParamDefs.size();
- int wantedGenericParams = (int)typeDef->mGenericParamDefs.size() - numParentGenericParams;
- if (wantedGenericParams != 0)
- {
- if (wantedGenericParams == 1)
- Fail("Expected generic argument", typeRef);
- else
- Fail(StrFormat("Expected %d generic arguments", wantedGenericParams), typeRef);
- mContext->mResolvedTypes.RemoveEntry(resolvedEntry);
- return ResolveTypeResult(typeRef, NULL, populateType, resolveFlags);
- }
- auto parentGenericTypeInstance = (BfTypeInstance*)checkCurType;
- BfTypeInstance* genericTypeInst;
- if (typeDef->mTypeCode == BfTypeCode_TypeAlias)
- {
- auto typeAliasType = new BfTypeAliasType();
- genericTypeInst = typeAliasType;
- }
- else
- genericTypeInst = new BfTypeInstance();
- genericTypeInst->mGenericTypeInfo = new BfGenericTypeInfo();
- genericTypeInst->mTypeDef = typeDef;
- if (parentGenericTypeInstance->mGenericTypeInfo->mGenericParams.IsEmpty())
- PopulateType(parentGenericTypeInstance, BfPopulateType_Declaration);
- for (int i = 0; i < numParentGenericParams; i++)
- {
- genericTypeInst->mGenericTypeInfo->mGenericParams.push_back(parentGenericTypeInstance->mGenericTypeInfo->mGenericParams[i]->AddRef());
- genericTypeInst->mGenericTypeInfo->mTypeGenericArguments.push_back(parentGenericTypeInstance->mGenericTypeInfo->mTypeGenericArguments[i]);
- }
- CheckUnspecializedGenericType(genericTypeInst, populateType);
- resolvedEntry->mValue = genericTypeInst;
- populateModule->InitType(genericTypeInst, populateType);
- #ifdef _DEBUG
- if (BfResolvedTypeSet::Hash(genericTypeInst, &lookupCtx) != resolvedEntry->mHash)
- {
- int refHash = BfResolvedTypeSet::Hash(typeRef, &lookupCtx);
- int typeHash = BfResolvedTypeSet::Hash(genericTypeInst, &lookupCtx);
- BF_ASSERT(refHash == typeHash);
- }
- #endif
- return ResolveTypeResult(typeRef, genericTypeInst, populateType, resolveFlags);
- }
- }
- BfTypeInstance* typeInst;
- if (typeDef->mTypeCode == BfTypeCode_TypeAlias)
- {
- auto typeAliasType = new BfTypeAliasType();
- typeInst = typeAliasType;
- }
- else
- {
- typeInst = new BfTypeInstance();
- }
- typeInst->mTypeDef = typeDef;
- if (((resolveFlags & BfResolveTypeRefFlag_NoReify) != 0) && (mCompiler->mOptions.mCompileOnDemandKind != BfCompileOnDemandKind_AlwaysInclude))
- {
- typeInst->mIsReified = false;
- }
- if (typeInst->mTypeDef->mGenericParamDefs.size() != 0)
- {
- Fail("Generic type arguments expected", typeRef);
- delete typeInst;
- mContext->mResolvedTypes.RemoveEntry(resolvedEntry);
- return ResolveTypeResult(typeRef, NULL, populateType, resolveFlags);
- }
- resolvedEntry->mValue = typeInst;
- #ifdef _DEBUG
- int typeRefash = BfResolvedTypeSet::Hash(typeRef, &lookupCtx);
- #endif
- populateModule->InitType(typeInst, populateType);
-
- if (BfResolvedTypeSet::Hash(typeInst, &lookupCtx) != resolvedEntry->mHash)
- {
- int refHash = BfResolvedTypeSet::Hash(typeRef, &lookupCtx);
- int typeHash = BfResolvedTypeSet::Hash(typeInst, &lookupCtx);
- BF_ASSERT(refHash == typeHash);
- }
- {
- BF_ASSERT(BfResolvedTypeSet::Hash(typeInst, &lookupCtx) == resolvedEntry->mHash);
- }
- return ResolveTypeResult(typeRef, typeInst, populateType, resolveFlags);
- }
- else if (auto arrayTypeRef = BfNodeDynCast<BfArrayTypeRef>(typeRef))
- {
- if (arrayTypeRef->mDimensions > 4)
- {
- Fail("Too many array dimensions, consider using a jagged array.", arrayTypeRef);
- mContext->mResolvedTypes.RemoveEntry(resolvedEntry);
- return ResolveTypeResult(typeRef, NULL, populateType, resolveFlags);
- }
- auto elementType = ResolveTypeRef(arrayTypeRef->mElementType, BfPopulateType_Declaration, BfResolveTypeRefFlag_AllowGenericParamConstValue);
- auto arrayTypeDef = mCompiler->GetArrayTypeDef(arrayTypeRef->mDimensions);
- if ((elementType == NULL) || (arrayTypeDef == NULL))
- {
- mContext->mResolvedTypes.RemoveEntry(resolvedEntry);
- return ResolveTypeResult(typeRef, NULL, populateType, resolveFlags);
- }
-
- if ((arrayTypeRef->mDimensions == 1) && (arrayTypeRef->mParams.size() == 1))
- {
- intptr elementCount = -1;
- BfExpression* sizeExpr = BfNodeDynCast<BfExpression>(arrayTypeRef->mParams[0]);
- BF_ASSERT(sizeExpr != NULL);
- if (sizeExpr != NULL)
- {
- BfConstResolver constResolver(this);
- BfType* intType = GetPrimitiveType(BfTypeCode_IntPtr);
- constResolver.mExpectingType = intType;
- constResolver.mAllowGenericConstValue = true;
- BfTypedValue typedVal;
- {
- SetAndRestoreValue<bool> prevIgnoreErrors(mIgnoreErrors, true);
- typedVal = constResolver.Resolve(sizeExpr, NULL, BfConstResolveFlag_ArrayInitSize);
- }
- if (typedVal.mKind == BfTypedValueKind_GenericConstValue)
- {
- BfUnknownSizedArrayType* arrayType = new BfUnknownSizedArrayType();
- arrayType->mContext = mContext;
- arrayType->mElementType = elementType;
- arrayType->mElementCount = -1;
- arrayType->mElementCountSource = typedVal.mType;
- resolvedEntry->mValue = arrayType;
- BF_ASSERT(BfResolvedTypeSet::Hash(arrayType, &lookupCtx) == resolvedEntry->mHash);
- populateModule->InitType(arrayType, populateType);
- return ResolveTypeResult(typeRef, arrayType, populateType, resolveFlags);
- }
- if (typedVal)
- typedVal = Cast(sizeExpr, typedVal, intType);
- if (typedVal)
- {
- auto constant = mBfIRBuilder->GetConstant(typedVal.mValue);
- if (constant != NULL)
- {
- if (constant->mConstType == BfConstType_Undef)
- elementCount = -1; // Undef marker
- else if (BfIRBuilder::IsInt(constant->mTypeCode))
- elementCount = (intptr)constant->mInt64;
- }
- }
- }
- /*if (elementCount < 0)
- {
- Fail(StrFormat("Array length '%d' is illegal", elementCount), arrayTypeRef->mParams[0]);
- mContext->mResolvedTypes.RemoveEntry(resolvedEntry);
- return CreateSizedArrayType(elementType, 0);
- }*/
- BfSizedArrayType* arrayType = new BfSizedArrayType();
- arrayType->mContext = mContext;
- arrayType->mElementType = elementType;
- arrayType->mElementCount = elementCount;
- arrayType->mWantsGCMarking = false; // Fill in in InitType
- arrayType->mGenericDepth = elementType->GetGenericDepth() + 1;
- resolvedEntry->mValue = arrayType;
- BF_ASSERT(BfResolvedTypeSet::Hash(arrayType, &lookupCtx) == resolvedEntry->mHash);
- populateModule->InitType(arrayType, populateType);
- return ResolveTypeResult(typeRef, arrayType, populateType, resolveFlags);
- }
- BfArrayType* arrayType = new BfArrayType();
- arrayType->mGenericTypeInfo = new BfGenericTypeInfo();
- arrayType->mContext = mContext;
- arrayType->mDimensions = arrayTypeRef->mDimensions;
- arrayType->mTypeDef = arrayTypeDef;
- arrayType->mGenericTypeInfo->mTypeGenericArguments.push_back(elementType);
- resolvedEntry->mValue = arrayType;
- CheckUnspecializedGenericType(arrayType, populateType);
- BF_ASSERT(BfResolvedTypeSet::Hash(arrayType, &lookupCtx) == resolvedEntry->mHash);
- populateModule->InitType(arrayType, populateType);
- return ResolveTypeResult(typeRef, arrayType, populateType, resolveFlags);
- }
- else if (auto genericTypeInstRef = BfNodeDynCast<BfGenericInstanceTypeRef>(typeRef))
- {
- int wantNumGenericParams = genericTypeInstRef->GetGenericArgCount();
- BfTypeDef* ambiguousTypeDef = NULL;
- Array<BfAstNode*> genericArguments;
- std::function<void(BfTypeReference*)> _GetTypeRefs = [&](BfTypeReference* typeRef)
- {
- //TODO:GENERICS
- if (auto elementedTypeRef = BfNodeDynCast<BfElementedTypeRef>(typeRef))
- {
- _GetTypeRefs(elementedTypeRef->mElementType);
- }
- else if (auto qualifiedTypeRef = BfNodeDynCast<BfQualifiedTypeReference>(typeRef))
- {
- _GetTypeRefs(qualifiedTypeRef->mLeft);
- }
- if (auto genericTypeRef = BfNodeDynCast<BfGenericInstanceTypeRef>(typeRef))
- {
- for (auto genericArg : genericTypeRef->mGenericArguments)
- genericArguments.push_back(genericArg);
- }
- };
- _GetTypeRefs(genericTypeInstRef);
- BfTypeVector genericArgs;
- BfType* type = NULL;
- BfTypeDef* typeDef = ResolveGenericInstanceDef(genericTypeInstRef, &type, resolveFlags);
- if(ambiguousTypeDef != NULL)
- ShowAmbiguousTypeError(typeRef, typeDef, ambiguousTypeDef);
- if (typeDef == NULL)
- {
- Fail("Unable to resolve type", typeRef);
- mContext->mResolvedTypes.RemoveEntry(resolvedEntry);
- return ResolveTypeResult(typeRef, NULL, populateType, resolveFlags);
- }
-
- BfTypeInstance* outerTypeInstance = mCurTypeInstance;
-
- auto outerType = typeDef->mOuterType;
- BfTypeDef* commonOuterType = NULL;
- int startDefGenericParamIdx = 0;
- commonOuterType = BfResolvedTypeSet::FindRootCommonOuterType(outerType, &lookupCtx, outerTypeInstance);
- if ((commonOuterType) && (outerTypeInstance->IsGenericTypeInstance()))
- {
- startDefGenericParamIdx = (int)commonOuterType->mGenericParamDefs.size();
- auto parentTypeInstance = outerTypeInstance;
- if (parentTypeInstance->IsTypeAlias())
- parentTypeInstance = (BfTypeInstance*)GetOuterType(parentTypeInstance)->ToTypeInstance();
- for (int i = 0; i < startDefGenericParamIdx; i++)
- genericArgs.push_back(parentTypeInstance->mGenericTypeInfo->mTypeGenericArguments[i]);
- }
- for (auto genericArgRef : genericArguments)
- {
- BfType* genericArg = NULL;
- lookupCtx.mResolvedTypeMap.TryGetValue(genericArgRef, &genericArg);
- if (genericArg == NULL)
- genericArg = ResolveTypeRef(genericArgRef, NULL, BfPopulateType_Identity, (BfResolveTypeRefFlags)(BfResolveTypeRefFlag_AllowGenericTypeParamConstValue | BfResolveTypeRefFlag_AllowGenericMethodParamConstValue));
- if ((genericArg == NULL) || (genericArg->IsVar()))
- {
- mContext->mResolvedTypes.RemoveEntry(resolvedEntry);
- return ResolveTypeResult(typeRef, ((genericArg != NULL) && (genericArg->IsVar())) ? genericArg : NULL, populateType, resolveFlags);
- }
- genericArgs.Add(genericArg);
- }
- BfTypeInstance* genericTypeInst;
- if ((type != NULL) &&
- ((type->IsDelegateFromTypeRef()) || (type->IsFunctionFromTypeRef())))
- {
- mContext->mResolvedTypes.RemoveEntry(resolvedEntry);
- return ResolveGenericType(type, &genericArgs, NULL);
- }
- else if ((type != NULL) && (type->IsTuple()))
- {
- mContext->mResolvedTypes.RemoveEntry(resolvedEntry);
- return ResolveGenericType(type, &genericArgs, NULL);
- }
- else if ((typeDef != NULL) && (typeDef->mTypeCode == BfTypeCode_TypeAlias))
- {
- auto typeAliasType = new BfTypeAliasType();
- genericTypeInst = typeAliasType;
- }
- else
- genericTypeInst = new BfTypeInstance();
- genericTypeInst->mContext = mContext;
- genericTypeInst->mGenericTypeInfo = new BfGenericTypeInfo();
- BF_ASSERT(typeDef->mDefState != BfTypeDef::DefState_Deleted);
- int genericParamCount = (int)typeDef->mGenericParamDefs.size();
- if ((type != NULL) && (type->IsGenericTypeInstance()))
- {
- // Is a generic type for sure...
- // We need this case for generic methods
- genericParamCount = (int)((BfTypeInstance*)type)->mGenericTypeInfo->mTypeGenericArguments.size();
- }
- else if (typeDef->mGenericParamDefs.size() == 0)
- {
- Fail("Not a generic type", typeRef);
- delete genericTypeInst;
- mContext->mResolvedTypes.RemoveEntry(resolvedEntry);
- return ResolveTypeResult(typeRef, NULL, populateType, resolveFlags);
- }
-
- genericTypeInst->mTypeDef = typeDef;
- if (commonOuterType != NULL)
- {
- auto parentTypeInstance = outerTypeInstance;
- if ((parentTypeInstance != NULL) && (parentTypeInstance->IsTypeAlias()))
- parentTypeInstance = (BfTypeInstance*)GetOuterType(parentTypeInstance)->ToTypeInstance();
- if ((parentTypeInstance != NULL) && (parentTypeInstance->IsGenericTypeInstance()))
- {
- genericTypeInst->mGenericTypeInfo->mMaxGenericDepth = BF_MAX(genericTypeInst->mGenericTypeInfo->mMaxGenericDepth, parentTypeInstance->mGenericTypeInfo->mMaxGenericDepth);
- for (int i = 0; i < startDefGenericParamIdx; i++)
- {
- genericTypeInst->mGenericTypeInfo->mGenericParams.push_back(parentTypeInstance->mGenericTypeInfo->mGenericParams[i]->AddRef());
- genericTypeInst->mGenericTypeInfo->mTypeGenericArguments.push_back(parentTypeInstance->mGenericTypeInfo->mTypeGenericArguments[i]);
- auto typeGenericArg = genericTypeInst->mGenericTypeInfo->mTypeGenericArguments[i];
- genericTypeInst->mGenericTypeInfo->mIsUnspecialized |= typeGenericArg->IsGenericParam() || typeGenericArg->IsUnspecializedType();
- }
- }
- }
- int wantedGenericParams = genericParamCount - startDefGenericParamIdx;
- int genericArgDiffCount = (int)genericArguments.size() - wantedGenericParams;
- if (genericArgDiffCount != 0)
- {
- int innerWantedGenericParams = genericParamCount;
- if (typeDef->mOuterType != NULL)
- innerWantedGenericParams -= (int)typeDef->mOuterType->mGenericParamDefs.size();
- ShowGenericArgCountError(genericTypeInstRef, innerWantedGenericParams);
- delete genericTypeInst;
- mContext->mResolvedTypes.RemoveEntry(resolvedEntry);
- return ResolveTypeResult(typeRef, NULL, populateType, resolveFlags);
- }
- int genericParamIdx = 0;
- for (auto genericArgRef : genericArguments)
- {
- auto genericArg = genericArgs[genericParamIdx + startDefGenericParamIdx];
-
- genericTypeInst->mGenericTypeInfo->mMaxGenericDepth = BF_MAX(genericTypeInst->mGenericTypeInfo->mMaxGenericDepth, genericArg->GetGenericDepth() + 1);
- genericTypeInst->mGenericTypeInfo->mTypeGenericArguments.push_back(genericArg);
- genericTypeInst->mGenericTypeInfo->mTypeGenericArgumentRefs.push_back(genericArgRef);
- genericParamIdx++;
- }
- if (genericTypeInst->mGenericTypeInfo->mMaxGenericDepth > 64)
- {
- Fail("Maximum generic depth exceeded", typeRef);
- delete genericTypeInst;
- mContext->mResolvedTypes.RemoveEntry(resolvedEntry);
- return ResolveTypeResult(typeRef, NULL, populateType, resolveFlags);
- }
- resolvedEntry->mValue = genericTypeInst;
-
- CheckUnspecializedGenericType(genericTypeInst, populateType);
- populateModule->InitType(genericTypeInst, populateType);
- #ifdef _DEBUG
- if (BfResolvedTypeSet::Hash(genericTypeInst, &lookupCtx) != resolvedEntry->mHash)
- {
- int refHash = BfResolvedTypeSet::Hash(typeRef, &lookupCtx);
- int typeHash = BfResolvedTypeSet::Hash(genericTypeInst, &lookupCtx);
- BF_ASSERT(refHash == typeHash);
- }
- if (!BfResolvedTypeSet::Equals(genericTypeInst, typeRef, &lookupCtx))
- {
- BF_ASSERT(BfResolvedTypeSet::Equals(genericTypeInst, typeRef, &lookupCtx));
- }
- BfLogSysM("Generic type %p typeHash: %8X\n", genericTypeInst, resolvedEntry->mHash);
- #endif
- BF_ASSERT(BfResolvedTypeSet::Hash(genericTypeInst, &lookupCtx) == resolvedEntry->mHash);
- return ResolveTypeResult(typeRef, genericTypeInst, populateType, resolveFlags);
- }
- else if (auto tupleTypeRef = BfNodeDynCast<BfTupleTypeRef>(typeRef))
- {
- Array<BfType*> types;
- Array<String> names;
- bool wantGeneric = false;
- bool isUnspecialized = false;
- for (int fieldIdx = 0; fieldIdx < (int)tupleTypeRef->mFieldTypes.size(); fieldIdx++)
- {
- BfTypeReference* typeRef = tupleTypeRef->mFieldTypes[fieldIdx];
- auto type = ResolveTypeRef(typeRef, BfPopulateType_Identity, BfResolveTypeRefFlag_AllowGenericParamConstValue);
- if (type == NULL)
- {
- mContext->mResolvedTypes.RemoveEntry(resolvedEntry);
- return ResolveTypeResult(typeRef, NULL, populateType, resolveFlags);
- }
- String fieldName;
- BfIdentifierNode* identifierNode = NULL;
- if (fieldIdx < (int)tupleTypeRef->mFieldNames.size())
- identifierNode = tupleTypeRef->mFieldNames[fieldIdx];
- if (identifierNode != NULL)
- fieldName = identifierNode->ToString();
- else
- fieldName = StrFormat("%d", fieldIdx);
- if (type->IsTypeGenericParam())
- wantGeneric = true;
- if (type->IsUnspecializedType())
- isUnspecialized = true;
- if (type->IsVar())
- {
- mContext->mResolvedTypes.RemoveEntry(resolvedEntry);
- return ResolveTypeResult(typeRef, NULL, populateType, resolveFlags);
- }
- types.push_back(type);
- names.push_back(fieldName);
- }
- if ((mCurTypeInstance == NULL) || (!mCurTypeInstance->IsGenericTypeInstance()))
- wantGeneric = false;
- //TODO:
- wantGeneric = false;
- auto baseType = (BfTypeInstance*)ResolveTypeDef(mContext->mCompiler->mValueTypeTypeDef, BfPopulateType_Identity);
- BfTupleType* tupleType = NULL;
- if (wantGeneric)
- {
- BfTupleType* actualTupleType = new BfTupleType();
- actualTupleType->mGenericTypeInfo = new BfGenericTypeInfo();
- actualTupleType->mGenericTypeInfo->mFinishedGenericParams = true;
- actualTupleType->Init(baseType->mTypeDef->mProject, baseType);
- for (int fieldIdx = 0; fieldIdx < (int)types.size(); fieldIdx++)
- {
- BfFieldDef* fieldDef = actualTupleType->AddField(names[fieldIdx]);
- fieldDef->mProtection = (names[fieldIdx][0] == '_') ? BfProtection_Private : BfProtection_Public;
- }
- actualTupleType->Finish();
- auto parentTypeInstance = (BfTypeInstance*)mCurTypeInstance;
- for (int i = 0; i < parentTypeInstance->mGenericTypeInfo->mGenericParams.size(); i++)
- {
- actualTupleType->mGenericTypeInfo->mGenericParams.push_back(parentTypeInstance->mGenericTypeInfo->mGenericParams[i]->AddRef());
- }
- for (int i = 0; i < parentTypeInstance->mGenericTypeInfo->mTypeGenericArguments.size(); i++)
- {
- actualTupleType->mGenericTypeInfo->mTypeGenericArguments.push_back(parentTypeInstance->mGenericTypeInfo->mTypeGenericArguments[i]);
- auto typeGenericArg = actualTupleType->mGenericTypeInfo->mTypeGenericArguments[i];
- actualTupleType->mGenericTypeInfo->mIsUnspecialized |= typeGenericArg->IsGenericParam() || typeGenericArg->IsUnspecializedType();
- }
- CheckUnspecializedGenericType(actualTupleType, populateType);
- if (isUnspecialized)
- {
- actualTupleType->mGenericTypeInfo->mIsUnspecialized = true;
- actualTupleType->mGenericTypeInfo->mIsUnspecializedVariation = true;
- }
- actualTupleType->mIsUnspecializedType = actualTupleType->mGenericTypeInfo->mIsUnspecialized;
- actualTupleType->mIsUnspecializedTypeVariation = actualTupleType->mGenericTypeInfo->mIsUnspecializedVariation;
- tupleType = actualTupleType;
- }
- else
- {
- BfTupleType* actualTupleType = new BfTupleType();
- actualTupleType->Init(baseType->mTypeDef->mProject, baseType);
- for (int fieldIdx = 0; fieldIdx < (int)types.size(); fieldIdx++)
- {
- BfFieldDef* fieldDef = actualTupleType->AddField(names[fieldIdx]);
- fieldDef->mProtection = (names[fieldIdx][0] == '_') ? BfProtection_Private : BfProtection_Public;
- }
- actualTupleType->Finish();
- tupleType = actualTupleType;
- actualTupleType->mIsUnspecializedType = isUnspecialized;
- actualTupleType->mIsUnspecializedTypeVariation = isUnspecialized;
- }
- tupleType->mFieldInstances.Resize(types.size());
- for (int fieldIdx = 0; fieldIdx < (int)types.size(); fieldIdx++)
- {
- BfFieldInstance* fieldInstance = &tupleType->mFieldInstances[fieldIdx];
- fieldInstance->mFieldIdx = fieldIdx;
- fieldInstance->SetResolvedType(types[fieldIdx]);
- BF_ASSERT(!types[fieldIdx]->IsVar());
- fieldInstance->mOwner = tupleType;
- tupleType->mGenericDepth = BF_MAX(tupleType->mGenericDepth, fieldInstance->mResolvedType->GetGenericDepth() + 1);
- }
-
- resolvedEntry->mValue = tupleType;
- BF_ASSERT(BfResolvedTypeSet::Hash(tupleType, &lookupCtx) == resolvedEntry->mHash);
- populateModule->InitType(tupleType, populateType);
- return ResolveTypeResult(typeRef, tupleType, populateType, resolveFlags);
- }
- else if (auto nullableTypeRef = BfNodeDynCast<BfNullableTypeRef>(typeRef))
- {
- BfTypeReference* elementTypeRef = nullableTypeRef->mElementType;
- auto typeDef = mCompiler->mNullableTypeDef;
- auto elementType = ResolveTypeRef(elementTypeRef, BfPopulateType_Declaration, BfResolveTypeRefFlag_AllowGenericParamConstValue);
- if ((elementType == NULL) || (elementType->IsVar()))
- {
- mContext->mResolvedTypes.RemoveEntry(resolvedEntry);
- return ResolveTypeResult(typeRef, elementType, populateType, resolveFlags);
- }
- BfTypeInstance* genericTypeInst = new BfTypeInstance();
- genericTypeInst->mGenericTypeInfo = new BfGenericTypeInfo();
- genericTypeInst->mContext = mContext;
- genericTypeInst->mTypeDef = typeDef;
- auto genericParamInstance = new BfGenericTypeParamInstance(typeDef, 0);
- genericTypeInst->mGenericTypeInfo->mGenericParams.push_back(genericParamInstance);
- genericTypeInst->mGenericTypeInfo->mTypeGenericArguments.push_back(elementType);
- //genericTypeInst->mIsUnspecialized = elementType->IsGenericParam() || elementType->IsUnspecializedType();
- CheckUnspecializedGenericType(genericTypeInst, populateType);
- resolvedEntry->mValue = genericTypeInst;
- #ifdef _DEBUG
- if (BfResolvedTypeSet::Hash(genericTypeInst, &lookupCtx) != resolvedEntry->mHash)
- {
- int refHash = BfResolvedTypeSet::Hash(typeRef, &lookupCtx);
- int typeHash = BfResolvedTypeSet::Hash(genericTypeInst, &lookupCtx);
- BF_ASSERT(refHash == typeHash);
- }
- #endif
- populateModule->InitType(genericTypeInst, populateType);
- return ResolveTypeResult(typeRef, genericTypeInst, populateType, resolveFlags);
- }
- else if (auto pointerTypeRef = BfNodeDynCast<BfPointerTypeRef>(typeRef))
- {
- BfPointerType* pointerType = new BfPointerType();
- auto elementType = ResolveTypeRef(pointerTypeRef->mElementType, BfPopulateType_Declaration, BfResolveTypeRefFlag_AllowGenericParamConstValue);
- if ((elementType == NULL) || (elementType->IsVar()))
- {
- delete pointerType;
- mContext->mResolvedTypes.RemoveEntry(resolvedEntry);
- return ResolveTypeResult(typeRef, elementType, populateType, resolveFlags);
- }
- pointerType->mGenericDepth = elementType->GetGenericDepth() + 1;
- pointerType->mElementType = elementType;
- pointerType->mContext = mContext;
- resolvedEntry->mValue = pointerType;
- //int hashVal = mContext->mResolvedTypes.Hash(typeRef, &lookupCtx);
- BF_ASSERT(BfResolvedTypeSet::Hash(pointerType, &lookupCtx) == resolvedEntry->mHash);
- populateModule->InitType(pointerType, populateType);
- return ResolveTypeResult(typeRef, pointerType, populateType, resolveFlags);
- }
- else if (auto refTypeRef = BfNodeDynCast<BfRefTypeRef>(typeRef))
- {
- BfRefType* refType = new BfRefType();
- refType->mRefKind = BfRefType::RefKind_Ref;
- if (refTypeRef->mRefToken == NULL)
- refType->mRefKind = BfRefType::RefKind_Ref;
- else if (refTypeRef->mRefToken->GetToken() == BfToken_In)
- refType->mRefKind = BfRefType::RefKind_In;
- else if (refTypeRef->mRefToken->GetToken() == BfToken_Out)
- refType->mRefKind = BfRefType::RefKind_Out;
- else if (refTypeRef->mRefToken->GetToken() == BfToken_Mut)
- refType->mRefKind = BfRefType::RefKind_Mut;
- auto elementType = ResolveTypeRef(refTypeRef->mElementType, BfPopulateType_Declaration, BfResolveTypeRefFlag_AllowGenericParamConstValue);
- if ((elementType == NULL) || (elementType->IsVar()))
- {
- delete refType;
- mContext->mResolvedTypes.RemoveEntry(resolvedEntry);
- return ResolveTypeResult(typeRef, elementType, populateType, resolveFlags);
- }
- refType->mElementType = elementType;
- resolvedEntry->mValue = refType;
-
- #ifdef _DEBUG
- if (BfResolvedTypeSet::Hash(refType, &lookupCtx) != resolvedEntry->mHash)
- {
- int refHash = BfResolvedTypeSet::Hash(typeRef, &lookupCtx, BfResolvedTypeSet::BfHashFlag_AllowRef);
- int typeHash = BfResolvedTypeSet::Hash(refType, &lookupCtx);
- BF_ASSERT(refHash == typeHash);
- }
- BF_ASSERT(BfResolvedTypeSet::Equals(refType, typeRef, &lookupCtx));
- #endif
- populateModule->InitType(refType, populateType);
- return ResolveTypeResult(typeRef, refType, populateType, resolveFlags);
- }
- else if (auto delegateTypeRef = BfNodeDynCast<BfDelegateTypeRef>(typeRef))
- {
- bool wantGeneric = false;
- bool isUnspecialized = false;
- auto _CheckType = [&](BfType* type)
- {
- if (type->IsTypeGenericParam())
- wantGeneric = true;
- if (type->IsUnspecializedType())
- isUnspecialized = true;
- };
- bool failed = false;
- auto returnType = ResolveTypeRef(delegateTypeRef->mReturnType, NULL, BfPopulateType_Declaration, BfResolveTypeRefFlag_AllowRef);
- if (returnType == NULL)
- {
- failed = true;
- returnType = GetPrimitiveType(BfTypeCode_Var);
- }
- _CheckType(returnType);
- BfType* functionThisType = NULL;
- bool hasMutSpecifier = false;
- bool isFirst = true;
- bool isDelegate = delegateTypeRef->mTypeToken->GetToken() == BfToken_Delegate;
- bool hasVarArgs = false;
- Array<BfType*> paramTypes;
- for (int paramIdx = 0; paramIdx < delegateTypeRef->mParams.size(); paramIdx++)
- {
- auto param = delegateTypeRef->mParams[paramIdx];
- BfResolveTypeRefFlags resolveTypeFlags = BfResolveTypeRefFlag_AllowRef;
- if ((param->mNameNode != NULL) && (param->mNameNode->Equals("this")))
- resolveTypeFlags = (BfResolveTypeRefFlags)(resolveTypeFlags | BfResolveTypeRefFlag_NoWarnOnMut);
- if (paramIdx == delegateTypeRef->mParams.size() - 1)
- {
- if (auto dotTypeRef = BfNodeDynCast<BfDotTypeReference>(param->mTypeRef))
- {
- if (dotTypeRef->mDotToken->mToken == BfToken_DotDotDot)
- {
- hasVarArgs = true;
- continue;
- }
- }
- }
- auto paramType = ResolveTypeRef(param->mTypeRef, BfPopulateType_Declaration, resolveTypeFlags);
- if (paramType == NULL)
- {
- failed = true;
- paramType = GetPrimitiveType(BfTypeCode_Var);
- }
- if ((!isDelegate) && (isFirst) && (param->mNameNode != NULL) && (param->mNameNode->Equals("this")))
- {
- functionThisType = paramType;
- if (functionThisType->IsRef())
- {
- auto refType = (BfRefType*)functionThisType;
- if (refType->mRefKind != BfRefType::RefKind_Mut)
- {
- if (auto refTypeRef = BfNodeDynCast<BfRefTypeRef>(param->mTypeRef))
- {
- failed = true;
- Fail("Only 'mut' is allowed here", refTypeRef->mRefToken);
- }
- }
- hasMutSpecifier = true;
- functionThisType = refType->mElementType;
- }
- paramTypes.Add(functionThisType);
- _CheckType(functionThisType);
- }
- else
- {
- paramTypes.Add(paramType);
- _CheckType(paramType);
- }
- isFirst = false;
- }
- if ((mCurTypeInstance == NULL) || (!mCurTypeInstance->IsGenericTypeInstance()))
- wantGeneric = false;
- //TODO:
- wantGeneric = false;
- BfTypeInstance* baseDelegateType = NULL;
- if (mCompiler->mDelegateTypeDef != NULL)
- baseDelegateType = ResolveTypeDef(mCompiler->mDelegateTypeDef)->ToTypeInstance();
- else
- failed = true;
- BfDelegateInfo* delegateInfo = NULL;
- BfDelegateType* delegateType = NULL;
- if (wantGeneric)
- {
- BfDelegateType* genericTypeInst = new BfDelegateType();
- genericTypeInst->mGenericTypeInfo = new BfGenericTypeInfo();
- genericTypeInst->mGenericTypeInfo->mFinishedGenericParams = true;
- delegateType = genericTypeInst;
- delegateInfo = delegateType->GetDelegateInfo();
- auto parentTypeInstance = (BfTypeInstance*)mCurTypeInstance;
- for (int i = 0; i < parentTypeInstance->mGenericTypeInfo->mGenericParams.size(); i++)
- {
- genericTypeInst->mGenericTypeInfo->mGenericParams.push_back(parentTypeInstance->mGenericTypeInfo->mGenericParams[i]->AddRef());
- }
- for (int i = 0; i < parentTypeInstance->mGenericTypeInfo->mTypeGenericArguments.size(); i++)
- {
- genericTypeInst->mGenericTypeInfo->mTypeGenericArguments.push_back(parentTypeInstance->mGenericTypeInfo->mTypeGenericArguments[i]);
- auto typeGenericArg = genericTypeInst->mGenericTypeInfo->mTypeGenericArguments[i];
- genericTypeInst->mGenericTypeInfo->mIsUnspecialized |= typeGenericArg->IsGenericParam() || typeGenericArg->IsUnspecializedType();
- }
- CheckUnspecializedGenericType(genericTypeInst, populateType);
-
- // We don't ever need to do an actual pass over generic delegate methods, so it's safe to set the 'unspecialized variation' flag
- if (isUnspecialized)
- {
- genericTypeInst->mGenericTypeInfo->mIsUnspecialized = true;
- genericTypeInst->mGenericTypeInfo->mIsUnspecializedVariation = true;
- }
- genericTypeInst->mIsUnspecializedType = genericTypeInst->mGenericTypeInfo->mIsUnspecialized;
- genericTypeInst->mIsUnspecializedTypeVariation = genericTypeInst->mGenericTypeInfo->mIsUnspecializedVariation;
- }
- else
- {
- auto dlgType = new BfDelegateType();
- delegateInfo = dlgType->GetDelegateInfo();
- dlgType->mIsUnspecializedType = isUnspecialized;
- dlgType->mIsUnspecializedTypeVariation = isUnspecialized;
- delegateType = dlgType;
- }
- delegateInfo->mCallingConvention = lookupCtx.mCallingConvention;
-
- Val128 hashContext;
- BfTypeDef* typeDef = new BfTypeDef();
- if (baseDelegateType != NULL)
- typeDef->mProject = baseDelegateType->mTypeDef->mProject;
- typeDef->mSystem = mCompiler->mSystem;
- typeDef->mName = mSystem->mEmptyAtom;
- if (delegateTypeRef->mTypeToken->GetToken() == BfToken_Delegate)
- {
- typeDef->mIsDelegate = true;
- typeDef->mTypeCode = BfTypeCode_Object;
- }
- else
- {
- typeDef->mIsFunction = true;
- typeDef->mTypeCode = BfTypeCode_Struct;
- }
-
- BfMethodDef* methodDef = new BfMethodDef();
- methodDef->mDeclaringType = typeDef;
- methodDef->mName = "Invoke";
- methodDef->mProtection = BfProtection_Public;
- methodDef->mIdx = 0;
- methodDef->mIsStatic = !typeDef->mIsDelegate && (functionThisType == NULL);
- methodDef->mHasExplicitThis = functionThisType != NULL;
- if ((functionThisType != NULL) && (hasMutSpecifier))
- {
- if ((functionThisType->IsValueType()) || (functionThisType->IsGenericParam()))
- methodDef->mIsMutating = true;
- }
- auto directTypeRef = BfAstNode::ZeroedAlloc<BfDirectTypeReference>();
- delegateInfo->mDirectAllocNodes.push_back(directTypeRef);
- if (typeDef->mIsDelegate)
- directTypeRef->Init(delegateType);
- else if (mCompiler->mFunctionTypeDef == NULL)
- failed = true;
- else
- directTypeRef->Init(ResolveTypeDef(mCompiler->mFunctionTypeDef));
- if (!failed)
- typeDef->mBaseTypes.push_back(directTypeRef);
- directTypeRef = BfAstNode::ZeroedAlloc<BfDirectTypeReference>();
- delegateInfo->mDirectAllocNodes.push_back(directTypeRef);
- directTypeRef->Init(returnType);
- methodDef->mReturnTypeRef = directTypeRef;
- delegateInfo->mReturnType = returnType;
- delegateInfo->mHasExplicitThis = functionThisType != NULL;
- delegateInfo->mHasVarArgs = hasVarArgs;
-
- delegateType->mGenericDepth = BF_MAX(delegateType->mGenericDepth, returnType->GetGenericDepth() + 1);
- auto hashVal = mContext->mResolvedTypes.Hash(typeRef, &lookupCtx);
-
- //int paramSrcOfs = (functionThisType != NULL) ? 1 : 0;
- int paramSrcOfs = 0;
- for (int paramIdx = 0; paramIdx < (int)paramTypes.size(); paramIdx++)
- {
- auto param = delegateTypeRef->mParams[paramIdx + paramSrcOfs];
- auto paramType = paramTypes[paramIdx];
- if (paramType == NULL)
- paramType = GetPrimitiveType(BfTypeCode_Var);
- String paramName;
- if (param->mNameNode != NULL)
- paramName = param->mNameNode->ToString();
- if (!paramType->IsReified())
- delegateType->mIsReified = false;
- auto directTypeRef = BfAstNode::ZeroedAlloc<BfDirectTypeReference>();
- delegateInfo->mDirectAllocNodes.push_back(directTypeRef);
- directTypeRef->Init(paramType);
- BfParameterDef* paramDef = new BfParameterDef();
- paramDef->mTypeRef = directTypeRef;
- paramDef->mName = paramName;
- if ((paramIdx == 0) && (functionThisType != NULL))
- paramDef->mParamKind = BfParamKind_ExplicitThis;
- methodDef->mParams.push_back(paramDef);
- delegateInfo->mParams.Add(paramType);
- delegateType->mGenericDepth = BF_MAX(delegateType->mGenericDepth, paramType->GetGenericDepth() + 1);
- }
- if (delegateInfo->mHasVarArgs)
- {
- BfParameterDef* paramDef = new BfParameterDef();
- paramDef->mParamKind = BfParamKind_VarArgs;
- methodDef->mParams.push_back(paramDef);
- }
- typeDef->mMethods.push_back(methodDef);
- if (failed)
- {
- delete delegateType;
- mContext->mResolvedTypes.RemoveEntry(resolvedEntry);
- return ResolveTypeResult(typeRef, NULL, populateType, resolveFlags);
- }
- //
-
- if (typeDef->mIsDelegate)
- {
- BfDefBuilder::AddMethod(typeDef, BfMethodType_Ctor, BfProtection_Public, false, "");
- BfDefBuilder::AddDynamicCastMethods(typeDef);
- }
- delegateType->mContext = mContext;
- delegateType->mTypeDef = typeDef;
- populateModule->InitType(delegateType, populateType);
- resolvedEntry->mValue = delegateType;
- AddDependency(directTypeRef->mType, delegateType, BfDependencyMap::DependencyFlag_ParamOrReturnValue);
- // if (delegateInfo->mFunctionThisType != NULL)
- // AddDependency(delegateInfo->mFunctionThisType, delegateType, BfDependencyMap::DependencyFlag_ParamOrReturnValue);
- for (auto paramType : paramTypes)
- AddDependency(paramType, delegateType, BfDependencyMap::DependencyFlag_ParamOrReturnValue);
- #ifdef _DEBUG
- if (BfResolvedTypeSet::Hash(delegateType, &lookupCtx) != resolvedEntry->mHash)
- {
- int refHash = BfResolvedTypeSet::Hash(typeRef, &lookupCtx);
- int typeHash = BfResolvedTypeSet::Hash(delegateType, &lookupCtx);
- BF_ASSERT(refHash == typeHash);
- }
- BF_ASSERT(BfResolvedTypeSet::Equals(delegateType, typeRef, &lookupCtx));
- #endif
- BF_ASSERT(BfResolvedTypeSet::Hash(delegateType, &lookupCtx) == resolvedEntry->mHash);
- return ResolveTypeResult(typeRef, delegateType, populateType, resolveFlags);
- }
- else if (auto genericParamTypeRef = BfNodeDynCast<BfGenericParamTypeRef>(typeRef))
- {
- auto genericParamType = GetGenericParamType(genericParamTypeRef->mGenericParamKind, genericParamTypeRef->mGenericParamIdx);
- resolvedEntry->mValue = genericParamType;
- BF_ASSERT(BfResolvedTypeSet::Hash(genericParamType, &lookupCtx) == resolvedEntry->mHash);
- return ResolveTypeResult(typeRef, genericParamType, populateType, resolveFlags);
- }
- else if (auto retTypeTypeRef = BfNodeDynCast<BfModifiedTypeRef>(typeRef))
- {
- auto retTypeType = new BfModifiedTypeType();
- retTypeType->mModifiedKind = retTypeTypeRef->mRetTypeToken->mToken;
- retTypeType->mElementType = ResolveTypeRef(retTypeTypeRef->mElementType, BfPopulateType_Declaration, BfResolveTypeRefFlag_AllowGenericParamConstValue);
- // We know this is a generic param type, it can't fail to resolve
- BF_ASSERT(retTypeType->mElementType);
- resolvedEntry->mValue = retTypeType;
- BF_ASSERT(BfResolvedTypeSet::Hash(retTypeType, &lookupCtx) == resolvedEntry->mHash);
- populateModule->InitType(retTypeType, populateType);
- return ResolveTypeResult(typeRef, retTypeType, populateType, resolveFlags);
- }
- else if (auto qualifiedTypeRef = BfNodeDynCast<BfQualifiedTypeReference>(typeRef))
- {
- auto leftType = ResolveTypeRef(qualifiedTypeRef->mLeft, BfPopulateType_Declaration, BfResolveTypeRefFlag_AllowGenericParamConstValue);
- if (leftType == NULL)
- return ResolveTypeResult(typeRef, NULL, populateType, resolveFlags);
- return ResolveTypeResult(typeRef, ResolveInnerType(leftType, qualifiedTypeRef->mRight), populateType, resolveFlags);
- }
- else if (auto constTypeRef = BfNodeDynCastExact<BfConstTypeRef>(typeRef))
- {
- return ResolveTypeRef(constTypeRef->mElementType, populateType, (BfResolveTypeRefFlags)(resolveFlags & BfResolveTypeRefFlag_NoResolveGenericParam));
- }
- else if (auto constExprTypeRef = BfNodeDynCastExact<BfConstExprTypeRef>(typeRef))
- {
- if ((mCurTypeInstance != NULL) && (mCurTypeInstance->mDependencyMap.mMinDependDepth > 32))
- {
- Fail("Generic type dependency depth exceeded", typeRef);
- mContext->mResolvedTypes.RemoveEntry(resolvedEntry);
- return ResolveTypeResult(typeRef, NULL, populateType, resolveFlags);
- }
- BfVariant result;
- BfType* resultType = NULL;
- if (constExprTypeRef->mConstExpr != NULL)
- {
- result = mContext->mResolvedTypes.EvaluateToVariant(&lookupCtx, constExprTypeRef->mConstExpr, resultType);
- BF_ASSERT(resultType != NULL);
- }
-
- auto constExprType = new BfConstExprValueType();
- constExprType->mContext = mContext;
- constExprType->mType = resultType;
- BF_ASSERT(constExprType->mType != NULL);
- if (constExprType->mType == NULL)
- constExprType->mType = GetPrimitiveType(BfTypeCode_Let);
- constExprType->mValue = result;
- resolvedEntry->mValue = constExprType;
- #ifdef _DEBUG
- if (BfResolvedTypeSet::Hash(constExprType, &lookupCtx) != resolvedEntry->mHash)
- {
- int refHash = BfResolvedTypeSet::Hash(typeRef, &lookupCtx);
- int typeHash = BfResolvedTypeSet::Hash(constExprType, &lookupCtx);
- BF_ASSERT(refHash == typeHash);
- }
- BF_ASSERT(BfResolvedTypeSet::Equals(constExprType, typeRef, &lookupCtx));
- #endif
-
- populateModule->InitType(constExprType, populateType);
- return constExprType;
- }
- else
- {
- BFMODULE_FATAL(this, "Not implemented!");
- NotImpl(typeRef);
- return ResolveTypeResult(typeRef, NULL, populateType, resolveFlags);
- }
- return ResolveTypeResult(typeRef, NULL, populateType, resolveFlags);
- }
- BfType* BfModule::ResolveTypeRefAllowUnboundGenerics(BfTypeReference* typeRef, BfPopulateType populateType, bool resolveGenericParam)
- {
- if (auto genericTypeRef = BfNodeDynCast<BfGenericInstanceTypeRef>(typeRef))
- {
- if (genericTypeRef->mGenericArguments.size() == 0)
- {
- auto genericTypeDef = ResolveGenericInstanceDef(genericTypeRef);
- if (genericTypeDef == NULL)
- return NULL;
-
- BfTypeVector typeVector;
- for (int i = 0; i < (int)genericTypeDef->mGenericParamDefs.size(); i++)
- typeVector.push_back(GetGenericParamType(BfGenericParamKind_Type, i));
- auto result = ResolveTypeDef(genericTypeDef, typeVector, populateType);
- if ((result != NULL) && (genericTypeRef->mCommas.size() + 1 != genericTypeDef->mGenericParamDefs.size()))
- {
- SetAndRestoreValue<BfTypeInstance*> prevTypeInstance(mCurTypeInstance, result->ToTypeInstance());
- SetAndRestoreValue<BfMethodInstance*> prevMethodInstance(mCurMethodInstance, NULL);
- Fail(StrFormat("Type '%s' requires %d generic arguments", TypeToString(result).c_str(), genericTypeDef->mGenericParamDefs.size()), typeRef);
- }
- return result;
- }
- }
- return ResolveTypeRef(typeRef, populateType, resolveGenericParam ? (BfResolveTypeRefFlags)0 : BfResolveTypeRefFlag_NoResolveGenericParam);
- }
- // This finds non-default unspecialized generic type instances and converts them into a BfUnspecializedGenericTypeVariation
- BfType* BfModule::CheckUnspecializedGenericType(BfTypeInstance* genericTypeInst, BfPopulateType populateType)
- {
- int argCount = (int)genericTypeInst->mGenericTypeInfo->mTypeGenericArguments.size();
- bool isDefaultUnspecialized = true;
- for (int argIdx = 0; argIdx < argCount; argIdx++)
- {
- auto argType = genericTypeInst->mGenericTypeInfo->mTypeGenericArguments[argIdx];
- if (argType->IsGenericParam())
- {
- auto genericParamType = (BfGenericParamType*)argType;
- if ((genericParamType->mGenericParamKind != BfGenericParamKind_Type) || (genericParamType->mGenericParamIdx != argIdx))
- isDefaultUnspecialized = false;
- genericTypeInst->mGenericTypeInfo->mIsUnspecialized = true;
- }
- else if (argType->IsUnspecializedType())
- {
- isDefaultUnspecialized = false;
- genericTypeInst->mGenericTypeInfo->mIsUnspecialized = true;
- }
- else
- isDefaultUnspecialized = false;
- }
- if (genericTypeInst->mGenericTypeInfo->mIsUnspecialized)
- genericTypeInst->mGenericTypeInfo->mIsUnspecializedVariation = !isDefaultUnspecialized;
- return genericTypeInst;
- }
- BfTypeInstance* BfModule::GetUnspecializedTypeInstance(BfTypeInstance* typeInst)
- {
- if (!typeInst->IsGenericTypeInstance())
- return typeInst;
- BF_ASSERT((!typeInst->IsDelegateFromTypeRef()) && (!typeInst->IsFunctionFromTypeRef()));
- auto genericTypeInst = (BfTypeInstance*)typeInst;
- auto result = ResolveTypeDef(genericTypeInst->mTypeDef->GetDefinition(), BfPopulateType_Declaration);
- BF_ASSERT((result != NULL) && (result->IsUnspecializedType()));
- if (result == NULL)
- return NULL;
- return result->ToTypeInstance();
- }
- BfType* BfModule::ResolveTypeRef_Type(BfAstNode* astNode, const BfSizedArray<BfAstNode*>* genericArgs, BfPopulateType populateType, BfResolveTypeRefFlags resolveFlags)
- {
- if ((genericArgs == NULL) || (genericArgs->size() == 0))
- {
- if (auto identifier = BfNodeDynCast<BfIdentifierNode>(astNode))
- {
- BfNamedTypeReference typeRef;
- typeRef.mNameNode = identifier;
- typeRef.mSrcEnd = 0;
- typeRef.mToken = BfToken_None;
- auto type = ResolveTypeRef(&typeRef, populateType, resolveFlags);
- return type;
- }
- }
- BfAstAllocator alloc;
- alloc.mSourceData = astNode->GetSourceData();
- std::function<BfTypeReference* (BfAstNode*)> _ConvType = [&](BfAstNode* astNode) -> BfTypeReference*
- {
- if (auto typeRef = BfNodeDynCast<BfTypeReference>(astNode))
- return typeRef;
- BfTypeReference* result = NULL;
- if (auto identifier = BfNodeDynCast<BfIdentifierNode>(astNode))
- {
- auto* typeRef = alloc.Alloc<BfNamedTypeReference>();
- typeRef->mNameNode = identifier;
- result = typeRef;
- }
- else if (auto memberRefExpr = BfNodeDynCast<BfMemberReferenceExpression>(astNode))
- {
- auto qualifiedTypeRef = alloc.Alloc<BfQualifiedTypeReference>();
- qualifiedTypeRef->mLeft = _ConvType(memberRefExpr->mTarget);
- qualifiedTypeRef->mDot = memberRefExpr->mDotToken;
- qualifiedTypeRef->mRight = _ConvType(memberRefExpr->mMemberName);
- if ((qualifiedTypeRef->mLeft == NULL) || (qualifiedTypeRef->mRight == NULL))
- return NULL;
- result = qualifiedTypeRef;
- }
- if (result == NULL)
- return NULL;
- result->SetSrcStart(astNode->GetSrcStart());
- result->SetSrcEnd(astNode->GetSrcEnd());
- return result;
- };
- auto typeRef = _ConvType(astNode);
- if (typeRef == NULL)
- return NULL;
- if ((genericArgs != NULL) && (genericArgs->size() != 0))
- {
- auto genericInstanceTypeRef = alloc.Alloc<BfGenericInstanceTypeRef>();
- genericInstanceTypeRef->SetSrcStart(typeRef->GetSrcStart());
- genericInstanceTypeRef->mElementType = typeRef;
- #ifdef BF_AST_HAS_PARENT_MEMBER
- typeRef->mParent = genericInstanceTypeRef;
- #endif
- BfDeferredAstSizedArray<BfAstNode*> arguments(genericInstanceTypeRef->mGenericArguments, &alloc);
- for (auto genericArg : *genericArgs)
- {
- if (genericArg != NULL)
- {
- arguments.push_back(genericArg);
- genericInstanceTypeRef->SetSrcEnd(genericArg->GetSrcEnd());
- }
- }
- typeRef = genericInstanceTypeRef;
- }
- return ResolveTypeRef(typeRef, populateType, resolveFlags);
- }
- BfType* BfModule::ResolveTypeRef(BfAstNode* astNode, const BfSizedArray<BfAstNode*>* genericArgs, BfPopulateType populateType, BfResolveTypeRefFlags resolveFlags)
- {
- if (astNode == NULL)
- {
- AssertErrorState();
- return NULL;
- }
- if (auto typeRef = BfNodeDynCast<BfTypeReference>(astNode))
- return ResolveTypeRef(typeRef, populateType, resolveFlags);
- if ((resolveFlags & BfResolveTypeRefFlag_AllowImplicitConstExpr) != 0)
- {
- if (auto expr = BfNodeDynCast<BfExpression>(astNode))
- {
- auto checkType = ResolveTypeRef_Type(astNode, genericArgs, populateType, (BfResolveTypeRefFlags)(resolveFlags | BfResolveTypeRefFlag_IgnoreLookupError));
- if (checkType != NULL)
- return checkType;
- BfResolvedTypeSet::LookupContext lookupCtx;
- lookupCtx.mModule = this;
- BfResolvedTypeSet::Entry* typeEntry = NULL;
-
- BfType* resultType = NULL;
- auto result = mContext->mResolvedTypes.EvaluateToVariant(&lookupCtx, expr, resultType);
- if (resultType != NULL)
- {
- auto constExprValue = CreateConstExprValueType(result, resultType);
- return constExprValue;
- }
- }
- }
-
- return ResolveTypeRef_Type(astNode, genericArgs, populateType, resolveFlags);
- }
- // This flow should mirror CastToValue
- bool BfModule::CanCast(BfTypedValue typedVal, BfType* toType, BfCastFlags castFlags)
- {
- BP_ZONE("BfModule::CanCast");
- SetAndRestoreValue<bool> prevIgnoreWrites(mBfIRBuilder->mIgnoreWrites, true);
- return CastToValue(NULL, typedVal, toType, (BfCastFlags)(castFlags | BfCastFlags_SilentFail | BfCastFlags_IsCastCheck));
- }
- bool BfModule::AreSplatsCompatible(BfType* fromType, BfType* toType, bool* outNeedsMemberCasting)
- {
- if ((fromType->IsTypeInstance()) && (!fromType->IsSplattable()))
- return false;
- if ((toType->IsTypeInstance()) && (!toType->IsSplattable()))
- return false;
- auto _GetTypes = [&](BfType* type, Array<BfType*>& types)
- {
- BfTypeUtils::SplatIterate([&](BfType* memberType) { types.Add(memberType); }, type);
- };
- Array<BfType*> fromTypes;
- _GetTypes(fromType, fromTypes);
- Array<BfType*> toTypes;
- _GetTypes(toType, toTypes);
- if (toTypes.size() > fromTypes.size())
- return false;
- for (int i = 0; i < toTypes.size(); i++)
- {
- BfType* fromMemberType = fromTypes[i];
- BfType* toMemberType = toTypes[i];
- if (fromMemberType != toMemberType)
- {
- if ((outNeedsMemberCasting != NULL) &&
- (fromMemberType->IsIntPtrable()) && (toMemberType->IsIntPtrable()))
- *outNeedsMemberCasting = true;
- else
- return false;
- }
- }
-
- return true;
- }
- BfIRValue BfModule::CastToFunction(BfAstNode* srcNode, const BfTypedValue& targetValue, BfMethodInstance* methodInstance, BfType* toType, BfCastFlags castFlags, BfIRValue irFunc)
- {
- auto invokeMethodInstance = GetDelegateInvokeMethod(toType->ToTypeInstance());
- bool methodsThisMatch = true;
- if (invokeMethodInstance->mMethodDef->mIsStatic != methodInstance->mMethodDef->mIsStatic)
- methodsThisMatch = false;
- else
- {
- if (!methodInstance->mMethodDef->mIsStatic)
- {
- BfType* thisType = methodInstance->GetThisType();
- if (thisType->IsPointer())
- thisType = thisType->GetUnderlyingType();
- BfType* invokeThisType = invokeMethodInstance->GetThisType();
- if (invokeThisType->IsPointer())
- invokeThisType = invokeThisType->GetUnderlyingType();
- if (!TypeIsSubTypeOf(thisType->ToTypeInstance(), invokeThisType->ToTypeInstance()))
- methodsThisMatch = false;
- }
- }
- bool methodMatches = methodsThisMatch;
- if (methodMatches)
- methodMatches = invokeMethodInstance->IsExactMatch(methodInstance, false, false);
- if (methodMatches)
- {
- if (methodInstance->GetOwner()->IsFunction())
- {
- BF_ASSERT(targetValue);
- return targetValue.mValue;
- }
- BfIRFunction bindFuncVal = irFunc;
- if (!bindFuncVal)
- {
- BfModuleMethodInstance methodRefMethod;
- if (methodInstance->mDeclModule == this)
- methodRefMethod = methodInstance;
- else
- methodRefMethod = ReferenceExternalMethodInstance(methodInstance);
- auto dataType = GetPrimitiveType(BfTypeCode_IntPtr);
- if (!methodRefMethod.mFunc)
- {
- if ((!methodInstance->mIsUnspecialized) && (HasCompiledOutput()))
- AssertErrorState();
- return GetDefaultValue(dataType);
- }
- bindFuncVal = methodRefMethod.mFunc;
- }
- if (mCompiler->mOptions.mAllowHotSwapping)
- bindFuncVal = mBfIRBuilder->RemapBindFunction(bindFuncVal);
- return mBfIRBuilder->CreatePtrToInt(bindFuncVal, BfTypeCode_IntPtr);
- }
- if ((castFlags & BfCastFlags_SilentFail) == 0)
- {
- if ((methodsThisMatch) && (invokeMethodInstance->IsExactMatch(methodInstance, true, false)))
- {
- Fail(StrFormat("Non-static method '%s' cannot match '%s' because it contains captured variables, consider using a delegate or removing captures", MethodToString(methodInstance).c_str(), TypeToString(toType).c_str()), srcNode);
- }
- else if (invokeMethodInstance->IsExactMatch(methodInstance, false, false))
- {
- bool handled = false;
- if (methodInstance->HasThis())
- {
- auto thisType = methodInstance->GetThisType();
- if (invokeMethodInstance->HasExplicitThis())
- {
- auto invokeThisType = invokeMethodInstance->GetThisType();
- bool thisWasPtr = false;
- if (thisType->IsPointer())
- {
- thisType = thisType->GetUnderlyingType();
- thisWasPtr = true;
- }
- bool invokeThisWasPtr = false;
- if (invokeThisType->IsPointer())
- {
- invokeThisType = invokeThisType->GetUnderlyingType();
- invokeThisWasPtr = true;
- }
- if (TypeIsSubTypeOf(thisType->ToTypeInstance(), invokeThisType->ToTypeInstance()))
- {
- if (invokeThisWasPtr != thisWasPtr)
- {
- if (invokeThisWasPtr)
- Fail(StrFormat("Non-static method '%s' cannot match '%s', consider removing 'mut' from 'mut %s this' in the function parameters", MethodToString(methodInstance).c_str(), TypeToString(toType).c_str(), TypeToString(thisType).c_str()), srcNode);
- else
- Fail(StrFormat("Non-static method '%s' cannot match '%s', consider adding 'mut' specifier to '%s this' in the function parameters", MethodToString(methodInstance).c_str(), TypeToString(toType).c_str(), TypeToString(thisType).c_str()), srcNode);
- handled = true;
- }
- }
- }
- }
-
- if ((!methodInstance->mMethodDef->mIsStatic) && (!invokeMethodInstance->HasExplicitThis()))
- {
- handled = true;
- auto thisType = methodInstance->GetParamType(-1);
- Fail(StrFormat("Non-static method '%s' cannot match '%s', consider adding '%s this' to the function parameters", MethodToString(methodInstance).c_str(), TypeToString(toType).c_str(), TypeToString(thisType).c_str()), srcNode);
- }
-
- if (!handled)
- {
- if (invokeMethodInstance->mMethodDef->mIsStatic)
- Fail(StrFormat("Static method '%s' cannot match '%s'", MethodToString(methodInstance).c_str(), TypeToString(toType).c_str()).c_str(), srcNode);
- else
- Fail(StrFormat("Non-static method '%s' cannot match '%s'", MethodToString(methodInstance).c_str(), TypeToString(toType).c_str()).c_str(), srcNode);
- }
- }
- }
- return BfIRValue();
- }
- BfIRValue BfModule::CastToValue(BfAstNode* srcNode, BfTypedValue typedVal, BfType* toType, BfCastFlags castFlags, BfCastResultFlags* resultFlags)
- {
- bool silentFail = ((castFlags & BfCastFlags_SilentFail) != 0);
- bool explicitCast = (castFlags & BfCastFlags_Explicit) != 0;
- bool ignoreErrors = mIgnoreErrors || ((castFlags & BfCastFlags_SilentFail) != 0);
- bool ignoreWrites = mBfIRBuilder->mIgnoreWrites;
- if (typedVal.mType == toType)
- {
- if (resultFlags != NULL)
- {
- if (typedVal.IsAddr())
- *resultFlags = (BfCastResultFlags)(*resultFlags | BfCastResultFlags_IsAddr);
- if (typedVal.mKind == BfTypedValueKind_TempAddr)
- *resultFlags = (BfCastResultFlags)(*resultFlags | BfCastResultFlags_IsTemp);
- }
- else if (typedVal.IsAddr())
- typedVal = LoadValue(typedVal);
- return typedVal.mValue;
- }
- BF_ASSERT(typedVal.mType->mContext == mContext);
- BF_ASSERT(toType->mContext == mContext);
- if ((typedVal.IsAddr()) && (!typedVal.mType->IsValueType()))
- typedVal = LoadValue(typedVal);
- //BF_ASSERT(!typedVal.IsAddr() || typedVal.mType->IsGenericParam() || typedVal.mType->IsValueType());
- // Ref X to Ref Y, X* to Y*
- {
- bool checkUnderlying = false;
-
- if (((typedVal.mType->IsRef()) && (toType->IsRef())))
- {
- auto fromRefType = (BfRefType*)typedVal.mType;
- auto toRefType = (BfRefType*)toType;
- if (fromRefType->mRefKind == toRefType->mRefKind)
- checkUnderlying = true;
- else if ((fromRefType->mRefKind == BfRefType::RefKind_Ref) && (toRefType->mRefKind == BfRefType::RefKind_Mut))
- checkUnderlying = true; // Allow a ref-to-mut implicit conversion
- }
- if ((typedVal.mType->IsPointer()) && (toType->IsPointer()))
- checkUnderlying = true;
- if (checkUnderlying)
- {
- auto fromInner = typedVal.mType->GetUnderlyingType();
- auto toInner = toType->GetUnderlyingType();
-
- if (fromInner == toInner)
- {
- return typedVal.mValue;
- }
- if ((fromInner->IsTuple()) && (toInner->IsTuple()))
- {
- auto fromTuple = (BfTupleType*)fromInner;
- auto toTuple = (BfTupleType*)toInner;
- if (fromTuple->mFieldInstances.size() == toTuple->mFieldInstances.size())
- {
- bool matches = true;
- for (int fieldIdx = 0; fieldIdx < (int)fromTuple->mFieldInstances.size(); fieldIdx++)
- {
- if (fromTuple->mFieldInstances[fieldIdx].mResolvedType != toTuple->mFieldInstances[fieldIdx].mResolvedType)
- {
- matches = false;
- break;
- }
- }
- if (matches)
- {
- // This is either a ref or a ptr so we don't need to set the "IsAddr" flag
- typedVal = MakeAddressable(typedVal);
- return mBfIRBuilder->CreateBitCast(typedVal.mValue, mBfIRBuilder->MapType(toType));
- }
- }
- }
- // ref int <-> ref int64/int32 (of same size)
- if (((fromInner->IsInteger()) && (toInner->IsInteger())) &&
- (fromInner->mSize == toInner->mSize) &&
- (fromInner->IsSigned() == toInner->IsSigned()))
- return typedVal.mValue;
- }
- }
- // Null -> ObjectInst|IFace|ptr
- if ((typedVal.mType->IsNull()) &&
- ((toType->IsObjectOrInterface()) || (toType->IsPointer() || (toType->IsFunction()) || (toType->IsAllocType()))))
- {
- return mBfIRBuilder->CreateBitCast(typedVal.mValue, mBfIRBuilder->MapType(toType));
- }
- // Func -> void*
- if ((typedVal.mType->IsFunction()) && (toType->IsVoidPtr()))
- {
- return mBfIRBuilder->CreateIntToPtr(typedVal.mValue, mBfIRBuilder->MapType(toType));
- }
- if (explicitCast)
- {
- // void* -> Func
- if ((typedVal.mType->IsVoidPtr()) && (toType->IsFunction()))
- {
- return mBfIRBuilder->CreatePtrToInt(typedVal.mValue, BfTypeCode_IntPtr);
- }
- // * -> Valueless
- if (toType->IsVoid())
- return mBfIRBuilder->GetFakeVal();
- // void* -> intptr
- if ((typedVal.mType->IsPointer()) && (toType->IsIntPtr()))
- {
- if ((!typedVal.mType->GetUnderlyingType()->IsVoid()) && ((castFlags & BfCastFlags_FromCompiler) == 0))
- {
- if (!ignoreErrors)
- Fail(StrFormat("Unable to cast directly from '%s' to '%s', consider casting to void* first", TypeToString(typedVal.mType).c_str(), TypeToString(toType).c_str()), srcNode);
- else if (!silentFail)
- SetFail();
- }
-
- auto toPrimitive = (BfPrimitiveType*)toType;
- return mBfIRBuilder->CreatePtrToInt(typedVal.mValue, toPrimitive->mTypeDef->mTypeCode);
- }
- // intptr -> void*
- if ((typedVal.mType->IsIntPtr()) && (toType->IsPointer()))
- {
- if ((!toType->GetUnderlyingType()->IsVoid()) && ((castFlags & BfCastFlags_FromCompiler) == 0))
- {
- if (!ignoreErrors)
- Fail(StrFormat("Unable to cast directly from '%s' to '%s', consider casting to void* first", TypeToString(typedVal.mType).c_str(), TypeToString(toType).c_str()), srcNode);
- else if (!silentFail)
- SetFail();
- }
- return mBfIRBuilder->CreateIntToPtr(typedVal.mValue, mBfIRBuilder->MapType(toType));
- }
- }
- // * <-> Var
- if ((typedVal.mType->IsVar()) || (toType->IsVar()))
- {
- return mBfIRBuilder->CreateUndefValue(mBfIRBuilder->MapType(toType));
- }
- // Generic param -> *
- if (typedVal.mType->IsGenericParam())
- {
- if (toType->IsGenericParam())
- {
- auto genericParamInst = GetGenericParamInstance((BfGenericParamType*)typedVal.mType);
- if (genericParamInst->mTypeConstraint == toType)
- return typedVal.mValue;
- }
- else
- {
- if ((typedVal.mKind != Beefy::BfTypedValueKind_GenericConstValue) && (toType == mContext->mBfObjectType))
- {
- // Always allow casting from generic to object
- return typedVal.mValue;
- }
- auto _CheckGenericParamInstance = [&](BfGenericParamInstance* genericParamInst)
- {
- if ((genericParamInst->mGenericParamFlags & BfGenericParamFlag_Var) != 0)
- {
- return typedVal.mValue;
- }
- if (toType->IsInterface())
- {
- for (auto iface : genericParamInst->mInterfaceConstraints)
- if (TypeIsSubTypeOf(iface, toType->ToTypeInstance()))
- return mBfIRBuilder->GetFakeVal();
- }
- if (genericParamInst->mTypeConstraint != NULL)
- {
- SetAndRestoreValue<bool> prevIgnoreWrites(mBfIRBuilder->mIgnoreWrites, true);
- auto constraintTypeInst = genericParamInst->mTypeConstraint->ToTypeInstance();
- if ((constraintTypeInst != NULL) && (constraintTypeInst->IsDelegateOrFunction()))
- {
- // Could be a methodref - can't cast to anything else
- }
- else
- {
- if ((constraintTypeInst != NULL) && (constraintTypeInst->IsInstanceOf(mCompiler->mEnumTypeDef)) && (explicitCast))
- {
- // Enum->int
- if ((explicitCast) && (toType->IsInteger()))
- return typedVal.mValue;
- }
- BfTypedValue fromTypedValue;
- if (typedVal.mKind == BfTypedValueKind_GenericConstValue)
- fromTypedValue = GetDefaultTypedValue(genericParamInst->mTypeConstraint, false, BfDefaultValueKind_Undef);
- else
- fromTypedValue = BfTypedValue(mBfIRBuilder->GetFakeVal(), genericParamInst->mTypeConstraint, genericParamInst->mTypeConstraint->IsValueType());
- auto result = CastToValue(srcNode, fromTypedValue, toType, (BfCastFlags)(castFlags | BfCastFlags_SilentFail));
- if (result)
- {
- if ((genericParamInst->mTypeConstraint->IsDelegate()) && (toType->IsDelegate()))
- {
- // Don't allow cast when we are constrained by a delegate type, because BfMethodRefs can match and we require an actual alloc
- Fail(StrFormat("Unable to cast '%s' to '%s' because delegate constraints allow valueless direct method references", TypeToString(typedVal.mType).c_str(), TypeToString(toType).c_str()), srcNode);
- return BfIRValue();
- }
- return result;
- }
- }
- }
- // Generic constrained with class or pointer type -> void*
- if (toType->IsVoidPtr())
- {
- if (((genericParamInst->mGenericParamFlags & (BfGenericParamFlag_Class | BfGenericParamFlag_StructPtr | BfGenericParamFlag_Interface)) != 0) ||
- ((genericParamInst->mTypeConstraint != NULL) &&
- ((genericParamInst->mTypeConstraint->IsPointer()) ||
- (genericParamInst->mTypeConstraint->IsInstanceOf(mCompiler->mFunctionTypeDef)) ||
- (genericParamInst->mTypeConstraint->IsObjectOrInterface()))))
- {
- return typedVal.mValue;
- }
- }
- if ((toType->IsInteger()) && (explicitCast))
- {
- if ((genericParamInst->mGenericParamFlags & BfGenericParamFlag_Enum) != 0)
- {
- return typedVal.mValue;
- }
- }
- return BfIRValue();
- };
- BfIRValue retVal;
- // For these casts, it's just important we get *A* value to work with here,
- // as this is just use for unspecialized parsing. We don't use the generated code
- {
- auto genericParamInst = GetGenericParamInstance((BfGenericParamType*)typedVal.mType);
- retVal = _CheckGenericParamInstance(genericParamInst);
- if (retVal)
- return retVal;
- }
- // Check method generic constraints
- if ((mCurMethodInstance != NULL) && (mCurMethodInstance->mIsUnspecialized) && (mCurMethodInstance->mMethodInfoEx != NULL))
- {
- for (int genericParamIdx = (int)mCurMethodInstance->mMethodInfoEx->mMethodGenericArguments.size();
- genericParamIdx < mCurMethodInstance->mMethodInfoEx->mGenericParams.size(); genericParamIdx++)
- {
- auto genericParamInst = mCurMethodInstance->mMethodInfoEx->mGenericParams[genericParamIdx];
- if (genericParamInst->mExternType == typedVal.mType)
- {
- retVal = _CheckGenericParamInstance(genericParamInst);
- if (retVal)
- return retVal;
- }
- }
- }
- }
- }
- // * -> Generic param
- if (toType->IsGenericParam())
- {
- if (explicitCast)
- {
- // Either an upcast or an unbox
- if ((typedVal.mType == mContext->mBfObjectType) || (typedVal.mType->IsInterface()))
- {
- return GetDefaultValue(toType);
- }
- }
- auto genericParamInst = GetGenericParamInstance((BfGenericParamType*)toType);
- if (genericParamInst->mGenericParamFlags & BfGenericParamFlag_Var)
- return GetDefaultValue(toType);
-
- if (typedVal.mType->IsNull())
- {
- bool allowCast = (genericParamInst->mGenericParamFlags & (BfGenericParamFlag_Class | BfGenericParamFlag_StructPtr | BfGenericParamFlag_Interface)) != 0;
- if ((!allowCast) && (genericParamInst->mTypeConstraint != NULL))
- allowCast = genericParamInst->mTypeConstraint->IsObject() || genericParamInst->mTypeConstraint->IsPointer();
- if (allowCast)
- return mBfIRBuilder->CreateBitCast(typedVal.mValue, mBfIRBuilder->MapType(toType));
- }
- if (genericParamInst->mTypeConstraint != NULL)
- {
- if (genericParamInst->mTypeConstraint->IsInstanceOf(mCompiler->mEnumTypeDef))
- {
- // int->Enum
- if ((explicitCast) && (typedVal.mType->IsInteger()))
- return mBfIRBuilder->GetFakeVal();
- }
- if ((genericParamInst->mTypeConstraint == toType) && (toType->IsUnspecializedType()))
- return mBfIRBuilder->GetFakeVal();
- auto castedVal = CastToValue(srcNode, typedVal, genericParamInst->mTypeConstraint, (BfCastFlags)(castFlags | BfCastFlags_SilentFail));
- if (castedVal)
- return castedVal;
- }
-
- if (explicitCast)
- {
- if (((genericParamInst->mGenericParamFlags & BfGenericParamFlag_StructPtr) != 0) ||
- ((genericParamInst->mTypeConstraint != NULL) && genericParamInst->mTypeConstraint->IsInstanceOf(mCompiler->mFunctionTypeDef)))
- {
- auto voidPtrType = CreatePointerType(GetPrimitiveType(BfTypeCode_None));
- auto castedVal = CastToValue(srcNode, typedVal, voidPtrType, (BfCastFlags)(castFlags | BfCastFlags_SilentFail));
- if (castedVal)
- return castedVal;
- }
- }
- if ((typedVal.mType->IsIntegral()) && ((genericParamInst->mGenericParamFlags & BfGenericParamFlag_Enum) != 0))
- {
- bool allowCast = explicitCast;
- if ((!allowCast) && (typedVal.mType->IsIntegral()))
- {
- // Allow implicit cast of zero
- auto constant = mBfIRBuilder->GetConstant(typedVal.mValue);
- if ((constant != NULL) && (mBfIRBuilder->IsInt(constant->mTypeCode)))
- {
- allowCast = constant->mInt64 == 0;
- }
- }
- if (allowCast)
- {
- return mBfIRBuilder->GetFakeVal();
- }
- }
- }
- if ((typedVal.mType->IsTypeInstance()) && (toType->IsTypeInstance()))
- {
- auto fromTypeInstance = typedVal.mType->ToTypeInstance();
- auto toTypeInstance = toType->ToTypeInstance();
- if ((typedVal.mType->IsValueType()) && (toType->IsValueType()))
- {
- bool allowCast = false;
- if (TypeIsSubTypeOf(fromTypeInstance, toTypeInstance))
- allowCast = true;
- if (allowCast)
- {
- PopulateType(toType);
- if (toType->IsValuelessType())
- return BfIRValue::sValueless;
- if (ignoreWrites)
- return mBfIRBuilder->GetFakeVal();
-
- if (resultFlags != NULL)
- *resultFlags = (BfCastResultFlags)(BfCastResultFlags_IsAddr);
- typedVal = MakeAddressable(typedVal);
- return mBfIRBuilder->CreateBitCast(typedVal.mValue, mBfIRBuilder->MapTypeInstPtr(toTypeInstance));
- }
- }
- // ObjectInst|IFace -> object|IFace
- if ((typedVal.mType->IsObject() || (typedVal.mType->IsInterface())) && ((toType->IsObject() || (toType->IsInterface()))))
- {
- bool allowCast = false;
- if (((castFlags & BfCastFlags_NoInterfaceImpl) != 0) && (toTypeInstance->IsInterface()))
- {
- // Don't allow
- }
- else if (TypeIsSubTypeOf(fromTypeInstance, toTypeInstance))
- allowCast = true;
- else if ((explicitCast) &&
- ((toType->IsInterface()) || (TypeIsSubTypeOf(toTypeInstance, fromTypeInstance))))
- {
- if (toType->IsObjectOrInterface())
- {
- if ((castFlags & BfCastFlags_Unchecked) == 0)
- EmitDynamicCastCheck(typedVal, toType, true);
- }
- allowCast = true;
- }
- if (allowCast)
- {
- if ((ignoreWrites) && (!typedVal.mValue.IsConst()))
- return mBfIRBuilder->GetFakeVal();
- return mBfIRBuilder->CreateBitCast(typedVal.mValue, mBfIRBuilder->MapType(toType));
- }
- }
- }
- // MethodRef -> Function
- if ((typedVal.mType->IsMethodRef()) && (toType->IsFunction()))
- {
- BfMethodInstance* methodInstance = ((BfMethodRefType*)typedVal.mType)->mMethodRef;
- auto result = CastToFunction(srcNode, BfTypedValue(), methodInstance, toType, castFlags);
- if (result)
- return result;
- }
- // concrete IFace -> object|IFace
- if ((typedVal.mType->IsConcreteInterfaceType()) && ((toType->IsObject() || (toType->IsInterface()))))
- {
- auto concreteInterfaceType = (BfConcreteInterfaceType*)typedVal.mType;
- if ((toType->IsObject()) || (concreteInterfaceType->mInterface == toType))
- return mBfIRBuilder->CreateBitCast(typedVal.mValue, mBfIRBuilder->MapType(toType));
- }
- // IFace -> object
- if ((typedVal.mType->IsInterface()) && (toType == mContext->mBfObjectType))
- return mBfIRBuilder->CreateBitCast(typedVal.mValue, mBfIRBuilder->MapType(toType));
- // * -> Pointer
- if (toType->IsPointer())
- {
- // Ptr -> Ptr
- if (typedVal.mType->IsPointer())
- {
- bool allowCast = explicitCast;
- auto fromPointerType = (BfPointerType*)typedVal.mType;
- auto toPointerType = (BfPointerType*)toType;
- auto fromUnderlying = fromPointerType->mElementType;
- auto toUnderlying = toPointerType->mElementType;
- // Allow cast from T[size]* to T* implicitly
- // And from T* to T[size]* explicitly
- while (fromUnderlying->IsSizedArray())
- fromUnderlying = fromUnderlying->GetUnderlyingType();
- while ((toUnderlying->IsSizedArray()) && (explicitCast))
- toUnderlying = toUnderlying->GetUnderlyingType();
- if ((fromUnderlying == toUnderlying) ||
- (TypeIsSubTypeOf(fromUnderlying->ToTypeInstance(), toUnderlying->ToTypeInstance())) ||
- (toUnderlying->IsVoid()))
- allowCast = true;
- if (allowCast)
- {
- if ((ignoreWrites) && (!typedVal.mValue.IsConst()))
- return mBfIRBuilder->GetFakeVal();
- return mBfIRBuilder->CreateBitCast(typedVal.mValue, mBfIRBuilder->MapType(toType));
- }
- }
- else if (typedVal.mType->IsObject())
- {
- // ???
- }
- /*else if (typedVal.mType->IsSizedArray())
- {
- if (typedVal.IsAddr())
- {
- BfSizedArrayType* arrayType = (BfSizedArrayType*)typedVal.mType;
- auto ptrType = CreatePointerType(arrayType->mElementType);
- BfTypedValue returnPointer(mBfIRBuilder->CreateBitCast(typedVal.mValue, mBfIRBuilder->MapType(ptrType)), ptrType);
- return CastToValue(srcNode, returnPointer, toType, castFlags, silentFail);
- }
- }*/
- }
- // Boxing?
- bool mayBeBox = false;
- if (((typedVal.mType->IsValueType()) || (typedVal.mType->IsPointer()) || (typedVal.mType->IsValuelessType())) &&
- ((toType->IsInterface()) || (toType == mContext->mBfObjectType)))
- {
- // Make sure there's no conversion operator before we box
- if ((!typedVal.mType->IsRef()) && (!typedVal.mType->IsModifiedTypeType()))
- mayBeBox = true;
- }
- //TODO: the IsGenericParam is not valid - why did we have that? The generic param could be a struct for example...
- if ((explicitCast) && ((typedVal.mType->IsInterface()) || (typedVal.mType == mContext->mBfObjectType) /*|| (typedVal.mType->IsGenericParam())*/) &&
- ((toType->IsValueType()) || (toType->IsPointer())))
- {
- if (toType->IsValuelessType())
- return BfIRValue::sValueless;
- if (ignoreWrites)
- return mBfIRBuilder->GetFakeVal();
- // Unbox!
- if ((castFlags & BfCastFlags_Unchecked) == 0)
- {
- EmitDynamicCastCheck(typedVal, toType, false);
- EmitObjectAccessCheck(typedVal);
- }
- if (toType->IsNullable())
- {
- auto toTypeInst = toType->ToTypeInstance();
- int valueIdx = toTypeInst->mFieldInstances[0].mDataIdx;
- int hasValueIdx = toTypeInst->mFieldInstances[1].mDataIdx;
- typedVal = MakeAddressable(typedVal);
- auto elementType = toType->GetUnderlyingType();
- auto ptrElementType = CreatePointerType(elementType);
- auto boolType = GetPrimitiveType(BfTypeCode_Boolean);
- auto allocaInst = CreateAlloca(toType, true, "unboxN");
- auto prevBB = mBfIRBuilder->GetInsertBlock();
- auto nullBB = mBfIRBuilder->CreateBlock("unboxN.null");
- auto notNullBB = mBfIRBuilder->CreateBlock("unboxN.notNull");
- auto endBB = mBfIRBuilder->CreateBlock("unboxN.end");
- auto isNull = mBfIRBuilder->CreateIsNull(typedVal.mValue);
- mBfIRBuilder->CreateCondBr(isNull, nullBB, notNullBB);
- int dataIdx = toTypeInst->mFieldInstances[1].mDataIdx;
- mBfIRBuilder->AddBlock(nullBB);
- mBfIRBuilder->SetInsertPoint(nullBB);
- auto hasValueAddr = mBfIRBuilder->CreateInBoundsGEP(allocaInst, 0, hasValueIdx); // has_value
- mBfIRBuilder->CreateStore(GetConstValue(0, boolType), hasValueAddr);
- auto nullableValueAddr = mBfIRBuilder->CreateInBoundsGEP(allocaInst, 0, valueIdx); // value
- auto nullableValueBits = mBfIRBuilder->CreateBitCast(nullableValueAddr, mBfIRBuilder->GetPrimitiveType(BfTypeCode_NullPtr));
- mBfIRBuilder->CreateMemSet(nullableValueBits, GetConstValue(0, GetPrimitiveType(BfTypeCode_Int8)), GetConstValue(elementType->mSize), elementType->mAlign);
- mBfIRBuilder->CreateBr(endBB);
- mBfIRBuilder->AddBlock(notNullBB);
- mBfIRBuilder->SetInsertPoint(notNullBB);
- hasValueAddr = mBfIRBuilder->CreateInBoundsGEP(allocaInst, 0, hasValueIdx); // has_value
- mBfIRBuilder->CreateStore(GetConstValue(1, boolType), hasValueAddr);
- nullableValueAddr = mBfIRBuilder->CreateInBoundsGEP(allocaInst, 0, valueIdx); // value
- auto srcObjBits = mBfIRBuilder->CreateBitCast(typedVal.mValue, mBfIRBuilder->MapType(ptrElementType));
- auto boxedValueAddr = mBfIRBuilder->CreateInBoundsGEP(srcObjBits, 1); // Skip over vdata
- auto boxedValue = mBfIRBuilder->CreateLoad(boxedValueAddr);
- mBfIRBuilder->CreateStore(boxedValue, nullableValueAddr);
- mBfIRBuilder->CreateBr(endBB);
- mBfIRBuilder->AddBlock(endBB);
- mBfIRBuilder->SetInsertPoint(endBB);
- if (resultFlags != NULL)
- *resultFlags = (BfCastResultFlags)(BfCastResultFlags_IsAddr | BfCastResultFlags_IsTemp);
- return allocaInst;
- }
-
- auto boxedType = CreateBoxedType(toType);
- mBfIRBuilder->PopulateType(boxedType);
- AddDependency(boxedType, mCurTypeInstance, BfDependencyMap::DependencyFlag_ReadFields);
- auto boxedObj = mBfIRBuilder->CreateBitCast(typedVal.mValue, mBfIRBuilder->MapType(boxedType));
- auto valPtr = mBfIRBuilder->CreateInBoundsGEP(boxedObj, 0, 1);
- if ((toType->IsPrimitiveType()) || (toType->IsTypedPrimitive()) || (toType->IsPointer()) || (toType->IsSizedArray()) || (toType->IsMethodRef()))
- {
- valPtr = mBfIRBuilder->CreateBitCast(valPtr, mBfIRBuilder->GetPointerTo(mBfIRBuilder->MapType(toType)));
- }
- if ((toType->IsComposite()) && (resultFlags != NULL))
- {
- *resultFlags = BfCastResultFlags_IsAddr;
- return valPtr;
- }
- else
- return mBfIRBuilder->CreateLoad(valPtr, false);
- }
-
- // Null -> Nullable<T>
- if ((typedVal.mType->IsNull()) && (toType->IsNullable()))
- {
- if (ignoreWrites)
- return mBfIRBuilder->GetFakeVal();
- if ((castFlags & BfCastFlags_PreferAddr) != 0)
- {
- auto boolType = GetPrimitiveType(BfTypeCode_Boolean);
- auto toTypeInst = toType->ToTypeInstance();
- int hasValueIdx = toTypeInst->mFieldInstances[1].mDataIdx;
-
- auto allocaInst = CreateAlloca(toType);
- auto hasValueAddr = mBfIRBuilder->CreateInBoundsGEP(allocaInst, 0, hasValueIdx); // has_value
- mBfIRBuilder->CreateStore(GetConstValue(0, boolType), hasValueAddr);
-
- auto typedValue = BfTypedValue(allocaInst, toType, true);
- if (resultFlags != NULL)
- *resultFlags = (BfCastResultFlags)(BfCastResultFlags_IsAddr | BfCastResultFlags_IsTemp);
- return allocaInst;
- }
- auto zeroNullable = mBfIRBuilder->CreateConstAggZero(mBfIRBuilder->MapType(toType));
- return zeroNullable;
- }
- // Nullable<A> -> Nullable<B>
- if ((typedVal.mType->IsNullable()) && (toType->IsNullable()))
- {
- auto fromNullableType = (BfTypeInstance*)typedVal.mType;
- auto toNullableType = (BfTypeInstance*)toType;
- if (ignoreWrites)
- {
- auto toVal = CastToValue(srcNode, BfTypedValue(mBfIRBuilder->GetFakeVal(), fromNullableType->mGenericTypeInfo->mTypeGenericArguments[0]),
- toNullableType->mGenericTypeInfo->mTypeGenericArguments[0], ignoreErrors ? BfCastFlags_SilentFail : BfCastFlags_None);
- if (!toVal)
- return BfIRValue();
- return mBfIRBuilder->GetFakeVal();
- }
-
- BfIRValue srcPtr = typedVal.mValue;
- if (!typedVal.IsAddr())
- {
- auto srcAlloca = CreateAllocaInst(fromNullableType);
- mBfIRBuilder->CreateStore(typedVal.mValue, srcAlloca);
- srcPtr = srcAlloca;
- }
- auto srcAddr = mBfIRBuilder->CreateInBoundsGEP(srcPtr, 0, 1); // mValue
- auto srcVal = mBfIRBuilder->CreateLoad(srcAddr);
- auto toVal = CastToValue(srcNode, BfTypedValue(srcVal, fromNullableType->mGenericTypeInfo->mTypeGenericArguments[0]),
- toNullableType->mGenericTypeInfo->mTypeGenericArguments[0], ignoreErrors ? BfCastFlags_SilentFail : BfCastFlags_None);
- if (!toVal)
- return BfIRValue();
- auto allocaInst = CreateAllocaInst(toNullableType);
- auto destAddr = mBfIRBuilder->CreateInBoundsGEP(allocaInst, 0, 1); // mValue
- mBfIRBuilder->CreateStore(toVal, destAddr);
- srcAddr = mBfIRBuilder->CreateInBoundsGEP(srcPtr, 0, 2); // mHasValue
- srcVal = mBfIRBuilder->CreateLoad(srcAddr);
- destAddr = mBfIRBuilder->CreateInBoundsGEP(allocaInst, 0, 2); // mHasValue
- mBfIRBuilder->CreateStore(srcVal, destAddr);
- if (resultFlags != NULL)
- *resultFlags = (BfCastResultFlags)(BfCastResultFlags_IsAddr | BfCastResultFlags_IsTemp);
- return allocaInst;
- }
- // Tuple -> Tuple
- if ((typedVal.mType->IsTuple()) && (toType->IsTuple()))
- {
- auto fromTupleType = (BfTypeInstance*)typedVal.mType;
- auto toTupleType = (BfTypeInstance*)toType;
- PopulateType(fromTupleType);
- PopulateType(toTupleType);
- if (fromTupleType->mFieldInstances.size() == toTupleType->mFieldInstances.size())
- {
- typedVal = LoadValue(typedVal);
- BfIRValue curTupleValue = mBfIRBuilder->CreateUndefValue(mBfIRBuilder->MapType(toTupleType));
- for (int valueIdx = 0; valueIdx < (int)fromTupleType->mFieldInstances.size(); valueIdx++)
- {
- BfFieldInstance* fromFieldInstance = &fromTupleType->mFieldInstances[valueIdx];
- BfFieldInstance* toFieldInstance = &toTupleType->mFieldInstances[valueIdx];
- if (!explicitCast)
- {
- BfFieldDef* fromFieldDef = fromFieldInstance->GetFieldDef();
- BfFieldDef* toFieldDef = toFieldInstance->GetFieldDef();
- // Either the names have to match or one has to be unnamed
- if ((!fromFieldDef->IsUnnamedTupleField()) && (!toFieldDef->IsUnnamedTupleField()) &&
- (fromFieldDef->mName != toFieldDef->mName))
- {
- curTupleValue = BfIRValue();
- break;
- }
- }
- auto fromFieldType = fromFieldInstance->GetResolvedType();
- auto toFieldType = toFieldInstance->GetResolvedType();
- if (toFieldType->IsVoid())
- continue; // Allow sinking to void
- BfIRValue fromFieldValue;
- if (fromFieldInstance->mDataIdx >= 0)
- fromFieldValue = mBfIRBuilder->CreateExtractValue(typedVal.mValue, fromFieldInstance->mDataIdx);
- BfIRValue toFieldValue = CastToValue(srcNode, BfTypedValue(fromFieldValue, fromFieldType), toFieldType, (BfCastFlags)(castFlags | BfCastFlags_Explicit));
- if (!toFieldValue)
- {
- curTupleValue = BfIRValue();
- break;
- }
- if (toFieldInstance->mDataIdx >= 0)
- curTupleValue = mBfIRBuilder->CreateInsertValue(curTupleValue, toFieldValue, toFieldInstance->mDataIdx);
- }
- if (curTupleValue)
- return curTupleValue;
- }
- }
- // -> const <value>
- if (toType->IsConstExprValue())
- {
- auto constant = mBfIRBuilder->GetConstant(typedVal.mValue);
- if (constant != NULL)
- {
- BfConstExprValueType* toConstExprValueType = (BfConstExprValueType*)toType;
-
- auto variantVal = TypedValueToVariant(srcNode, typedVal);
- if ((mBfIRBuilder->IsInt(variantVal.mTypeCode)) && (mBfIRBuilder->IsInt(toConstExprValueType->mValue.mTypeCode)))
- {
- if (variantVal.mInt64 == toConstExprValueType->mValue.mInt64)
- return typedVal.mValue;
- }
- else if ((mBfIRBuilder->IsFloat(variantVal.mTypeCode)) && (mBfIRBuilder->IsFloat(toConstExprValueType->mValue.mTypeCode)))
- {
- if (variantVal.ToDouble() == toConstExprValueType->mValue.ToDouble())
- return typedVal.mValue;
- }
- if (toConstExprValueType->mValue.mTypeCode == BfTypeCode_StringId)
- {
- int stringIdx = GetStringPoolIdx(typedVal.mValue, mBfIRBuilder);
- if ((stringIdx != -1) && (stringIdx == toConstExprValueType->mValue.mInt32))
- return typedVal.mValue;
- }
- if (!ignoreErrors)
- {
- String valStr;
- VariantToString(valStr, variantVal);
- Fail(StrFormat("Unable to cast '%s %s' to '%s'", TypeToString(typedVal.mType).c_str(), valStr.c_str(), TypeToString(toType).c_str()), srcNode);
- }
- else if (!silentFail)
- SetFail();
- }
- }
- if ((typedVal.mType->IsPrimitiveType()) && (toType->IsPrimitiveType()))
- {
- auto fromPrimType = (BfPrimitiveType*)typedVal.mType;
- auto toPrimType = (BfPrimitiveType*)toType;
- BfTypeCode fromTypeCode = fromPrimType->mTypeDef->mTypeCode;
- BfTypeCode toTypeCode = toPrimType->mTypeDef->mTypeCode;
- if (toType->IsIntegral())
- {
- // Allow constant ints to be implicitly casted to a smaller type if they fit
- auto constant = mBfIRBuilder->GetConstant(typedVal.mValue);
- if (constant != NULL)
- {
- if (mBfIRBuilder->IsInt(constant->mTypeCode))
- {
- int64 srcVal = constant->mInt64;
- if (toPrimType->IsChar())
- {
- if (srcVal == 0)
- explicitCast = true;
- }
- else if ((fromPrimType->IsChar()) && (!toPrimType->IsChar()))
- {
- // Never allow this
- }
- else if ((constant->mTypeCode == BfTypeCode_UInt64) && (srcVal < 0))
- {
- // There's nothing that this could fit into
- }
- else if (toType->IsSigned())
- {
- if (toType->mSize == 8) // int64
- explicitCast = true;
- else
- {
- int64 minVal = -(1LL << (8 * toType->mSize - 1));
- int64 maxVal = (1LL << (8 * toType->mSize - 1)) - 1;
- if ((srcVal >= minVal) && (srcVal <= maxVal))
- explicitCast = true;
- }
- }
- else if (toType->mSize == 8) // uint64
- {
- if (srcVal >= 0)
- explicitCast = true;
- }
- else
- {
- int64 minVal = 0;
- int64 maxVal = (1LL << (8 * toType->mSize)) - 1;
- if ((srcVal >= minVal) && (srcVal <= maxVal))
- explicitCast = true;
- }
- }
- else if (constant->mConstType == BfConstType_Undef)
- {
- if (mIsComptimeModule)
- return mBfIRBuilder->GetUndefConstValue(mBfIRBuilder->MapType(toType));
- BF_ASSERT(mBfIRBuilder->mIgnoreWrites);
- auto undefConst = (BfConstantUndef*)constant;
-
- BF_ASSERT(undefConst->mType.mKind == BfIRTypeData::TypeKind_TypeId);
- auto bfType = mContext->mTypes[undefConst->mType.mId];
- auto fakeVal = GetFakeTypedValue(bfType);
- auto val = CastToValue(srcNode, fakeVal, toType, castFlags);
- if (val)
- return mBfIRBuilder->GetUndefConstValue(mBfIRBuilder->MapType(toType));
- }
- }
- }
- bool allowCast = false;
- switch (toTypeCode)
- {
- case BfTypeCode_Char16:
- switch (fromTypeCode)
- {
- case BfTypeCode_Char8:
- allowCast = true; break;
- default: break;
- }
- break;
- case BfTypeCode_Int16:
- switch (fromTypeCode)
- {
- case BfTypeCode_Int8:
- allowCast = true; break;
- case BfTypeCode_UInt8:
- allowCast = true; break;
- default: break;
- }
- break;
- case BfTypeCode_UInt16:
- switch (fromTypeCode)
- {
- case BfTypeCode_UInt8:
- allowCast = true; break;
- default: break;
- }
- break;
- case BfTypeCode_Int32:
- switch (fromTypeCode)
- {
- case BfTypeCode_Int8:
- case BfTypeCode_Int16:
- allowCast = true; break;
- case BfTypeCode_IntPtr:
- if (mCompiler->mSystem->mPtrSize == 4)
- allowCast = true;
- break;
- case BfTypeCode_UInt8:
- case BfTypeCode_UInt16:
- allowCast = true; break;
- default: break;
- }
- break;
- case BfTypeCode_Char32:
- switch (fromTypeCode)
- {
- case BfTypeCode_Char8:
- case BfTypeCode_Char16:
- allowCast = true; break;
- default: break;
- }
- break;
- case BfTypeCode_UInt32:
- switch (fromTypeCode)
- {
- case BfTypeCode_UInt8:
- case BfTypeCode_UInt16:
- case BfTypeCode_UInt32:
- allowCast = true; break;
- case BfTypeCode_UIntPtr:
- if (mCompiler->mSystem->mPtrSize == 4)
- allowCast = true;
- break;
- default: break;
- }
- break;
- case BfTypeCode_Int64:
- switch (fromTypeCode)
- {
- case BfTypeCode_Int8:
- case BfTypeCode_Int16:
- case BfTypeCode_Int32:
- case BfTypeCode_IntPtr:
- allowCast = true; break;
- case BfTypeCode_UInt8:
- case BfTypeCode_UInt16:
- case BfTypeCode_UInt32:
- allowCast = true; break;
- default: break;
- }
- break;
- case BfTypeCode_UInt64:
- switch (fromTypeCode)
- {
- case BfTypeCode_UInt8:
- case BfTypeCode_UInt16:
- case BfTypeCode_UInt32:
- case BfTypeCode_UIntPtr:
- allowCast = true; break;
- default: break;
- }
- break;
- case BfTypeCode_IntPtr:
- switch (fromTypeCode)
- {
- case BfTypeCode_Int8:
- case BfTypeCode_Int16:
- case BfTypeCode_Int32:
- allowCast = true; break;
- case BfTypeCode_UInt8:
- case BfTypeCode_UInt16:
- allowCast = true; break;
- case BfTypeCode_UInt32:
- case BfTypeCode_Int64:
- // It may seem that we want this to require an explicit cast,
- // but consider the case of
- // int val = Math.Max(intA, intB)
- // Math.Max has an int32 and int64 override, so we want the correct one to be chosen and
- // to be able to have the int64 return value implicitly used in a 64-bit build
- if (mCompiler->mSystem->mPtrSize == 8)
- allowCast = true;
- break;
- default: break;
- }
- break;
- case BfTypeCode_UIntPtr:
- switch (fromTypeCode)
- {
- case BfTypeCode_UInt8:
- case BfTypeCode_UInt16:
- case BfTypeCode_UInt32:
- allowCast = true; break;
- case BfTypeCode_UInt64:
- if (mCompiler->mSystem->mPtrSize == 8)
- allowCast = true;
- break;
- default: break;
- }
- break;
- case BfTypeCode_Float:
- switch (fromTypeCode)
- {
- case BfTypeCode_Int8:
- case BfTypeCode_Int16:
- case BfTypeCode_Int32:
- case BfTypeCode_Int64:
- case BfTypeCode_IntPtr:
- case BfTypeCode_IntUnknown:
- allowCast = true; break;
- case BfTypeCode_UInt8:
- case BfTypeCode_UInt16:
- case BfTypeCode_UInt32:
- case BfTypeCode_UInt64:
- case BfTypeCode_UIntPtr:
- case BfTypeCode_UIntUnknown:
- allowCast = true; break;
- default: break;
- }
- break;
- case BfTypeCode_Double:
- switch (fromTypeCode)
- {
- case BfTypeCode_Int8:
- case BfTypeCode_Int16:
- case BfTypeCode_Int32:
- case BfTypeCode_Int64:
- case BfTypeCode_IntPtr:
- case BfTypeCode_IntUnknown:
- allowCast = true; break;
- case BfTypeCode_UInt8:
- case BfTypeCode_UInt16:
- case BfTypeCode_UInt32:
- case BfTypeCode_UInt64:
- case BfTypeCode_UIntPtr:
- case BfTypeCode_UIntUnknown:
- allowCast = true; break;
- case BfTypeCode_Float:
- allowCast = true; break;
- default: break;
- }
- break;
- default: break;
- }
- if (explicitCast)
- {
- if (((fromPrimType->IsIntegral()) || (fromPrimType->IsFloat())) &&
- ((toType->IsIntegral()) || (toType->IsFloat())))
- allowCast = true;
- }
- if (allowCast)
- {
- if (typedVal.IsAddr())
- typedVal = LoadValue(typedVal);
- return mBfIRBuilder->CreateNumericCast(typedVal.mValue, typedVal.mType->IsSigned(), toTypeCode);
- }
- }
- if (typedVal.mValue.IsConst())
- {
- if ((toType->IsPointer()) && (toType->GetUnderlyingType() == GetPrimitiveType(BfTypeCode_Char8)) && (typedVal.mType->IsInstanceOf(mCompiler->mStringTypeDef)))
- {
- int stringId = GetStringPoolIdx(typedVal.mValue, mBfIRBuilder);
- if (stringId >= 0)
- return GetStringCharPtr(stringId);
- }
- else if ((toType->IsInstanceOf(mCompiler->mStringViewTypeDef)))
- {
- int stringId = GetStringPoolIdx(typedVal.mValue, mBfIRBuilder);
- bool isNull = false;
- auto constant = mBfIRBuilder->GetConstant(typedVal.mValue);
- if (constant->mTypeCode == BfTypeCode_NullPtr)
- isNull = true;
- if ((stringId >= 0) || (isNull))
- {
- int strLen = 0;
- String str;
- BfStringPoolEntry* entry = NULL;
- if ((isNull) || (mContext->mStringObjectIdMap.TryGetValue(stringId, &entry)))
- {
- auto svTypeInst = toType->ToTypeInstance();
- PopulateType(svTypeInst);
- PopulateType(svTypeInst->mBaseType);
- mBfIRBuilder->PopulateType(svTypeInst);
-
- SizedArray<BfIRValue, 2> spanFieldVals;
- spanFieldVals.Add(mBfIRBuilder->CreateConstAggZero(mBfIRBuilder->MapType(svTypeInst->mBaseType->mBaseType)));
- if (isNull)
- {
- spanFieldVals.Add(mBfIRBuilder->CreateConstNull());
- spanFieldVals.Add(mBfIRBuilder->CreateConst(BfTypeCode_IntPtr, 0));
- }
- else
- {
- auto stringCharPtr = GetStringCharPtr(stringId);
- spanFieldVals.Add(stringCharPtr);
- spanFieldVals.Add(mBfIRBuilder->CreateConst(BfTypeCode_IntPtr, entry->mString.mLength));
- }
- SizedArray<BfIRValue, 2> svFieldVals;
- svFieldVals.Add(mBfIRBuilder->CreateConstAgg(mBfIRBuilder->MapType(svTypeInst->mBaseType), spanFieldVals));
- return mBfIRBuilder->CreateConstAgg(mBfIRBuilder->MapType(svTypeInst), svFieldVals);
- }
- }
- }
- }
- // Check user-defined operators
- if (((castFlags & BfCastFlags_NoConversionOperator) == 0) && (toType != mContext->mBfObjectType))
- {
- BfType* walkFromType = typedVal.mType;
- if (walkFromType->IsWrappableType())
- walkFromType = GetWrappedStructType(walkFromType);
- BfType* walkToType = toType;
- if (walkToType->IsWrappableType())
- walkToType = GetWrappedStructType(walkToType);
- SizedArray<BfResolvedArg, 1> args;
- BfResolvedArg resolvedArg;
- resolvedArg.mTypedValue = typedVal;
- if (resolvedArg.mTypedValue.IsParams())
- {
- resolvedArg.mTypedValue = LoadOrAggregateValue(resolvedArg.mTypedValue);
- resolvedArg.mTypedValue.mKind = BfTypedValueKind_Value;
- }
- args.push_back(resolvedArg);
- BfMethodMatcher methodMatcher(srcNode, this, "", args, BfMethodGenericArguments());
- methodMatcher.mCheckReturnType = toType;
- methodMatcher.mBfEvalExprFlags = (BfEvalExprFlags)(BfEvalExprFlags_NoAutoComplete | BfEvalExprFlags_FromConversionOp);
- if ((castFlags & BfCastFlags_Explicit) != 0)
- methodMatcher.mBfEvalExprFlags = (BfEvalExprFlags)(methodMatcher.mBfEvalExprFlags | BfEvalExprFlags_FromConversionOp_Explicit);
- methodMatcher.mAllowImplicitRef = true;
- methodMatcher.mAllowImplicitWrap = true;
- BfBaseClassWalker baseClassWalker(walkFromType, walkToType, this);
-
- bool isConstraintCheck = ((castFlags & BfCastFlags_IsConstraintCheck) != 0);
- BfType* operatorConstraintReturnType = NULL;
- BfType* bestSelfType = NULL;
- while (true)
- {
- auto entry = baseClassWalker.Next();
- auto checkType = entry.mTypeInstance;
- if (checkType == NULL)
- break;
- for (auto operatorDef : checkType->mTypeDef->mOperators)
- {
- if (operatorDef->mOperatorDeclaration->mIsConvOperator)
- {
- if ((!explicitCast) && (operatorDef->IsExplicit()))
- continue;
- if (!methodMatcher.IsMemberAccessible(checkType, operatorDef->mDeclaringType))
- continue;
- int prevArgSize = (int)args.mSize;
- if (!operatorDef->mIsStatic)
- {
- // Try without arg
- args.mSize = 0;
- }
-
- if (isConstraintCheck)
- {
- auto returnType = CheckOperator(checkType, operatorDef, typedVal, BfTypedValue());
- if (returnType != NULL)
- {
- operatorConstraintReturnType = returnType;
- methodMatcher.mBestMethodDef = operatorDef;
- }
- }
- else
- {
- if (methodMatcher.CheckMethod(NULL, checkType, operatorDef, false))
- methodMatcher.mSelfType = entry.mSrcType;
- }
- args.mSize = prevArgSize;
- }
- }
- }
-
- if (methodMatcher.mBestMethodDef != NULL)
- {
- if (mayBeBox)
- {
- if (!ignoreErrors)
- {
- if (Fail("Ambiguous cast, may be conversion operator or may be boxing request", srcNode) != NULL)
- mCompiler->mPassInstance->MoreInfo("See conversion operator", methodMatcher.mBestMethodDef->GetRefNode());
- }
- else if (!silentFail)
- SetFail();
- }
- }
- if (methodMatcher.mBestMethodDef == NULL)
- {
- // Check method generic constraints
- if ((mCurMethodInstance != NULL) && (mCurMethodInstance->mIsUnspecialized) && (mCurMethodInstance->mMethodInfoEx != NULL))
- {
- for (int genericParamIdx = 0; genericParamIdx < mCurMethodInstance->mMethodInfoEx->mGenericParams.size(); genericParamIdx++)
- {
- auto genericParam = mCurMethodInstance->mMethodInfoEx->mGenericParams[genericParamIdx];
- for (auto& opConstraint : genericParam->mOperatorConstraints)
- {
- if ((opConstraint.mCastToken == BfToken_Implicit) ||
- ((explicitCast) && (opConstraint.mCastToken == BfToken_Explicit)))
- {
- // If we can convert OUR fromVal to the constraint's fromVal then we may match
- if (CanCast(typedVal, opConstraint.mRightType, BfCastFlags_NoConversionOperator))
- {
- // .. and we can convert the constraint's toType to OUR toType then we're good
- auto opToVal = genericParam->mExternType;
- if (CanCast(BfTypedValue(BfIRValue::sValueless, opToVal), toType, BfCastFlags_NoConversionOperator))
- return mBfIRBuilder->GetFakeVal();
- }
- }
- }
- }
- }
- // Check type generic constraints
- if ((mCurTypeInstance != NULL) && (mCurTypeInstance->IsGenericTypeInstance()) && (mCurTypeInstance->IsUnspecializedType()))
- {
- SizedArray<BfGenericParamInstance*, 4> genericParams;
- GetActiveTypeGenericParamInstances(genericParams);
- for (auto genericParam : genericParams)
- {
- for (auto& opConstraint : genericParam->mOperatorConstraints)
- {
- if ((opConstraint.mCastToken == BfToken_Implicit) ||
- ((explicitCast) && (opConstraint.mCastToken == BfToken_Explicit)))
- {
- // If we can convert OUR fromVal to the constraint's fromVal then we may match
- if (CanCast(typedVal, opConstraint.mRightType, BfCastFlags_NoConversionOperator))
- {
- // .. and we can convert the constraint's toType to OUR toType then we're good
- auto opToVal = genericParam->mExternType;
- if (CanCast(BfTypedValue(BfIRValue::sValueless, opToVal), toType, BfCastFlags_NoConversionOperator))
- return mBfIRBuilder->GetFakeVal();
- }
- }
- }
- }
- }
- }
- else if (isConstraintCheck)
- {
- auto result = BfTypedValue(mBfIRBuilder->GetFakeVal(), operatorConstraintReturnType);
- if (result.mType != toType)
- return CastToValue(srcNode, result, toType, (BfCastFlags)(castFlags | BfCastFlags_Explicit | BfCastFlags_NoConversionOperator), resultFlags);
- if (result)
- return result.mValue;
- }
- else
- {
- BfTypedValue result;
- BfExprEvaluator exprEvaluator(this);
- exprEvaluator.mBfEvalExprFlags = BfEvalExprFlags_FromConversionOp;
- if ((castFlags & BfCastFlags_WantsConst) != 0)
- exprEvaluator.mBfEvalExprFlags = (BfEvalExprFlags)(exprEvaluator.mBfEvalExprFlags | BfEvalExprFlags_Comptime);
- auto methodDeclaration = BfNodeDynCast<BfMethodDeclaration>(methodMatcher.mBestMethodDef->mMethodDeclaration);
- if ((methodDeclaration != NULL) && (methodDeclaration->mBody == NULL))
- {
- auto fromType = typedVal.mType;
- // Handle the typedPrim<->underlying part implicitly
- if (fromType->IsTypedPrimitive())
- {
- auto convTypedValue = BfTypedValue(typedVal.mValue, fromType->GetUnderlyingType());
- return CastToValue(srcNode, convTypedValue, toType, (BfCastFlags)(castFlags & ~BfCastFlags_Explicit), NULL);
- }
- else if (toType->IsTypedPrimitive())
- {
- auto castedVal = CastToValue(srcNode, typedVal, toType->GetUnderlyingType(), (BfCastFlags)(castFlags & ~BfCastFlags_Explicit), NULL);
- return castedVal;
- }
- }
- bool doCall = true;
- auto moduleMethodInstance = exprEvaluator.GetSelectedMethod(methodMatcher);
- if (moduleMethodInstance.mMethodInstance != NULL)
- {
- auto returnType = moduleMethodInstance.mMethodInstance->mReturnType;
- auto paramType = moduleMethodInstance.mMethodInstance->GetParamType(0);
- BfCastFlags implicitCastFlags = (BfCastFlags)(castFlags & ~BfCastFlags_Explicit | BfCastFlags_NoConversionOperator);
- // Check typedPrimitive->underlying cast
- if ((explicitCast) && (typedVal.mType->IsTypedPrimitive()))
- {
- auto underlyingType = typedVal.mType->GetUnderlyingType();
- if ((returnType == underlyingType) && (explicitCast))
- {
- doCall = false;
- }
- else if ((CanCast(GetFakeTypedValue(underlyingType), toType, (BfCastFlags)(castFlags | BfCastFlags_NoConversionOperator))))
- {
- float underlyingCanCast = CanCast(GetFakeTypedValue(underlyingType), toType, implicitCastFlags);
- float returnCanCast = CanCast(GetFakeTypedValue(returnType), toType, implicitCastFlags);
- if ((underlyingCanCast) &&
- (!returnCanCast))
- {
- doCall = false;
- }
- else if ((returnCanCast) &&
- (!underlyingCanCast))
- {
- // Can do
- }
- else if ((CanCast(GetFakeTypedValue(underlyingType), returnType, implicitCastFlags)) &&
- (!CanCast(GetFakeTypedValue(returnType), underlyingType, implicitCastFlags)))
- {
- // Can do
- }
- else
- doCall = false;
- }
- }
- // Check underlying->typedPrimitive cast
- if ((explicitCast) && (toType->IsTypedPrimitive()))
- {
- auto underlyingType = toType->GetUnderlyingType();
- if ((paramType == underlyingType) && (explicitCast))
- {
- doCall = false;
- }
- else if (CanCast(typedVal, underlyingType, (BfCastFlags)(castFlags | BfCastFlags_NoConversionOperator)))
- {
- float underlyingCanCast = CanCast(typedVal, underlyingType, implicitCastFlags);
- float paramCanCast = CanCast(typedVal, paramType, implicitCastFlags);
- if ((underlyingType) &&
- (!paramCanCast))
- {
- doCall = false;
- }
- else if ((paramCanCast) &&
- (!underlyingCanCast))
- {
- // Can do
- }
- else if ((CanCast(GetFakeTypedValue(underlyingType), paramType, implicitCastFlags)) &&
- (!CanCast(GetFakeTypedValue(paramType), underlyingType, implicitCastFlags)))
- {
- // Can do
- }
- else
- doCall = false;
- }
- }
- if (doCall)
- {
- if (!silentFail)
- methodMatcher.FlushAmbiguityError();
- auto wantType = paramType;
- if (wantType->IsRef())
- wantType = wantType->GetUnderlyingType();
- auto convTypedVal = methodMatcher.mArguments[0].mTypedValue;
- if (wantType != convTypedVal.mType)
- {
- if ((convTypedVal.mType->IsWrappableType()) && (wantType == GetWrappedStructType(convTypedVal.mType)))
- {
- convTypedVal = MakeAddressable(convTypedVal);
- methodMatcher.mArguments[0].mTypedValue = BfTypedValue(mBfIRBuilder->CreateBitCast(convTypedVal.mValue, mBfIRBuilder->MapTypeInstPtr(wantType->ToTypeInstance())),
- paramType, paramType->IsRef() ? BfTypedValueKind_Value : BfTypedValueKind_Addr);
- }
- else
- {
- methodMatcher.mArguments[0].mTypedValue = Cast(srcNode, convTypedVal, wantType, (BfCastFlags)(castFlags | BfCastFlags_Explicit | BfCastFlags_NoConversionOperator));
- if (paramType->IsRef())
- {
- convTypedVal = MakeAddressable(convTypedVal);
- convTypedVal.mKind = BfTypedValueKind_Addr;
- }
- }
- }
- }
- }
- if (doCall)
- {
- if ((castFlags & BfCastFlags_IsCastCheck) != 0)
- {
- // We've already verified that we can cast from the return type to toType in MethodMatcher.CheckMethod
- return mBfIRBuilder->GetFakeVal();
- }
-
- result = exprEvaluator.CreateCall(&methodMatcher, BfTypedValue());
- if (result.mType != toType)
- return CastToValue(srcNode, result, toType, (BfCastFlags)(castFlags | BfCastFlags_Explicit | BfCastFlags_NoConversionOperator), resultFlags);
- if (result)
- {
- if (resultFlags != NULL)
- {
- if (result.IsAddr())
- *resultFlags = (BfCastResultFlags)(*resultFlags | BfCastResultFlags_IsAddr);
- if (result.mKind == BfTypedValueKind_TempAddr)
- *resultFlags = (BfCastResultFlags)(*resultFlags | BfCastResultFlags_IsTemp);
- }
- else if (result.IsAddr())
- result = LoadValue(result);
- return result.mValue;
- }
- }
- }
- }
-
- // Default typed primitive 'underlying casts' happen after checking cast operators
- if (explicitCast)
- {
- // TypedPrimitive -> Primitive
- if ((typedVal.mType->IsTypedPrimitive()) && (!typedVal.mType->IsFunction()) && (toType->IsPrimitiveType()))
- {
- auto fromTypedPrimitiveType = typedVal.mType->ToTypeInstance();
- auto primTypedVal = BfTypedValue(typedVal.mValue, fromTypedPrimitiveType->mFieldInstances.back().mResolvedType, typedVal.IsAddr());
- primTypedVal = LoadValue(primTypedVal);
- return CastToValue(srcNode, primTypedVal, toType, castFlags);
- }
- // TypedPrimitive -> TypedPrimitive
- if ((typedVal.mType->IsTypedPrimitive()) && (!typedVal.mType->IsFunction()) && (toType->IsTypedPrimitive()))
- {
- auto fromTypedPrimitiveType = typedVal.mType->ToTypeInstance();
- auto toTypedPrimitiveType = toType->ToTypeInstance();
- auto fromUnderlyingType = fromTypedPrimitiveType->GetUnderlyingType();
- auto toUnderlyingType = toTypedPrimitiveType->GetUnderlyingType();
- BfTypedValue underlyingTypedValue(typedVal.mValue, fromUnderlyingType, typedVal.IsAddr());
- underlyingTypedValue = LoadValue(underlyingTypedValue);
- BfIRValue castedToValue = CastToValue(srcNode, underlyingTypedValue, toUnderlyingType, (BfCastFlags)(castFlags | BfCastFlags_Explicit));
- if (castedToValue)
- return castedToValue;
- }
- }
- else if ((typedVal.mType->IsTypedPrimitive()) && (toType->IsTypedPrimitive()))
- {
- if (TypeIsSubTypeOf(typedVal.mType->ToTypeInstance(), toType->ToTypeInstance()))
- {
- // These have the same underlying primitive type, just keep it all the same
- if ((resultFlags != NULL) && (typedVal.IsAddr()))
- *resultFlags = BfCastResultFlags_IsAddr;
- return typedVal.mValue;
- }
- }
- // Prim -> TypedPrimitive
- if ((typedVal.mType->IsPrimitiveType()) && (toType->IsTypedPrimitive()))
- {
- bool allowCast = explicitCast;
- if (toType == mCurTypeInstance)
- allowCast = true;
- if ((!allowCast) && (typedVal.mType->IsIntegral()) /*&& (!toType->IsEnum())*/)
- {
- // Allow implicit cast of zero
- auto constant = mBfIRBuilder->GetConstant(typedVal.mValue);
- if ((constant != NULL) && (mBfIRBuilder->IsInt(constant->mTypeCode)))
- {
- allowCast = constant->mInt64 == 0;
- }
- }
- if (allowCast)
- {
- return CastToValue(srcNode, typedVal, toType->GetUnderlyingType(), castFlags);
- }
- }
- if (typedVal.mType->IsBoxed())
- {
- BfBoxedType* boxedType = (BfBoxedType*)typedVal.mType;
- if (boxedType->mElementType->IsGenericParam())
- {
- // If we have a boxed generic param, the actual available interfaces constraints won't be
- // handled, so we need to pass through again as the root generic param
- BfTypedValue unboxedValue = typedVal;
- unboxedValue.mType = boxedType->mElementType;
- auto result = CastToValue(srcNode, unboxedValue, toType, (BfCastFlags)(castFlags | BfCastFlags_SilentFail), resultFlags);
- if (result)
- return result;
- }
- }
- if ((mayBeBox) && ((castFlags & BfCastFlags_NoBox) == 0))
- {
- BfScopeData* scopeData = NULL;
- if (mCurMethodState != NULL)
- {
- if (mCurMethodState->mOverrideScope)
- scopeData = mCurMethodState->mOverrideScope;
- else
- scopeData = mCurMethodState->mCurScope;
- }
- if ((castFlags & BfCastFlags_WarnOnBox) != 0)
- {
- Warn(0, "This implicit boxing will only be in scope during the constructor. Consider using a longer-term allocation such as 'box new'", srcNode);
- }
- SetAndRestoreValue<bool> prevIgnoreWrites(mBfIRBuilder->mIgnoreWrites, ignoreWrites);
- auto value = BoxValue(srcNode, typedVal, toType, scopeData, castFlags);
- if (value)
- return value.mValue;
- }
- if (!ignoreErrors)
- {
- const char* errStrF = explicitCast ?
- "Unable to cast '%s' to '%s'" :
- "Unable to implicitly cast '%s' to '%s'";
- String errStr = StrFormat(errStrF, TypeToString(typedVal.mType).c_str(), TypeToString(toType).c_str());
- auto error = Fail(errStr, srcNode);
- if ((error != NULL) && (srcNode != NULL))
- {
- if ((mCompiler->IsAutocomplete()) && (mCompiler->mResolvePassData->mAutoComplete->CheckFixit((srcNode))))
- {
- SetAndRestoreValue<bool> ignoreWrites(mBfIRBuilder->mIgnoreWrites);
- SetAndRestoreValue<bool> ignoreErrors(mIgnoreErrors, true);
- if (CastToValue(srcNode, typedVal, toType, (BfCastFlags)(BfCastFlags_Explicit | BfCastFlags_SilentFail)))
- {
- bool doWrap = false;
- if (auto unaryOpExpr = BfNodeDynCast<BfUnaryOperatorExpression>(srcNode))
- {
- if ((unaryOpExpr->mOp != BfUnaryOp_AddressOf) && (unaryOpExpr->mOp != BfUnaryOp_Dereference))
- doWrap = true;
- }
- if ((srcNode->IsA<BfCastExpression>()) ||
- (srcNode->IsA<BfBinaryOperatorExpression>()) ||
- (srcNode->IsA<BfConditionalExpression>()))
- doWrap = true;
- BfParserData* parser = srcNode->GetSourceData()->ToParserData();
- String typeName = TypeToString(toType);
- if (doWrap)
- {
- mCompiler->mResolvePassData->mAutoComplete->AddEntry(AutoCompleteEntry("fixit",
- StrFormat("(%s)\tcast|%s|%d|(%s)(|`%d|)", typeName.c_str(), parser->mFileName.c_str(), srcNode->GetSrcStart(), typeName.c_str(), srcNode->GetSrcLength()).c_str()));
- }
- else
- {
- mCompiler->mResolvePassData->mAutoComplete->AddEntry(AutoCompleteEntry("fixit",
- StrFormat("(%s)\tcast|%s|%d|(%s)", typeName.c_str(), parser->mFileName.c_str(), srcNode->GetSrcStart(), typeName.c_str()).c_str()));
- }
- }
- }
- }
- }
- else if (!silentFail)
- SetFail();
- return BfIRValue();
- }
- BfTypedValue BfModule::Cast(BfAstNode* srcNode, const BfTypedValue& typedVal, BfType* toType, BfCastFlags castFlags)
- {
- bool explicitCast = (castFlags & BfCastFlags_Explicit) != 0;
- if (typedVal.mType == toType)
- return typedVal;
- if ((toType->IsSizedArray()) && (typedVal.mType->IsSizedArray()))
- {
- // Retain our type if we're casting from a known-sized array to an unknown-sized arrays
- if ((toType->IsUndefSizedArray()) && ((typedVal.mType->GetUnderlyingType()) == (toType->GetUnderlyingType())))
- {
- return typedVal;
- }
- }
- if ((castFlags & BfCastFlags_Force) != 0)
- {
- PopulateType(toType, BfPopulateType_Data);
- if (toType->IsValuelessType())
- return BfTypedValue(mBfIRBuilder->GetFakeVal(), toType);
- if ((typedVal.mType->IsValueType()) && (!typedVal.IsAddr()) && (typedVal.IsSplat()) && (toType->IsValueType()))
- {
- bool needsMemberCasting = false;
- if (AreSplatsCompatible(typedVal.mType, toType, &needsMemberCasting))
- {
- return BfTypedValue(typedVal.mValue, toType, needsMemberCasting ? BfTypedValueKind_SplatHead_NeedsCasting : BfTypedValueKind_SplatHead);
- }
- }
-
- if (typedVal.mType->IsValueType())
- {
- auto addrTypedValue = MakeAddressable(typedVal);
- auto toPtrType = CreatePointerType(toType);
- return BfTypedValue(mBfIRBuilder->CreateBitCast(addrTypedValue.mValue, mBfIRBuilder->MapType(toPtrType)), toType, BfTypedValueKind_Addr);
- }
- return BfTypedValue(mBfIRBuilder->CreateBitCast(typedVal.mValue, mBfIRBuilder->MapType(toType)), toType);
- }
- // This tuple cast may create a new type if the toType contains 'var' entries
- if ((typedVal.mType->IsTuple()) && (toType->IsTuple()))
- {
- PopulateType(toType);
- auto fromTupleType = (BfTypeInstance*)typedVal.mType;
- auto toTupleType = (BfTypeInstance*)toType;
- if (fromTupleType == toTupleType)
- return typedVal;
- if (fromTupleType->mFieldInstances.size() == toTupleType->mFieldInstances.size())
- {
- BfTypeVector fieldTypes;
- Array<String> fieldNames;
- bool isCompatible = true;
- bool isExactTypeMatch = true;
- for (int fieldIdx = 0; fieldIdx < (int)fromTupleType->mFieldInstances.size(); fieldIdx++)
- {
- auto fromFieldInst = &fromTupleType->mFieldInstances[fieldIdx];
- auto toFieldInst = &toTupleType->mFieldInstances[fieldIdx];
- auto fromFieldDef = fromFieldInst->GetFieldDef();
- auto toFieldDef = toFieldInst->GetFieldDef();
- if (!toFieldDef->IsUnnamedTupleField())
- {
- if ((!explicitCast) &&
- (!fromFieldDef->IsUnnamedTupleField()) &&
- (fromFieldDef->mName != toFieldDef->mName))
- isCompatible = false;
- fieldNames.push_back(toFieldDef->mName);
- }
- else
- fieldNames.push_back("");
- if (toFieldInst->mResolvedType->IsVar())
- fieldTypes.push_back(fromFieldInst->mResolvedType);
- else
- {
- if (fromFieldInst->mResolvedType != toFieldInst->mResolvedType)
- isExactTypeMatch = false;
- BfCastFlags tryCastFlags = BfCastFlags_SilentFail;
- if (explicitCast)
- tryCastFlags = (BfCastFlags)(tryCastFlags | BfCastFlags_Explicit);
- // The unused-token '?' comes out as 'void', so we allow that to match here. We may want to wrap that with a different fake type
- // so we can give normal implicit-cast-to-void errors
- if ((fromFieldInst->mResolvedType != toFieldInst->mResolvedType) && (!toFieldInst->mResolvedType->IsVoid()) &&
- (!CanCast(GetFakeTypedValue(fromFieldInst->mResolvedType), toFieldInst->mResolvedType, tryCastFlags)))
- isCompatible = false;
- fieldTypes.push_back(toFieldInst->mResolvedType);
- }
- }
- auto tupleType = CreateTupleType(fieldTypes, fieldNames);
- AddDependency(tupleType, mCurTypeInstance, BfDependencyMap::DependencyFlag_ReadFields);
- mBfIRBuilder->PopulateType(tupleType);
- if (isCompatible)
- {
- if (isExactTypeMatch)
- {
- if (typedVal.mKind == BfTypedValueKind_TempAddr)
- {
- return BfTypedValue(mBfIRBuilder->CreateBitCast(typedVal.mValue, mBfIRBuilder->MapTypeInstPtr(tupleType)), tupleType, BfTypedValueKind_TempAddr);
- }
- else if (typedVal.IsAddr())
- {
- return BfTypedValue(mBfIRBuilder->CreateBitCast(typedVal.mValue, mBfIRBuilder->MapTypeInstPtr(tupleType)), tupleType, BfTypedValueKind_ReadOnlyAddr);
- }
- else if (typedVal.IsSplat())
- {
- BfTypedValue retTypedValue = typedVal;
- retTypedValue.mType = tupleType;
- return retTypedValue;
- }
-
- BfIRValue curTupleValue = CreateAlloca(tupleType);
- auto loadedVal = LoadValue(typedVal);
- mBfIRBuilder->CreateStore(loadedVal.mValue, mBfIRBuilder->CreateBitCast(curTupleValue, mBfIRBuilder->MapTypeInstPtr(fromTupleType)));
- return BfTypedValue(curTupleValue, tupleType, BfTypedValueKind_TempAddr);
- }
-
- BfIRValue curTupleValue = CreateAlloca(tupleType);
- for (int fieldIdx = 0; fieldIdx < (int)fromTupleType->mFieldInstances.size(); fieldIdx++)
- {
- BfFieldInstance* fromFieldInstance = &fromTupleType->mFieldInstances[fieldIdx];
- BfFieldInstance* toFieldInstance = &tupleType->mFieldInstances[fieldIdx];
- if (toFieldInstance->mDataIdx >= 0)
- {
- if (fromFieldInstance->mDataIdx >= 0)
- {
- auto elementVal = ExtractValue(typedVal, fromFieldInstance, fromFieldInstance->mDataIdx);
- elementVal = LoadValue(elementVal);
- auto castedElementVal = Cast(srcNode, elementVal, toFieldInstance->GetResolvedType(), castFlags);
- if (!castedElementVal)
- return BfTypedValue();
- auto fieldRef = mBfIRBuilder->CreateInBoundsGEP(curTupleValue, 0, toFieldInstance->mDataIdx);
- castedElementVal = LoadValue(castedElementVal);
- mBfIRBuilder->CreateStore(castedElementVal.mValue, fieldRef);
- }
- else
- isCompatible = false;
- }
- }
-
- return BfTypedValue(curTupleValue, tupleType, BfTypedValueKind_TempAddr);
- }
- }
- const char* errStr = explicitCast ?
- "Unable to cast '%s' to '%s'" :
- "Unable to implicitly cast '%s' to '%s'";
- Fail(StrFormat(errStr, TypeToString(typedVal.mType).c_str(), TypeToString(toType).c_str()), srcNode);
- return BfTypedValue();
- }
- // Function->Function and Delegate->Delegate where type is compatible but not exact
- if (((typedVal.mType->IsDelegate()) || (typedVal.mType->IsFunction())) &&
- (typedVal.mType != toType) && // Don't bother to check for exact match, let CastToValue handle this
- ((typedVal.mType->IsDelegate()) == (toType->IsDelegate())) &&
- ((typedVal.mType->IsFunction()) == (toType->IsFunction())))
- {
- auto fromTypeInst = typedVal.mType->ToTypeInstance();
- auto toTypeInst = toType->ToTypeInstance();
-
- auto fromMethodInst = GetRawMethodByName(fromTypeInst, "Invoke", -1, true);
- auto toMethodInst = GetRawMethodByName(toTypeInst, "Invoke", -1, true);
-
- auto toDelegateInfo = toTypeInst->GetDelegateInfo();
- if ((fromMethodInst != NULL) && (toMethodInst != NULL) &&
- (fromMethodInst->mCallingConvention == toMethodInst->mCallingConvention) &&
- (fromMethodInst->mMethodDef->mIsMutating == toMethodInst->mMethodDef->mIsMutating) &&
- (fromMethodInst->mReturnType == toMethodInst->mReturnType) &&
- (fromMethodInst->GetParamCount() == toMethodInst->GetParamCount()))
- {
- bool matched = true;
- StringT<64> fromParamName;
- StringT<64> toParamName;
- if (fromMethodInst->HasExplicitThis() != toMethodInst->HasExplicitThis())
- {
- matched = false;
- }
- else
- {
- for (int paramIdx = 0; paramIdx < (int)fromMethodInst->GetParamCount(); paramIdx++)
- {
- bool nameMatches = true;
- if (!explicitCast)
- {
- int fromNamePrefixCount = 0;
- int toNamePrefixCount = 0;
- fromMethodInst->GetParamName(paramIdx, fromParamName, fromNamePrefixCount);
- toMethodInst->GetParamName(paramIdx, toParamName, toNamePrefixCount);
- if ((!fromParamName.IsEmpty()) && (!toParamName.IsEmpty()))
- nameMatches = fromParamName == toParamName;
- }
- if ((fromMethodInst->GetParamKind(paramIdx) == toMethodInst->GetParamKind(paramIdx)) &&
- (fromMethodInst->GetParamType(paramIdx) == toMethodInst->GetParamType(paramIdx)) &&
- (nameMatches))
- {
- // Matched, required for implicit/explicit
- }
- else
- {
- matched = false;
- break;
- }
- }
- }
- if (matched)
- {
- BfTypedValue loadedVal = LoadValue(typedVal);
- return BfTypedValue(mBfIRBuilder->CreateBitCast(loadedVal.mValue, mBfIRBuilder->MapType(toType)), toType);
- }
- }
- }
- // Struct truncate
- if ((typedVal.mType->IsStruct()) && (toType->IsStruct()))
- {
- auto fromStructTypeInstance = typedVal.mType->ToTypeInstance();
- auto toStructTypeInstance = toType->ToTypeInstance();
- if (TypeIsSubTypeOf(fromStructTypeInstance, toStructTypeInstance))
- {
- if (typedVal.IsSplat())
- {
- BF_ASSERT(toStructTypeInstance->IsSplattable() || (toStructTypeInstance->mInstSize == 0));
- return BfTypedValue(typedVal.mValue, toStructTypeInstance, typedVal.IsThis() ? BfTypedValueKind_ThisSplatHead : BfTypedValueKind_SplatHead);
- }
- if (typedVal.IsAddr())
- {
- BfIRValue castedIRValue;
- if (typedVal.mValue.IsFake())
- castedIRValue = typedVal.mValue;
- else
- castedIRValue = mBfIRBuilder->CreateBitCast(typedVal.mValue, mBfIRBuilder->MapTypeInstPtr(toStructTypeInstance));
- return BfTypedValue(castedIRValue, toType, typedVal.IsThis() ?
- (typedVal.IsReadOnly() ? BfTypedValueKind_ReadOnlyThisAddr : BfTypedValueKind_ThisAddr) :
- (typedVal.IsReadOnly() ? BfTypedValueKind_ReadOnlyAddr : BfTypedValueKind_Addr));
- }
- BfTypedValue curTypedVal = typedVal;
- while (curTypedVal.mType != toStructTypeInstance)
- {
- mBfIRBuilder->PopulateType(curTypedVal.mType);
- auto curTypeInstance = curTypedVal.mType->ToTypeInstance();
- BfIRValue extractedValue;
- if (toStructTypeInstance->IsValuelessType())
- extractedValue = mBfIRBuilder->GetFakeVal();
- else
- extractedValue = mBfIRBuilder->CreateExtractValue(curTypedVal.mValue, 0);
- curTypedVal = BfTypedValue(extractedValue, curTypeInstance->mBaseType, typedVal.IsThis() ?
- (typedVal.IsReadOnly() ? BfTypedValueKind_ReadOnlyThisValue : BfTypedValueKind_ThisValue) :
- BfTypedValueKind_Value);
- }
- return curTypedVal;
- }
- }
- /*if ((explicitCast) && (toType->IsValuelessType()))
- {
- return BfTypedValue(mBfIRBuilder->GetFakeVal(), toType);
- }*/
- BfCastResultFlags castResultFlags = BfCastResultFlags_None;
- auto castedValue = CastToValue(srcNode, typedVal, toType, castFlags, &castResultFlags);
- if (!castedValue)
- return BfTypedValue();
- if ((castResultFlags & BfCastResultFlags_IsAddr) != 0)
- {
- if ((castResultFlags & BfCastResultFlags_IsTemp) != 0)
- return BfTypedValue(castedValue, toType, BfTypedValueKind_TempAddr);
- return BfTypedValue(castedValue, toType, BfTypedValueKind_Addr);
- }
- return BfTypedValue(castedValue, toType, BfTypedValueKind_Value);
- }
- BfPrimitiveType* BfModule::GetIntCoercibleType(BfType* type)
- {
- if (type->IsSizedArray())
- {
- auto sizedArray = (BfSizedArrayType*)type;
- if ((sizedArray->mElementType->IsChar()) && (sizedArray->mElementType->mSize == 1))
- {
- auto primType = (BfPrimitiveType*)sizedArray->mElementType;
- if (sizedArray->mElementCount == 1)
- return GetPrimitiveType(BfTypeCode_UInt8);
- if (sizedArray->mElementCount == 2)
- return GetPrimitiveType(BfTypeCode_UInt16);
- if (sizedArray->mElementCount == 4)
- return GetPrimitiveType(BfTypeCode_UInt32);
- if (sizedArray->mElementCount == 8)
- return GetPrimitiveType(BfTypeCode_UInt64);
- }
- }
- return NULL;
- }
- BfTypedValue BfModule::GetIntCoercible(const BfTypedValue& typedValue)
- {
- auto intType = GetIntCoercibleType(typedValue.mType);
- if (intType == NULL)
- return BfTypedValue();
- if (typedValue.mValue.IsConst())
- {
- auto constant = mBfIRBuilder->GetConstant(typedValue.mValue);
- if (constant->mConstType == BfConstType_Agg)
- {
- uint64 intVal = 0;
- auto constantArray = (BfConstantAgg*)constant;
- int memberIdx = 0;
- for (int memberIdx = 0; memberIdx < (int)constantArray->mValues.size(); memberIdx++)
- {
- auto memberConstant = mBfIRBuilder->GetConstant(constantArray->mValues[memberIdx]);
- if (memberConstant->mTypeCode == BfTypeCode_Char8)
- {
- intVal |= (uint64)(memberConstant->mUInt8) << (8 * memberIdx);
- //intVal = (intVal << 8) | memberConstant->mUInt8;
- }
- }
- return BfTypedValue(mBfIRBuilder->CreateConst(intType->mTypeDef->mTypeCode, intVal), intType);
- }
- }
- auto convTypedValue = typedValue;
- convTypedValue = MakeAddressable(convTypedValue);
- auto intPtrType = CreatePointerType(intType);
- auto addrVal = mBfIRBuilder->CreateBitCast(convTypedValue.mValue, mBfIRBuilder->MapType(intPtrType));
- auto val = mBfIRBuilder->CreateLoad(addrVal);
- return BfTypedValue(val, intType);
- }
- bool BfModule::TypeHasParentOrEquals(BfTypeDef* checkChildTypeDef, BfTypeDef* checkParentTypeDef)
- {
- BfTypeDef* checkType = checkChildTypeDef;
- if (checkType->mNestDepth < checkParentTypeDef->mNestDepth)
- return false;
- while (checkType->mNestDepth > checkParentTypeDef->mNestDepth)
- checkType = checkType->mOuterType;
- if (checkType->GetDefinition() == checkParentTypeDef->GetDefinition())
- return true;
- if (checkType->mNameEx != checkParentTypeDef->mNameEx)
- return false;
- if (checkType->mIsPartial)
- {
- for (auto partial : checkParentTypeDef->mPartials)
- if (partial == checkType)
- return true;
- }
-
- return false;
- }
- BfTypeDef* BfModule::FindCommonOuterType(BfTypeDef* type, BfTypeDef* type2)
- {
- if ((type == NULL) || (type2 == NULL))
- return NULL;
- int curNestDepth = BF_MIN(type->mNestDepth, type2->mNestDepth);
- while (type->mNestDepth > curNestDepth)
- type = type->mOuterType;
- while (type2->mNestDepth > curNestDepth)
- type2 = type2->mOuterType;
- while (curNestDepth >= 0)
- {
- if ((!type->mIsPartial) && (!type2->mIsPartial))
- {
- if (type->GetDefinition() == type2->GetDefinition())
- return type;
- }
- else
- {
- if (type->mFullNameEx == type2->mFullNameEx)
- return type;
- }
- type = type->mOuterType;
- type2 = type2->mOuterType;
- curNestDepth--;
- }
- return NULL;
- }
- bool BfModule::TypeIsSubTypeOf(BfTypeInstance* srcType, BfTypeInstance* wantType, bool checkAccessibility)
- {
- if ((srcType == NULL) || (wantType == NULL))
- return false;
- if (srcType == wantType)
- return true;
- if (srcType->mDefineState < BfTypeDefineState_HasInterfaces)
- {
- if (srcType->mDefineState == BfTypeDefineState_ResolvingBaseType)
- {
- auto typeState = mContext->mCurTypeState;
- while (typeState != NULL)
- {
- if ((typeState->mType == srcType) && (typeState->mCurBaseType != NULL))
- {
- return TypeIsSubTypeOf(typeState->mCurBaseType, wantType, checkAccessibility);
- }
- typeState = typeState->mPrevState;
- }
- }
- // Type is incomplete. We don't do the IsIncomplete check here because of re-entry
- // While handling 'var' resolution, we don't want to force a PopulateType reentry
- // but we do have enough information for TypeIsSubTypeOf
- PopulateType(srcType, BfPopulateType_Interfaces);
- }
- if (wantType->IsInterface())
- {
- BfTypeDef* checkActiveTypeDef = NULL;
- bool checkAccessibility = true;
- if (IsInSpecializedSection())
- {
- // When we have a specialized section, the generic params may not be considered "included"
- // in the module that contains the generic type definition. We rely on any casting errors
- // to be thrown on the unspecialized type pass. We have a similar issue with injecting mixins.
- checkAccessibility = false;
- }
-
- auto checkType = srcType;
- while (checkType != NULL)
- {
- for (auto ifaceInst : checkType->mInterfaces)
- {
- if (ifaceInst.mInterfaceType == wantType)
- {
- if (checkAccessibility)
- {
- if (checkActiveTypeDef == NULL)
- checkActiveTypeDef = GetActiveTypeDef(NULL, false);
- // We need to be lenient when validating generic constraints
- // Otherwise "T<A> where T : IB" declared in a lib won't be able to match a type B in a using project 'C',
- // because this check will see the lib using 'C', which it won't consider visible
- if ((checkActiveTypeDef != NULL) &&
- ((mCurMethodInstance != NULL) && (mContext->mCurTypeState != NULL) && (mContext->mCurTypeState->mResolveKind != BfTypeState::ResolveKind_BuildingGenericParams)))
- {
- if ((!srcType->IsTypeMemberAccessible(ifaceInst.mDeclaringType, checkActiveTypeDef)) ||
- (!srcType->IsTypeMemberIncluded(ifaceInst.mDeclaringType, checkActiveTypeDef, this)))
- {
- continue;
- }
- }
- }
- return true;
- }
- }
- checkType = checkType->GetImplBaseType();
- if ((checkType != NULL) && (checkType->mDefineState < BfTypeDefineState_HasInterfaces))
- {
- PopulateType(checkType, BfPopulateType_Interfaces);
- }
- }
- if (srcType->IsTypedPrimitive())
- {
- BfType* underlyingType = srcType->GetUnderlyingType();
- if (underlyingType->IsWrappableType())
- {
- BfTypeInstance* wrappedType = GetWrappedStructType(underlyingType);
- if ((wrappedType != NULL) && (wrappedType != srcType))
- return TypeIsSubTypeOf(wrappedType, wantType, checkAccessibility);
- }
- }
- return false;
- }
- auto srcBaseType = srcType->mBaseType;
- return TypeIsSubTypeOf(srcBaseType, wantType);
- }
- // Positive value means that toType encompasses fromType, negative value means toType is encompassed by formType
- // INT_MAX means the types are not related
- int BfModule::GetTypeDistance(BfType* fromType, BfType* toType)
- {
- if (fromType == toType)
- return 0;
- if (fromType->IsPrimitiveType())
- {
- if (!toType->IsPrimitiveType())
- return INT_MAX;
- auto fromPrimType = (BfPrimitiveType*)fromType;
- auto toPrimType = (BfPrimitiveType*)toType;
- if ((fromPrimType->IsIntegral()) && (toPrimType->IsIntegral()))
- {
- int fromBitSize = fromPrimType->mSize * 8;
- if (fromPrimType->IsSigned())
- fromBitSize--;
- int toBitSize = toPrimType->mSize * 8;
- if (toPrimType->IsSigned())
- toBitSize--;
- return fromBitSize - toBitSize;
- }
- if ((fromPrimType->IsFloat()) && (toPrimType->IsFloat()))
- {
- return (fromPrimType->mSize * 8) - (toPrimType->mSize * 8);
- }
- if (((fromPrimType->IsIntegral()) || (fromPrimType->IsFloat())) &&
- ((toPrimType->IsIntegral()) || (toPrimType->IsFloat())))
- {
- int sizeDiff = (fromPrimType->mSize * 8) - (toPrimType->mSize * 8);
- if (sizeDiff < 0)
- sizeDiff--;
- else
- sizeDiff++;
- return sizeDiff;
- }
- return INT_MAX;
- }
- auto fromTypeInstance = fromType->ToTypeInstance();
- auto toTypeInstance = toType->ToTypeInstance();
- if ((fromTypeInstance != NULL) != (toTypeInstance != NULL))
- return INT_MAX; // Ever valid?
- if ((fromTypeInstance != NULL) && (toTypeInstance != NULL))
- {
- if ((fromTypeInstance->IsNullable()) && (toTypeInstance->IsNullable()))
- return GetTypeDistance(fromTypeInstance->GetUnderlyingType(), toTypeInstance->GetUnderlyingType());
- int inheritDistance = toTypeInstance->mInheritDepth - fromTypeInstance->mInheritDepth;
- auto mostSpecificInstance = (inheritDistance < 0) ? fromTypeInstance : toTypeInstance;
- auto leastSpecificInstance = (inheritDistance < 0) ? toTypeInstance : fromTypeInstance;
- while (mostSpecificInstance != NULL)
- {
- if (mostSpecificInstance == leastSpecificInstance)
- return inheritDistance;
- mostSpecificInstance = mostSpecificInstance->mBaseType;
- }
- }
- return INT_MAX;
- }
- bool BfModule::IsTypeMoreSpecific(BfType* leftType, BfType* rightType)
- {
- if (leftType->IsGenericTypeInstance())
- {
- if (!rightType->IsGenericTypeInstance())
- return true;
- auto leftGenericType = (BfTypeInstance*)leftType;
- auto rightGenericType = (BfTypeInstance*)rightType;
- if (leftGenericType->mTypeDef != rightGenericType->mTypeDef)
- return false;
- bool isBetter = false;
- bool isWorse = false;
- for (int argIdx = 0; argIdx < (int)leftGenericType->mGenericTypeInfo->mTypeGenericArguments.size(); argIdx++)
- {
- if (IsTypeMoreSpecific(leftGenericType->mGenericTypeInfo->mTypeGenericArguments[argIdx], rightGenericType->mGenericTypeInfo->mTypeGenericArguments[argIdx]))
- isBetter = true;
- if (IsTypeMoreSpecific(rightGenericType->mGenericTypeInfo->mTypeGenericArguments[argIdx], leftGenericType->mGenericTypeInfo->mTypeGenericArguments[argIdx]))
- isWorse = true;
- }
- return (isBetter) && (!isWorse);
- }
- return false;
- }
- StringT<128> BfModule::TypeToString(BfType* resolvedType, Array<String>* genericMethodParamNameOverrides)
- {
- BfTypeNameFlags flags = BfTypeNameFlags_None;
- if ((mCurTypeInstance == NULL) || (!mCurTypeInstance->IsUnspecializedTypeVariation()))
- flags = BfTypeNameFlag_ResolveGenericParamNames;
-
- StringT<128> str;
- DoTypeToString(str, resolvedType, flags, genericMethodParamNameOverrides);
- return str;
- }
- StringT<128> BfModule::TypeToString(BfType* resolvedType, BfTypeNameFlags typeNameFlags, Array<String>* genericMethodParamNameOverrides)
- {
- StringT<128> str;
- DoTypeToString(str, resolvedType, typeNameFlags, genericMethodParamNameOverrides);
- return str;
- }
- void BfModule::VariantToString(StringImpl& str, const BfVariant& variant)
- {
- switch (variant.mTypeCode)
- {
- case BfTypeCode_Boolean:
- if (variant.mUInt64 == 0)
- str += "false";
- else if (variant.mUInt64 == 1)
- str += "true";
- else
- str += StrFormat("%lld", variant.mInt64);
- break;
- case BfTypeCode_Int8:
- case BfTypeCode_UInt8:
- case BfTypeCode_Int16:
- case BfTypeCode_UInt16:
- case BfTypeCode_Int32:
- str += StrFormat("%d", variant.mInt32);
- break;
- case BfTypeCode_Char8:
- case BfTypeCode_Char16:
- case BfTypeCode_Char32:
- if ((variant.mUInt32 >= 32) && (variant.mUInt32 <= 0x7E))
- str += StrFormat("'%c'", (char)variant.mUInt32);
- else if (variant.mUInt32 <= 0xFF)
- str += StrFormat("'\\x%2X'", variant.mUInt32);
- else
- str += StrFormat("'\\u{%X}'", variant.mUInt32);
- break;
- case BfTypeCode_UInt32:
- str += StrFormat("%lu", variant.mUInt32);
- break;
- case BfTypeCode_Int64:
- str += StrFormat("%lld", variant.mInt64);
- break;
- case BfTypeCode_UInt64:
- str += StrFormat("%llu", variant.mInt64);
- break;
- case BfTypeCode_Float:
- {
- char cstr[64];
- ExactMinimalFloatToStr(variant.mSingle, cstr);
- str += cstr;
- if (strchr(cstr, '.') == NULL)
- str += ".0f";
- else
- str += "f";
- }
- break;
- case BfTypeCode_Double:
- {
- char cstr[64];
- ExactMinimalDoubleToStr(variant.mDouble, cstr);
- str += cstr;
- if (strchr(cstr, '.') == NULL)
- str += ".0";
- }
- break;
- case BfTypeCode_StringId:
- {
- int stringId = variant.mInt32;
- auto stringPoolEntry = mContext->mStringObjectIdMap[stringId];
- str += '"';
- str += SlashString(stringPoolEntry.mString, false, false, true);
- str += '"';
- }
- break;
- case BfTypeCode_Let:
- str += "?";
- break;
- default: break;
- }
- }
- void BfModule::DoTypeToString(StringImpl& str, BfType* resolvedType, BfTypeNameFlags typeNameFlags, Array<String>* genericMethodNameOverrides)
- {
- BP_ZONE("BfModule::DoTypeToString");
- // This is clearly wrong. If we pass in @T0 from a generic type, this would immediately disable the ability to get its name
- /*if (resolvedType->IsUnspecializedType())
- typeNameFlags = (BfTypeNameFlags)(typeNameFlags & ~BfTypeNameFlag_ResolveGenericParamNames);*/
- if (resolvedType->IsBoxed())
- {
- auto boxedType = (BfBoxedType*)resolvedType;
- str += "boxed ";
- DoTypeToString(str, boxedType->mElementType, typeNameFlags, genericMethodNameOverrides);
- if (boxedType->mBoxedFlags == BfBoxedType::BoxedFlags_StructPtr)
- str += "*";
- return;
- }
- else if ((resolvedType->IsArray()) && ((typeNameFlags & BfTypeNameFlag_UseArrayImplType) == 0))
- {
- auto arrayType = (BfArrayType*)resolvedType;
- DoTypeToString(str, arrayType->mGenericTypeInfo->mTypeGenericArguments[0], typeNameFlags, genericMethodNameOverrides);
- str += "[";
- for (int i = 1; i < arrayType->mDimensions; i++)
- str += ",";
- str += "]";
- return;
- }
- else if (resolvedType->IsNullable())
- {
- auto genericType = (BfTypeInstance*)resolvedType;
- auto elementType = genericType->mGenericTypeInfo->mTypeGenericArguments[0];
- DoTypeToString(str, elementType, typeNameFlags, genericMethodNameOverrides);
- str += "?";
- return;
- }
- else if (resolvedType->IsTuple())
- {
- BfTypeInstance* tupleType = (BfTypeInstance*)resolvedType;
- str += "(";
- for (int fieldIdx = 0; fieldIdx < (int)tupleType->mFieldInstances.size(); fieldIdx++)
- {
- if (fieldIdx > 0)
- str += ", ";
- BfFieldInstance* fieldInstance = &tupleType->mFieldInstances[fieldIdx];
- BfFieldDef* fieldDef = fieldInstance->GetFieldDef();
- BfTypeNameFlags innerFlags = (BfTypeNameFlags)(typeNameFlags & ~(BfTypeNameFlag_OmitNamespace | BfTypeNameFlag_OmitOuterType | BfTypeNameFlag_ExtendedInfo));
- DoTypeToString(str, fieldInstance->GetResolvedType(), innerFlags, genericMethodNameOverrides);
- char c = fieldDef->mName[0];
- if ((c < '0') || (c > '9'))
- {
- str += " ";
- str += fieldDef->mName;
- }
- }
- str += ")";
- return;
- }
- else if (resolvedType->IsDelegateFromTypeRef() || resolvedType->IsFunctionFromTypeRef())
- {
- SetAndRestoreValue<BfTypeInstance*> prevTypeInstance(mCurTypeInstance);
- auto delegateType = (BfTypeInstance*)resolvedType;
- auto delegateInfo = resolvedType->GetDelegateInfo();
- if (mCurTypeInstance == delegateType)
- {
- // Don't try to use ourselves for generic param resolution. This should only happen for debug printings from
- // within InitType and such, not actual user-facing display
- mCurTypeInstance = NULL;
- }
- auto methodDef = delegateType->mTypeDef->mMethods[0];
-
- switch (methodDef->mCallingConvention)
- {
- case BfCallingConvention_Stdcall:
- str += "[StdCall] ";
- break;
- case BfCallingConvention_Fastcall:
- str += "[FastCall] ";
- break;
- default:
- break;
- }
- if (resolvedType->IsDelegateFromTypeRef())
- str += "delegate ";
- else
- str += "function ";
- if (delegateInfo->mCallingConvention != BfCallingConvention_Unspecified)
- {
- str += "[CallingConvention(";
- switch (delegateInfo->mCallingConvention)
- {
- case BfCallingConvention_Cdecl:
- str += ".Cdecl";
- break;
- case BfCallingConvention_Stdcall:
- str += ".Stdcall";
- break;
- case BfCallingConvention_Fastcall:
- str += ".Fastcall";
- break;
- }
- str += ")] ";
- }
- DoTypeToString(str, delegateInfo->mReturnType, typeNameFlags, genericMethodNameOverrides);
- str += "(";
- bool isFirstParam = true;//
- for (int paramIdx = 0; paramIdx < methodDef->mParams.size(); paramIdx++)
- {
- if (!isFirstParam)
- str += ", ";
- auto paramDef = methodDef->mParams[paramIdx];
- BfTypeNameFlags innerFlags = (BfTypeNameFlags)(typeNameFlags & ~(BfTypeNameFlag_OmitNamespace | BfTypeNameFlag_OmitOuterType | BfTypeNameFlag_ExtendedInfo));
-
- if (paramDef->mParamKind == BfParamKind_VarArgs)
- {
- str += "...";
- continue;
- }
- auto paramType = delegateInfo->mParams[paramIdx];
- if ((paramIdx == 0) && (delegateInfo->mHasExplicitThis))
- {
- if ((methodDef->mIsMutating) && (paramType->IsValueType()))
- str += "mut ";
- }
- DoTypeToString(str, paramType, innerFlags, genericMethodNameOverrides);
- if (!paramDef->mName.IsEmpty())
- {
- str += " ";
- str += paramDef->mName;
- }
- isFirstParam = false;
- }
- str += ")";
- return;
- }
- else if (resolvedType->IsMethodRef())
- {
- auto methodRefType = (BfMethodRefType*)resolvedType;
- BfMethodInstance* methodInstance = methodRefType->mMethodRef;
- if (methodRefType->IsDeleting())
- {
- str += "DELETED METHODREF";
- return;
- }
- if (methodInstance == NULL)
- {
- str += "method reference NULL";
- return;
- }
- str += "method reference ";
- str += MethodToString(methodInstance, BfMethodNameFlag_NoAst);
- return;
- }
- else if (resolvedType->IsTypeInstance())
- {
- BfTypeInstance* typeInstance = (BfTypeInstance*)resolvedType;
-
- if ((typeNameFlags & BfTypeNameFlag_ExtendedInfo) != 0)
- {
- if (typeInstance->mTypeDef->mIsDelegate)
- str += "delegate ";
- else if (typeInstance->mTypeDef->mIsFunction)
- str += "function ";
- else if (typeInstance->mTypeDef->mTypeCode == BfTypeCode_Object)
- str += "class ";
- else if (typeInstance->mTypeDef->mTypeCode == BfTypeCode_Enum)
- str += "enum ";
- else if (typeInstance->mTypeDef->mTypeCode == BfTypeCode_Struct)
- str += "struct ";
- else if (typeInstance->mTypeDef->mTypeCode == BfTypeCode_TypeAlias)
- str += "typealias ";
- }
- bool omitNamespace = (typeNameFlags & BfTypeNameFlag_OmitNamespace) != 0;
- if ((typeNameFlags & BfTypeNameFlag_ReduceName) != 0)
- {
- for (auto& checkNamespace : mCurTypeInstance->mTypeDef->mNamespaceSearch)
- {
- if (checkNamespace == typeInstance->mTypeDef->mNamespace)
- omitNamespace = true;
- }
- }
- if ((!typeInstance->mTypeDef->mNamespace.IsEmpty()) && (!omitNamespace))
- {
- if (!typeInstance->mTypeDef->mNamespace.IsEmpty())
- {
- typeInstance->mTypeDef->mNamespace.ToString(str);
- if (!typeInstance->mTypeDef->IsGlobalsContainer())
- str += '.';
- }
- }
-
- SizedArray<BfTypeDef*, 8> typeDefStack;
-
- BfTypeDef* endTypeDef = NULL;
- if (((typeNameFlags & BfTypeNameFlag_ReduceName) != 0) && (mCurTypeInstance != NULL))
- {
- auto checkTypeInst = typeInstance;
-
- auto outerTypeInst = GetOuterType(checkTypeInst);
- if (outerTypeInst != NULL)
- {
- checkTypeInst = outerTypeInst;
- auto checkTypeDef = checkTypeInst->mTypeDef;
- auto checkCurTypeInst = mCurTypeInstance; // Only used for ReduceName
- BfTypeDef* checkCurTypeDef = NULL;
- if (checkCurTypeInst != NULL)
- checkCurTypeDef = checkCurTypeInst->mTypeDef;
- while (checkCurTypeDef->mNestDepth > checkTypeDef->mNestDepth)
- {
- checkCurTypeInst = GetOuterType(checkCurTypeInst);
- checkCurTypeDef = checkCurTypeInst->mTypeDef;
- }
- while (checkTypeDef != NULL)
- {
- if (TypeIsSubTypeOf(checkCurTypeInst, checkTypeInst))
- {
- endTypeDef = checkTypeDef;
- break;
- }
- checkCurTypeInst = GetOuterType(checkCurTypeInst);
- if (checkCurTypeInst == NULL)
- break;
- checkCurTypeDef = checkCurTypeInst->mTypeDef;
- checkTypeInst = GetOuterType(checkTypeInst);
- if (checkTypeInst == NULL)
- break;
- checkTypeDef = checkTypeInst->mTypeDef;
- }
- }
- }
- BfTypeDef* checkTypeDef = typeInstance->mTypeDef;
- while (checkTypeDef != NULL)
- {
- typeDefStack.Add(checkTypeDef);
- checkTypeDef = checkTypeDef->mOuterType;
- if ((typeNameFlags & BfTypeNameFlag_OmitOuterType) != 0)
- break;
- if (checkTypeDef == endTypeDef)
- break;
- }
- while (!typeDefStack.IsEmpty())
- {
- BfTypeDef* checkTypeDef = typeDefStack.back();
- int depth = (int)typeDefStack.size() - 1;
- typeDefStack.pop_back();
- if (checkTypeDef->IsGlobalsContainer())
- {
- if ((typeNameFlags & BfTypeNameFlag_AddGlobalContainerName) != 0)
- {
- str += "G$";
- str += checkTypeDef->mProject->mName;
- }
- }
- else
- {
- checkTypeDef->mName->ToString(str);
- if (!checkTypeDef->mGenericParamDefs.IsEmpty())
- {
- for (int ofs = 0; ofs < 3; ofs++)
- {
- int checkIdx = (int)str.length() - 1 - ofs;
- if (checkIdx < 0)
- break;
- if (str[checkIdx] == '`')
- {
- str.RemoveToEnd(checkIdx);
- break;
- }
- }
- }
- if (((typeNameFlags & BfTypeNameFlag_DisambiguateDups) != 0) && (checkTypeDef->mDupDetectedRevision != -1))
- {
- str += StrFormat("_%p", checkTypeDef);
- }
- }
- int prevGenericParamCount = 0;
- if (checkTypeDef->mOuterType != NULL)
- {
- prevGenericParamCount = (int)checkTypeDef->mOuterType->mGenericParamDefs.size();
- }
- if (resolvedType->IsGenericTypeInstance())
- {
- auto genericTypeInst = (BfTypeInstance*)resolvedType;
- if (prevGenericParamCount != (int)checkTypeDef->mGenericParamDefs.size())
- {
- str += '<';
- for (int i = prevGenericParamCount; i < (int)checkTypeDef->mGenericParamDefs.size(); i++)
- {
- BfType* typeGenericArg = genericTypeInst->mGenericTypeInfo->mTypeGenericArguments[i];
- if (typeGenericArg->IsGenericParam())
- {
- if ((typeNameFlags & BfTypeNameFlag_ResolveGenericParamNames) == 0)
- {
- // We don't want the param names, just the commas (this is an unspecialized type reference)
- if (i > prevGenericParamCount)
- str += ',';
- if ((typeNameFlags & BfTypeNameFlag_UseUnspecializedGenericParamNames) != 0)
- {
- str += checkTypeDef->mGenericParamDefs[i]->mName;
- }
- continue;
- }
- }
- if (i > prevGenericParamCount)
- str += ", ";
- DoTypeToString(str, typeGenericArg, (BfTypeNameFlags)((typeNameFlags | BfTypeNameFlag_ShortConst) & ~(BfTypeNameFlag_OmitNamespace | BfTypeNameFlag_OmitOuterType | BfTypeNameFlag_ExtendedInfo)), genericMethodNameOverrides);
- }
- str += '>';
- }
- }
- if (depth > 0)
- str += '.';
- };
- if (typeInstance->IsTypeAlias())
- {
- if ((typeNameFlags & BfTypeNameFlag_ExtendedInfo) != 0)
- {
- auto underlyingType = typeInstance->GetUnderlyingType();
- if (underlyingType != NULL)
- {
- str += " = ";
- DoTypeToString(str, underlyingType, (BfTypeNameFlags)(typeNameFlags & ~(BfTypeNameFlag_OmitNamespace | BfTypeNameFlag_OmitOuterType | BfTypeNameFlag_ExtendedInfo)));
- }
- }
- }
- return;
- }
- else if (resolvedType->IsPrimitiveType())
- {
- auto primitiveType = (BfPrimitiveType*)resolvedType;
- if (!primitiveType->mTypeDef->mNamespace.IsEmpty())
- {
- primitiveType->mTypeDef->mNamespace.ToString(str);
- str += '.';
- primitiveType->mTypeDef->mName->ToString(str);
- return;
- }
- else
- {
- primitiveType->mTypeDef->mName->ToString(str);
- return;
- }
- }
- else if (resolvedType->IsPointer())
- {
- auto pointerType = (BfPointerType*)resolvedType;
- DoTypeToString(str, pointerType->mElementType, typeNameFlags, genericMethodNameOverrides);
- str += '*';
- return;
- }
- else if (resolvedType->IsGenericParam())
- {
- bool doResolveGenericParams = (typeNameFlags & BfTypeNameFlag_ResolveGenericParamNames) != 0;
- if ((mCurTypeInstance != NULL) && (mCurTypeInstance->IsUnspecializedTypeVariation()))
- doResolveGenericParams = false;
- auto genericParam = (BfGenericParamType*)resolvedType;
- if (genericParam->mGenericParamKind == BfGenericParamKind_Method)
- {
- if ((mCurMethodInstance != NULL) && (mCurMethodInstance->mIsUnspecializedVariation))
- doResolveGenericParams = false;
- }
-
- if (!doResolveGenericParams)
- {
- if (genericParam->mGenericParamKind == BfGenericParamKind_Method)
- {
- if (genericMethodNameOverrides != NULL)
- {
- BF_ASSERT(genericParam->mGenericParamIdx < genericMethodNameOverrides->mSize);
- if (genericParam->mGenericParamIdx < genericMethodNameOverrides->mSize)
- {
- str += (*genericMethodNameOverrides)[genericParam->mGenericParamIdx];
- return;
- }
- }
- str += StrFormat("@M%d", genericParam->mGenericParamIdx);
- return;
- }
- str += StrFormat("@T%d", genericParam->mGenericParamIdx);
- return;
- }
- if ((genericParam->mGenericParamKind == BfGenericParamKind_Type) && (mCurTypeInstance == NULL))
- {
- str += StrFormat("@T%d", genericParam->mGenericParamIdx);
- return;
- }
- if (genericParam->mGenericParamKind == BfGenericParamKind_Method)
- {
- if (genericMethodNameOverrides != NULL)
- {
- str += (*genericMethodNameOverrides)[genericParam->mGenericParamIdx];
- return;
- }
- if (mCurMethodInstance == NULL)
- {
- str += StrFormat("@M%d", genericParam->mGenericParamIdx);
- return;
- }
- }
- //TEMPORARY
- if (genericParam->mGenericParamKind == BfGenericParamKind_Type)
- {
- auto curTypeInstance = mCurTypeInstance;
- if (mCurMethodInstance != NULL)
- curTypeInstance = mCurMethodInstance->mMethodInstanceGroup->mOwner;
- if ((curTypeInstance == NULL) || (!curTypeInstance->IsGenericTypeInstance()))
- {
- str += StrFormat("@T%d", genericParam->mGenericParamIdx);
- return;
- }
- }
- auto genericParamInstance = GetGenericParamInstance(genericParam);
- auto genericParamDef = genericParamInstance->GetGenericParamDef();
- if (genericParamDef != NULL)
- str += genericParamInstance->GetGenericParamDef()->mName;
- else
- str += "external generic " + TypeToString(genericParamInstance->mExternType, typeNameFlags, genericMethodNameOverrides);
- return;
- }
- else if (resolvedType->IsRef())
- {
- auto refType = (BfRefType*)resolvedType;
- if (refType->mRefKind == BfRefType::RefKind_Ref)
- {
- str += "ref ";
- DoTypeToString(str, refType->mElementType, typeNameFlags, genericMethodNameOverrides);
- return;
- }
- else if (refType->mRefKind == BfRefType::RefKind_In)
- {
- str += "in ";
- DoTypeToString(str, refType->mElementType, typeNameFlags, genericMethodNameOverrides);
- return;
- }
- else if (refType->mRefKind == BfRefType::RefKind_Out)
- {
- str += "out ";
- DoTypeToString(str, refType->mElementType, typeNameFlags, genericMethodNameOverrides);
- return;
- }
- else
- {
- str += "mut ";
- DoTypeToString(str, refType->mElementType, typeNameFlags, genericMethodNameOverrides);
- return;
- }
- }
- else if (resolvedType->IsModifiedTypeType())
- {
- auto retTypeType = (BfModifiedTypeType*)resolvedType;
- str += BfTokenToString(retTypeType->mModifiedKind);
- str += "(";
- DoTypeToString(str, retTypeType->mElementType, typeNameFlags, genericMethodNameOverrides);
- str += ")";
- return;
- }
- else if (resolvedType->IsConcreteInterfaceType())
- {
- auto concreteTypeType = (BfConcreteInterfaceType*)resolvedType;
- str += "concrete ";
- DoTypeToString(str, concreteTypeType->mInterface, typeNameFlags, genericMethodNameOverrides);
- return;
- }
- else if (resolvedType->IsUnknownSizedArrayType())
- {
- auto arrayType = (BfUnknownSizedArrayType*)resolvedType;
- DoTypeToString(str, arrayType->mElementType, typeNameFlags, genericMethodNameOverrides);
- str += "[";
- DoTypeToString(str, arrayType->mElementCountSource, typeNameFlags, genericMethodNameOverrides);
- str += "]";
- return;
- }
- else if (resolvedType->IsSizedArray())
- {
- auto arrayType = (BfSizedArrayType*)resolvedType;
- if (arrayType->mElementCount == -1)
- {
- DoTypeToString(str, arrayType->mElementType, typeNameFlags, genericMethodNameOverrides);
- str += "[?]";
- return;
- }
- DoTypeToString(str, arrayType->mElementType, typeNameFlags, genericMethodNameOverrides);
- str += StrFormat("[%d]", arrayType->mElementCount);
- return;
- }
- else if (resolvedType->IsConstExprValue())
- {
- auto constExprValueType = (BfConstExprValueType*)resolvedType;
- if ((typeNameFlags & BfTypeNameFlag_ShortConst) == 0)
- {
- str += "const ";
- DoTypeToString(str, constExprValueType->mType, typeNameFlags, genericMethodNameOverrides);
- str += " ";
- }
- VariantToString(str, constExprValueType->mValue);
-
- return;
- }
- BFMODULE_FATAL(this, "Not implemented");
- str += "???";
- return;
- }
|