vms.mar 106 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751752753754755756757758759760761762763764765766767768769770771772773774775776777778779780781782783784785786787788789790791792793794795796797798799800801802803804805806807808809810811812813814815816817818819820821822823824825826827828829830831832833834835836837838839840841842843844845846847848849850851852853854855856857858859860861862863864865866867868869870871872873874875876877878879880881882883884885886887888889890891892893894895896897898899900901902903904905906907908909910911912913914915916917918919920921922923924925926927928929930931932933934935936937938939940941942943944945946947948949950951952953954955956957958959960961962963964965966967968969970971972973974975976977978979980981982983984985986987988989990991992993994995996997998999100010011002100310041005100610071008100910101011101210131014101510161017101810191020102110221023102410251026102710281029103010311032103310341035103610371038103910401041104210431044104510461047104810491050105110521053105410551056105710581059106010611062106310641065106610671068106910701071107210731074107510761077107810791080108110821083108410851086108710881089109010911092109310941095109610971098109911001101110211031104110511061107110811091110111111121113111411151116111711181119112011211122112311241125112611271128112911301131113211331134113511361137113811391140114111421143114411451146114711481149115011511152115311541155115611571158115911601161116211631164116511661167116811691170117111721173117411751176117711781179118011811182118311841185118611871188118911901191119211931194119511961197119811991200120112021203120412051206120712081209121012111212121312141215121612171218121912201221122212231224122512261227122812291230123112321233123412351236123712381239124012411242124312441245124612471248124912501251125212531254125512561257125812591260126112621263126412651266126712681269127012711272127312741275127612771278127912801281128212831284128512861287128812891290129112921293129412951296129712981299130013011302130313041305130613071308130913101311131213131314131513161317131813191320132113221323132413251326132713281329133013311332133313341335133613371338133913401341134213431344134513461347134813491350135113521353135413551356135713581359136013611362136313641365136613671368136913701371137213731374137513761377137813791380138113821383138413851386138713881389139013911392139313941395139613971398139914001401140214031404140514061407140814091410141114121413141414151416141714181419142014211422142314241425142614271428142914301431143214331434143514361437143814391440144114421443144414451446144714481449145014511452145314541455145614571458145914601461146214631464146514661467146814691470147114721473147414751476147714781479148014811482148314841485148614871488148914901491149214931494149514961497149814991500150115021503150415051506150715081509151015111512151315141515151615171518151915201521152215231524152515261527152815291530153115321533153415351536153715381539154015411542154315441545154615471548154915501551155215531554155515561557155815591560156115621563156415651566156715681569157015711572157315741575157615771578157915801581158215831584158515861587158815891590159115921593159415951596159715981599160016011602160316041605160616071608160916101611161216131614161516161617161816191620162116221623162416251626162716281629163016311632163316341635163616371638163916401641164216431644164516461647164816491650165116521653165416551656165716581659166016611662166316641665166616671668166916701671167216731674167516761677167816791680168116821683168416851686168716881689169016911692169316941695169616971698169917001701170217031704170517061707170817091710171117121713171417151716171717181719172017211722172317241725172617271728172917301731173217331734173517361737173817391740174117421743174417451746174717481749175017511752175317541755175617571758175917601761176217631764176517661767176817691770177117721773177417751776177717781779178017811782178317841785178617871788178917901791179217931794179517961797179817991800180118021803180418051806180718081809181018111812181318141815181618171818181918201821182218231824182518261827182818291830183118321833183418351836183718381839184018411842184318441845184618471848184918501851185218531854185518561857185818591860186118621863186418651866186718681869187018711872187318741875187618771878187918801881188218831884188518861887188818891890189118921893189418951896189718981899190019011902190319041905190619071908190919101911191219131914191519161917191819191920192119221923192419251926192719281929193019311932193319341935193619371938193919401941194219431944194519461947194819491950195119521953195419551956195719581959196019611962196319641965196619671968196919701971197219731974197519761977197819791980198119821983198419851986198719881989199019911992199319941995199619971998199920002001200220032004200520062007200820092010201120122013201420152016201720182019202020212022202320242025202620272028202920302031203220332034203520362037203820392040204120422043204420452046204720482049205020512052205320542055205620572058205920602061206220632064206520662067206820692070207120722073207420752076207720782079208020812082208320842085208620872088208920902091209220932094209520962097209820992100210121022103210421052106210721082109211021112112211321142115211621172118211921202121212221232124212521262127212821292130213121322133213421352136213721382139214021412142214321442145214621472148214921502151215221532154215521562157215821592160216121622163216421652166216721682169217021712172217321742175217621772178217921802181218221832184218521862187218821892190219121922193219421952196219721982199220022012202220322042205220622072208220922102211221222132214221522162217221822192220222122222223222422252226222722282229223022312232223322342235223622372238223922402241224222432244224522462247224822492250225122522253225422552256225722582259226022612262226322642265226622672268226922702271227222732274227522762277227822792280228122822283228422852286228722882289229022912292229322942295229622972298229923002301230223032304230523062307230823092310231123122313231423152316231723182319232023212322232323242325232623272328232923302331233223332334233523362337233823392340234123422343234423452346234723482349235023512352235323542355235623572358235923602361236223632364236523662367236823692370237123722373237423752376237723782379238023812382238323842385238623872388238923902391239223932394239523962397239823992400240124022403240424052406240724082409241024112412241324142415241624172418241924202421242224232424242524262427242824292430243124322433243424352436243724382439244024412442244324442445244624472448244924502451245224532454245524562457245824592460246124622463246424652466246724682469247024712472247324742475247624772478247924802481248224832484248524862487248824892490249124922493249424952496249724982499250025012502250325042505250625072508250925102511251225132514251525162517251825192520252125222523252425252526252725282529253025312532253325342535253625372538253925402541254225432544254525462547254825492550255125522553255425552556255725582559256025612562256325642565256625672568256925702571257225732574257525762577257825792580258125822583258425852586258725882589259025912592259325942595259625972598259926002601260226032604260526062607260826092610261126122613261426152616261726182619262026212622262326242625262626272628262926302631263226332634263526362637263826392640264126422643264426452646264726482649265026512652265326542655265626572658265926602661266226632664266526662667266826692670267126722673267426752676267726782679268026812682268326842685268626872688268926902691269226932694269526962697269826992700270127022703270427052706270727082709271027112712271327142715271627172718271927202721272227232724272527262727272827292730273127322733273427352736273727382739274027412742274327442745274627472748274927502751275227532754275527562757275827592760276127622763276427652766276727682769277027712772277327742775277627772778277927802781278227832784278527862787278827892790279127922793279427952796279727982799280028012802280328042805280628072808280928102811281228132814281528162817281828192820282128222823282428252826282728282829283028312832283328342835283628372838283928402841284228432844284528462847284828492850285128522853285428552856285728582859286028612862286328642865286628672868286928702871287228732874287528762877287828792880288128822883288428852886288728882889289028912892289328942895289628972898289929002901290229032904290529062907290829092910291129122913291429152916291729182919292029212922292329242925292629272928292929302931293229332934293529362937293829392940294129422943294429452946294729482949295029512952295329542955295629572958295929602961296229632964296529662967296829692970297129722973297429752976297729782979298029812982298329842985298629872988298929902991299229932994299529962997299829993000300130023003300430053006300730083009301030113012301330143015301630173018301930203021302230233024302530263027302830293030303130323033303430353036303730383039304030413042304330443045304630473048304930503051305230533054305530563057305830593060306130623063306430653066306730683069307030713072307330743075307630773078307930803081308230833084308530863087308830893090309130923093309430953096309730983099310031013102310331043105310631073108310931103111311231133114311531163117311831193120312131223123312431253126312731283129313031313132313331343135313631373138313931403141314231433144314531463147314831493150315131523153315431553156315731583159316031613162316331643165316631673168316931703171317231733174317531763177317831793180318131823183318431853186318731883189319031913192319331943195319631973198319932003201320232033204320532063207320832093210321132123213321432153216321732183219322032213222322332243225322632273228322932303231323232333234323532363237323832393240324132423243324432453246324732483249325032513252325332543255325632573258325932603261326232633264326532663267326832693270327132723273327432753276327732783279328032813282328332843285328632873288328932903291329232933294329532963297329832993300330133023303330433053306330733083309331033113312331333143315331633173318331933203321332233233324332533263327332833293330333133323333333433353336333733383339334033413342334333443345334633473348334933503351335233533354335533563357335833593360336133623363336433653366336733683369337033713372337333743375337633773378337933803381338233833384338533863387338833893390339133923393339433953396339733983399340034013402340334043405340634073408340934103411341234133414341534163417341834193420342134223423342434253426342734283429343034313432343334343435343634373438343934403441344234433444344534463447344834493450345134523453345434553456345734583459346034613462346334643465346634673468346934703471347234733474347534763477347834793480348134823483348434853486348734883489349034913492349334943495349634973498349935003501350235033504350535063507350835093510351135123513351435153516351735183519352035213522352335243525352635273528352935303531353235333534353535363537353835393540354135423543354435453546354735483549355035513552355335543555355635573558355935603561356235633564356535663567356835693570357135723573357435753576357735783579358035813582358335843585358635873588358935903591359235933594359535963597359835993600360136023603360436053606360736083609361036113612361336143615361636173618361936203621362236233624362536263627362836293630363136323633363436353636363736383639364036413642364336443645364636473648364936503651365236533654365536563657365836593660366136623663366436653666366736683669367036713672367336743675367636773678367936803681368236833684368536863687368836893690369136923693369436953696369736983699370037013702370337043705370637073708370937103711371237133714371537163717371837193720372137223723372437253726372737283729373037313732373337343735373637373738373937403741374237433744374537463747374837493750375137523753375437553756375737583759376037613762376337643765376637673768376937703771377237733774377537763777377837793780378137823783378437853786378737883789379037913792379337943795379637973798379938003801380238033804380538063807380838093810381138123813381438153816381738183819382038213822382338243825382638273828382938303831383238333834383538363837383838393840384138423843384438453846384738483849385038513852385338543855385638573858385938603861386238633864386538663867386838693870387138723873387438753876387738783879388038813882388338843885388638873888388938903891389238933894389538963897389838993900390139023903390439053906390739083909391039113912391339143915391639173918391939203921392239233924392539263927392839293930393139323933393439353936393739383939394039413942394339443945394639473948394939503951395239533954395539563957395839593960396139623963396439653966396739683969397039713972397339743975397639773978397939803981398239833984398539863987398839893990399139923993399439953996399739983999400040014002400340044005400640074008400940104011401240134014401540164017401840194020402140224023402440254026402740284029403040314032403340344035403640374038403940404041404240434044404540464047404840494050405140524053405440554056405740584059406040614062406340644065406640674068406940704071407240734074407540764077407840794080408140824083408440854086408740884089409040914092409340944095409640974098409941004101410241034104410541064107410841094110411141124113411441154116411741184119412041214122412341244125412641274128412941304131413241334134413541364137413841394140414141424143414441454146414741484149415041514152415341544155415641574158415941604161416241634164416541664167416841694170417141724173417441754176417741784179418041814182418341844185418641874188418941904191419241934194419541964197419841994200420142024203420442054206420742084209421042114212421342144215421642174218421942204221422242234224422542264227422842294230423142324233423442354236423742384239424042414242424342444245424642474248424942504251425242534254425542564257425842594260426142624263426442654266426742684269427042714272427342744275427642774278427942804281428242834284428542864287428842894290429142924293429442954296429742984299430043014302430343044305430643074308430943104311431243134314431543164317431843194320432143224323432443254326432743284329433043314332433343344335433643374338433943404341434243434344434543464347434843494350435143524353435443554356435743584359436043614362436343644365436643674368436943704371437243734374437543764377437843794380438143824383438443854386438743884389439043914392439343944395439643974398439944004401440244034404440544064407440844094410441144124413441444154416441744184419442044214422442344244425442644274428442944304431443244334434443544364437443844394440444144424443444444454446444744484449445044514452445344544455445644574458445944604461446244634464446544664467446844694470447144724473447444754476447744784479448044814482448344844485448644874488448944904491449244934494449544964497449844994500450145024503450445054506450745084509451045114512451345144515451645174518451945204521452245234524452545264527452845294530453145324533453445354536453745384539454045414542454345444545454645474548454945504551455245534554455545564557455845594560456145624563456445654566456745684569457045714572457345744575457645774578457945804581458245834584458545864587458845894590459145924593459445954596459745984599460046014602460346044605460646074608460946104611461246134614461546164617461846194620462146224623462446254626462746284629463046314632463346344635463646374638463946404641464246434644464546464647464846494650465146524653465446554656465746584659466046614662466346644665466646674668466946704671467246734674467546764677467846794680468146824683468446854686468746884689469046914692469346944695469646974698469947004701470247034704470547064707470847094710471147124713471447154716471747184719472047214722472347244725472647274728472947304731473247334734473547364737473847394740474147424743474447454746474747484749475047514752475347544755475647574758475947604761476247634764476547664767476847694770477147724773477447754776477747784779478047814782478347844785478647874788478947904791479247934794479547964797479847994800480148024803480448054806480748084809481048114812481348144815481648174818481948204821482248234824482548264827482848294830483148324833483448354836483748384839484048414842484348444845484648474848484948504851485248534854485548564857485848594860486148624863486448654866486748684869487048714872487348744875487648774878487948804881488248834884488548864887488848894890489148924893489448954896489748984899490049014902490349044905490649074908490949104911491249134914491549164917491849194920492149224923492449254926492749284929493049314932493349344935493649374938493949404941494249434944494549464947494849494950495149524953495449554956495749584959496049614962496349644965496649674968496949704971497249734974497549764977497849794980498149824983498449854986498749884989499049914992499349944995499649974998499950005001500250035004500550065007500850095010501150125013501450155016501750185019502050215022502350245025502650275028502950305031503250335034503550365037503850395040504150425043504450455046504750485049505050515052505350545055505650575058505950605061506250635064506550665067506850695070507150725073507450755076507750785079508050815082508350845085508650875088508950905091509250935094509550965097509850995100510151025103510451055106510751085109511051115112511351145115511651175118511951205121512251235124512551265127512851295130513151325133513451355136513751385139514051415142514351445145514651475148514951505151515251535154515551565157515851595160516151625163516451655166516751685169517051715172517351745175517651775178517951805181518251835184518551865187518851895190519151925193519451955196519751985199520052015202520352045205520652075208520952105211521252135214521552165217521852195220522152225223522452255226522752285229523052315232523352345235523652375238523952405241524252435244524552465247524852495250525152525253525452555256525752585259526052615262526352645265526652675268526952705271527252735274527552765277527852795280528152825283528452855286528752885289529052915292529352945295529652975298529953005301530253035304530553065307530853095310531153125313531453155316531753185319532053215322532353245325532653275328532953305331533253335334533553365337533853395340534153425343534453455346534753485349535053515352535353545355535653575358535953605361536253635364536553665367536853695370537153725373537453755376537753785379538053815382538353845385538653875388538953905391539253935394539553965397539853995400540154025403540454055406540754085409541054115412541354145415541654175418541954205421542254235424542554265427542854295430543154325433543454355436543754385439544054415442544354445445544654475448544954505451545254535454545554565457545854595460546154625463546454655466546754685469547054715472547354745475547654775478547954805481548254835484548554865487548854895490549154925493549454955496549754985499550055015502550355045505550655075508550955105511551255135514551555165517551855195520552155225523552455255526552755285529553055315532553355345535553655375538553955405541554255435544554555465547554855495550555155525553555455555556555755585559556055615562556355645565556655675568556955705571557255735574557555765577557855795580558155825583558455855586558755885589559055915592559355945595559655975598559956005601560256035604560556065607560856095610561156125613561456155616561756185619562056215622562356245625562656275628562956305631563256335634563556365637563856395640564156425643564456455646564756485649565056515652565356545655565656575658565956605661566256635664566556665667566856695670567156725673567456755676567756785679568056815682568356845685568656875688568956905691569256935694569556965697569856995700570157025703570457055706570757085709571057115712571357145715571657175718571957205721572257235724572557265727572857295730573157325733573457355736573757385739574057415742574357445745574657475748574957505751575257535754575557565757575857595760576157625763576457655766576757685769577057715772577357745775577657775778577957805781578257835784578557865787578857895790579157925793579457955796579757985799580058015802580358045805580658075808580958105811581258135814581558165817581858195820582158225823582458255826582758285829583058315832583358345835583658375838583958405841584258435844584558465847584858495850585158525853585458555856585758585859586058615862586358645865586658675868586958705871587258735874587558765877587858795880588158825883588458855886588758885889589058915892589358945895589658975898589959005901590259035904590559065907590859095910591159125913591459155916591759185919592059215922592359245925592659275928592959305931593259335934593559365937593859395940594159425943594459455946594759485949595059515952595359545955595659575958595959605961596259635964596559665967596859695970597159725973597459755976597759785979598059815982598359845985598659875988598959905991599259935994599559965997599859996000600160026003600460056006600760086009601060116012601360146015601660176018601960206021602260236024602560266027602860296030603160326033603460356036603760386039604060416042604360446045604660476048604960506051605260536054605560566057605860596060606160626063606460656066606760686069607060716072607360746075607660776078607960806081608260836084608560866087608860896090609160926093609460956096609760986099610061016102610361046105610661076108610961106111611261136114611561166117611861196120612161226123612461256126612761286129613061316132613361346135613661376138613961406141614261436144614561466147614861496150615161526153615461556156615761586159616061616162616361646165616661676168616961706171617261736174617561766177617861796180618161826183618461856186618761886189619061916192619361946195619661976198619962006201620262036204620562066207620862096210621162126213621462156216621762186219622062216222622362246225622662276228622962306231623262336234623562366237623862396240624162426243624462456246624762486249625062516252625362546255625662576258625962606261626262636264626562666267626862696270627162726273627462756276627762786279628062816282628362846285628662876288628962906291629262936294629562966297629862996300630163026303630463056306630763086309631063116312631363146315631663176318631963206321632263236324632563266327632863296330633163326333633463356336633763386339634063416342634363446345634663476348634963506351635263536354635563566357635863596360636163626363636463656366636763686369637063716372637363746375637663776378637963806381638263836384638563866387638863896390639163926393639463956396639763986399640064016402640364046405640664076408640964106411641264136414
  1. .title vax_bn_mul_add_words unsigned multiply & add, 32*32+32+32=>64
  2. ;
  3. ; w.j.m. 15-jan-1999
  4. ;
  5. ; it's magic ...
  6. ;
  7. ; ULONG bn_mul_add_words(ULONG r[],ULONG a[],int n,ULONG w) {
  8. ; ULONG c = 0;
  9. ; int i;
  10. ; for(i = 0; i < n; i++) <c,r[i]> := r[i] + c + a[i] * w ;
  11. ; return c;
  12. ; }
  13. r=4 ;(AP)
  14. a=8 ;(AP)
  15. n=12 ;(AP) n by value (input)
  16. w=16 ;(AP) w by value (input)
  17. .psect code,nowrt
  18. .entry bn_mul_add_words,^m<r2,r3,r4,r5,r6>
  19. moval @r(ap),r2
  20. moval @a(ap),r3
  21. movl n(ap),r4 ; assumed >0 by C code
  22. movl w(ap),r5
  23. clrl r6 ; c
  24. 0$:
  25. emul r5,(r3),(r2),r0 ; w, a[], r[] considered signed
  26. ; fixup for "negative" r[]
  27. tstl (r2)
  28. bgeq 10$
  29. incl r1
  30. 10$:
  31. ; add in c
  32. addl2 r6,r0
  33. adwc #0,r1
  34. ; combined fixup for "negative" w, a[]
  35. tstl r5
  36. bgeq 20$
  37. addl2 (r3),r1
  38. 20$:
  39. tstl (r3)
  40. bgeq 30$
  41. addl2 r5,r1
  42. 30$:
  43. movl r0,(r2)+ ; store lo result in r[] & advance
  44. addl #4,r3 ; advance a[]
  45. movl r1,r6 ; store hi result => c
  46. sobgtr r4,0$
  47. movl r6,r0 ; return c
  48. ret
  49. .title vax_bn_mul_words unsigned multiply & add, 32*32+32=>64
  50. ;
  51. ; w.j.m. 15-jan-1999
  52. ;
  53. ; it's magic ...
  54. ;
  55. ; ULONG bn_mul_words(ULONG r[],ULONG a[],int n,ULONG w) {
  56. ; ULONG c = 0;
  57. ; int i;
  58. ; for(i = 0; i < num; i++) <c,r[i]> := a[i] * w + c ;
  59. ; return(c);
  60. ; }
  61. r=4 ;(AP)
  62. a=8 ;(AP)
  63. n=12 ;(AP) n by value (input)
  64. w=16 ;(AP) w by value (input)
  65. .psect code,nowrt
  66. .entry bn_mul_words,^m<r2,r3,r4,r5,r6>
  67. moval @r(ap),r2 ; r2 -> r[]
  68. moval @a(ap),r3 ; r3 -> a[]
  69. movl n(ap),r4 ; r4 = loop count (assumed >0 by C code)
  70. movl w(ap),r5 ; r5 = w
  71. clrl r6 ; r6 = c
  72. 0$:
  73. ; <r1,r0> := w * a[] + c
  74. emul r5,(r3),r6,r0 ; w, a[], c considered signed
  75. ; fixup for "negative" c
  76. tstl r6 ; c
  77. bgeq 10$
  78. incl r1
  79. 10$:
  80. ; combined fixup for "negative" w, a[]
  81. tstl r5 ; w
  82. bgeq 20$
  83. addl2 (r3),r1 ; a[]
  84. 20$:
  85. tstl (r3) ; a[]
  86. bgeq 30$
  87. addl2 r5,r1 ; w
  88. 30$:
  89. movl r0,(r2)+ ; store lo result in r[] & advance
  90. addl #4,r3 ; advance a[]
  91. movl r1,r6 ; store hi result => c
  92. sobgtr r4,0$
  93. movl r6,r0 ; return c
  94. ret
  95. .title vax_bn_sqr_words unsigned square, 32*32=>64
  96. ;
  97. ; w.j.m. 15-jan-1999
  98. ;
  99. ; it's magic ...
  100. ;
  101. ; void bn_sqr_words(ULONG r[],ULONG a[],int n) {
  102. ; int i;
  103. ; for(i = 0; i < n; i++) <r[2*i+1],r[2*i]> := a[i] * a[i] ;
  104. ; }
  105. r=4 ;(AP)
  106. a=8 ;(AP)
  107. n=12 ;(AP) n by value (input)
  108. .psect code,nowrt
  109. .entry bn_sqr_words,^m<r2,r3,r4,r5>
  110. moval @r(ap),r2 ; r2 -> r[]
  111. moval @a(ap),r3 ; r3 -> a[]
  112. movl n(ap),r4 ; r4 = n (assumed >0 by C code)
  113. 0$:
  114. movl (r3)+,r5 ; r5 = a[] & advance
  115. ; <r1,r0> := a[] * a[]
  116. emul r5,r5,#0,r0 ; a[] considered signed
  117. ; fixup for "negative" a[]
  118. tstl r5 ; a[]
  119. bgeq 30$
  120. addl2 r5,r1 ; a[]
  121. addl2 r5,r1 ; a[]
  122. 30$:
  123. movl r0,(r2)+ ; store lo result in r[] & advance
  124. movl r1,(r2)+ ; store hi result in r[] & advance
  125. sobgtr r4,0$
  126. movl #1,r0 ; return SS$_NORMAL
  127. ret
  128. .title vax_bn_div_words unsigned divide
  129. ;
  130. ; Richard Levitte 20-Nov-2000
  131. ;
  132. ; ULONG bn_div_words(ULONG h, ULONG l, ULONG d)
  133. ; {
  134. ; return ((ULONG)((((ULLONG)h)<<32)|l) / (ULLONG)d);
  135. ; }
  136. ;
  137. ; Using EDIV would be very easy, if it didn't do signed calculations.
  138. ; Any time, any of the input numbers are signed, there are problems,
  139. ; usually with integer overflow, at which point it returns useless
  140. ; data (the quotient gets the value of l, and the remainder becomes 0).
  141. ;
  142. ; If it was just for the dividend, it would be very easy, just divide
  143. ; it by 2 (unsigned), do the division, multiply the resulting quotient
  144. ; and remainder by 2, add the bit that was dropped when dividing by 2
  145. ; to the remainder, and do some adjustment so the remainder doesn't
  146. ; end up larger than the divisor. This method works as long as the
  147. ; divisor is positive, so we'll keep that (with a small adjustment)
  148. ; as the main method.
  149. ; For some cases when the divisor is negative (from EDIV's point of
  150. ; view, i.e. when the highest bit is set), dividing the dividend by
  151. ; 2 isn't enough, it needs to be divided by 4. Furthermore, the
  152. ; divisor needs to be divided by 2 (unsigned) as well, to avoid more
  153. ; problems with the sign. In this case, a little extra fiddling with
  154. ; the remainder is required.
  155. ;
  156. ; So, the simplest way to handle this is always to divide the dividend
  157. ; by 4, and to divide the divisor by 2 if it's highest bit is set.
  158. ; After EDIV has been used, the quotient gets multiplied by 4 if the
  159. ; original divisor was positive, otherwise 2. The remainder, oddly
  160. ; enough, is *always* multiplied by 4.
  161. ;
  162. ; The routine ends with comparing the resulting remainder with the
  163. ; original divisor and if the remainder is larger, subtract the
  164. ; original divisor from it, and increase the quotient by 1. This is
  165. ; done until the remainder is smaller than the divisor.
  166. ;
  167. ; The complete algorithm looks like this:
  168. ;
  169. ; d' = d
  170. ; l' = l & 3
  171. ; [h,l] = [h,l] >> 2
  172. ; [q,r] = floor([h,l] / d) # This is the EDIV operation
  173. ; if (q < 0) q = -q # I doubt this is necessary any more
  174. ;
  175. ; r' = r >> 30
  176. ; if (d' >= 0) q = q << 1
  177. ; q = q << 1
  178. ; r = (r << 2) + l'
  179. ;
  180. ; if (d' < 0)
  181. ; {
  182. ; [r',r] = [r',r] - q
  183. ; while ([r',r] < 0)
  184. ; {
  185. ; [r',r] = [r',r] + d
  186. ; q = q - 1
  187. ; }
  188. ; }
  189. ;
  190. ; while ([r',r] >= d)
  191. ; {
  192. ; [r',r] = [r',r] - d
  193. ; q = q + 1
  194. ; }
  195. ;
  196. ; return q
  197. h=4 ;(AP) h by value (input)
  198. l=8 ;(AP) l by value (input)
  199. d=12 ;(AP) d by value (input)
  200. ;lprim=r5
  201. ;rprim=r6
  202. ;dprim=r7
  203. .psect code,nowrt
  204. .entry bn_div_words,^m<r2,r3,r4,r5,r6,r7>
  205. movl l(ap),r2
  206. movl h(ap),r3
  207. movl d(ap),r4
  208. bicl3 #^XFFFFFFFC,r2,r5 ; l' = l & 3
  209. bicl3 #^X00000003,r2,r2
  210. bicl3 #^XFFFFFFFC,r3,r6
  211. bicl3 #^X00000003,r3,r3
  212. addl r6,r2
  213. rotl #-2,r2,r2 ; l = l >> 2
  214. rotl #-2,r3,r3 ; h = h >> 2
  215. movl #0,r6
  216. movl r4,r7 ; d' = d
  217. tstl r4
  218. beql 666$ ; Uh-oh, the divisor is 0...
  219. bgtr 1$
  220. rotl #-1,r4,r4 ; If d is negative, shift it right.
  221. bicl2 #^X80000000,r4 ; Since d is then a large number, the
  222. ; lowest bit is insignificant
  223. ; (contradict that, and I'll fix the problem!)
  224. 1$:
  225. ediv r4,r2,r2,r3 ; Do the actual division
  226. tstl r2
  227. bgeq 3$
  228. mnegl r2,r2 ; if q < 0, negate it
  229. 3$:
  230. tstl r7
  231. blss 4$
  232. ashl #1,r2,r2 ; q = q << 1
  233. 4$:
  234. ashl #1,r2,r2 ; q = q << 1
  235. rotl #2,r3,r3 ; r = r << 2
  236. bicl3 #^XFFFFFFFC,r3,r6 ; r' gets the high bits from r
  237. bicl3 #^X00000003,r3,r3
  238. addl r5,r3 ; r = r + l'
  239. tstl r7
  240. bgeq 5$
  241. bitl #1,r7
  242. beql 5$ ; if d < 0 && d & 1
  243. subl r2,r3 ; [r',r] = [r',r] - q
  244. sbwc #0,r6
  245. 45$:
  246. bgeq 5$ ; while r < 0
  247. decl r2 ; q = q - 1
  248. addl r7,r3 ; [r',r] = [r',r] + d
  249. adwc #0,r6
  250. brb 45$
  251. 5$:
  252. tstl r6
  253. bneq 6$
  254. cmpl r3,r7
  255. blssu 42$ ; while [r',r] >= d'
  256. 6$:
  257. subl r7,r3 ; [r',r] = [r',r] - d
  258. sbwc #0,r6
  259. incl r2 ; q = q + 1
  260. brb 5$
  261. 42$:
  262. ; movl r3,r1
  263. movl r2,r0
  264. ret
  265. 666$:
  266. movl #^XFFFFFFFF,r0
  267. ret
  268. .title vax_bn_add_words unsigned add of two arrays
  269. ;
  270. ; Richard Levitte 20-Nov-2000
  271. ;
  272. ; ULONG bn_add_words(ULONG r[], ULONG a[], ULONG b[], int n) {
  273. ; ULONG c = 0;
  274. ; int i;
  275. ; for (i = 0; i < n; i++) <c,r[i]> = a[i] + b[i] + c;
  276. ; return(c);
  277. ; }
  278. r=4 ;(AP) r by reference (output)
  279. a=8 ;(AP) a by reference (input)
  280. b=12 ;(AP) b by reference (input)
  281. n=16 ;(AP) n by value (input)
  282. .psect code,nowrt
  283. .entry bn_add_words,^m<r2,r3,r4,r5,r6>
  284. moval @r(ap),r2
  285. moval @a(ap),r3
  286. moval @b(ap),r4
  287. movl n(ap),r5 ; assumed >0 by C code
  288. clrl r0 ; c
  289. tstl r5 ; carry = 0
  290. bleq 666$
  291. 0$:
  292. movl (r3)+,r6 ; carry untouched
  293. adwc (r4)+,r6 ; carry used and touched
  294. movl r6,(r2)+ ; carry untouched
  295. sobgtr r5,0$ ; carry untouched
  296. adwc #0,r0
  297. 666$:
  298. ret
  299. .title vax_bn_sub_words unsigned add of two arrays
  300. ;
  301. ; Richard Levitte 20-Nov-2000
  302. ;
  303. ; ULONG bn_sub_words(ULONG r[], ULONG a[], ULONG b[], int n) {
  304. ; ULONG c = 0;
  305. ; int i;
  306. ; for (i = 0; i < n; i++) <c,r[i]> = a[i] - b[i] - c;
  307. ; return(c);
  308. ; }
  309. r=4 ;(AP) r by reference (output)
  310. a=8 ;(AP) a by reference (input)
  311. b=12 ;(AP) b by reference (input)
  312. n=16 ;(AP) n by value (input)
  313. .psect code,nowrt
  314. .entry bn_sub_words,^m<r2,r3,r4,r5,r6>
  315. moval @r(ap),r2
  316. moval @a(ap),r3
  317. moval @b(ap),r4
  318. movl n(ap),r5 ; assumed >0 by C code
  319. clrl r0 ; c
  320. tstl r5 ; carry = 0
  321. bleq 666$
  322. 0$:
  323. movl (r3)+,r6 ; carry untouched
  324. sbwc (r4)+,r6 ; carry used and touched
  325. movl r6,(r2)+ ; carry untouched
  326. sobgtr r5,0$ ; carry untouched
  327. adwc #0,r0
  328. 666$:
  329. ret
  330. ;r=4 ;(AP)
  331. ;a=8 ;(AP)
  332. ;b=12 ;(AP)
  333. ;n=16 ;(AP) n by value (input)
  334. .psect code,nowrt
  335. .entry BN_MUL_COMBA8,^m<r2,r3,r4,r5,r6,r7,r8,r9,r10,r11>
  336. movab -924(sp),sp
  337. clrq r8
  338. clrl r10
  339. movl 8(ap),r6
  340. movzwl 2(r6),r3
  341. movl 12(ap),r7
  342. bicl3 #-65536,(r7),r2
  343. movzwl 2(r7),r0
  344. bicl2 #-65536,r0
  345. bicl3 #-65536,(r6),-12(fp)
  346. bicl3 #-65536,r3,-16(fp)
  347. mull3 r0,-12(fp),-4(fp)
  348. mull2 r2,-12(fp)
  349. mull3 r2,-16(fp),-8(fp)
  350. mull2 r0,-16(fp)
  351. addl3 -4(fp),-8(fp),r0
  352. bicl3 #0,r0,-4(fp)
  353. cmpl -4(fp),-8(fp)
  354. bgequ noname.45
  355. addl2 #65536,-16(fp)
  356. noname.45:
  357. movzwl -2(fp),r0
  358. bicl2 #-65536,r0
  359. addl2 r0,-16(fp)
  360. bicl3 #-65536,-4(fp),r0
  361. ashl #16,r0,-8(fp)
  362. addl3 -8(fp),-12(fp),r0
  363. bicl3 #0,r0,-12(fp)
  364. cmpl -12(fp),-8(fp)
  365. bgequ noname.46
  366. incl -16(fp)
  367. noname.46:
  368. movl -12(fp),r1
  369. movl -16(fp),r2
  370. addl2 r1,r9
  371. bicl2 #0,r9
  372. cmpl r9,r1
  373. bgequ noname.47
  374. incl r2
  375. noname.47:
  376. addl2 r2,r8
  377. bicl2 #0,r8
  378. cmpl r8,r2
  379. bgequ noname.48
  380. incl r10
  381. noname.48:
  382. movl 4(ap),r11
  383. movl r9,(r11)
  384. clrl r9
  385. movzwl 2(r6),r2
  386. bicl3 #-65536,4(r7),r3
  387. movzwl 6(r7),r0
  388. bicl2 #-65536,r0
  389. bicl3 #-65536,(r6),-28(fp)
  390. bicl3 #-65536,r2,-32(fp)
  391. mull3 r0,-28(fp),-20(fp)
  392. mull2 r3,-28(fp)
  393. mull3 r3,-32(fp),-24(fp)
  394. mull2 r0,-32(fp)
  395. addl3 -20(fp),-24(fp),r0
  396. bicl3 #0,r0,-20(fp)
  397. cmpl -20(fp),-24(fp)
  398. bgequ noname.49
  399. addl2 #65536,-32(fp)
  400. noname.49:
  401. movzwl -18(fp),r0
  402. bicl2 #-65536,r0
  403. addl2 r0,-32(fp)
  404. bicl3 #-65536,-20(fp),r0
  405. ashl #16,r0,-24(fp)
  406. addl3 -24(fp),-28(fp),r0
  407. bicl3 #0,r0,-28(fp)
  408. cmpl -28(fp),-24(fp)
  409. bgequ noname.50
  410. incl -32(fp)
  411. noname.50:
  412. movl -28(fp),r1
  413. movl -32(fp),r2
  414. addl2 r1,r8
  415. bicl2 #0,r8
  416. cmpl r8,r1
  417. bgequ noname.51
  418. incl r2
  419. noname.51:
  420. addl2 r2,r10
  421. bicl2 #0,r10
  422. cmpl r10,r2
  423. bgequ noname.52
  424. incl r9
  425. noname.52:
  426. movzwl 6(r6),r2
  427. bicl3 #-65536,(r7),r3
  428. movzwl 2(r7),r0
  429. bicl2 #-65536,r0
  430. bicl3 #-65536,4(r6),-44(fp)
  431. bicl3 #-65536,r2,-48(fp)
  432. mull3 r0,-44(fp),-36(fp)
  433. mull2 r3,-44(fp)
  434. mull3 r3,-48(fp),-40(fp)
  435. mull2 r0,-48(fp)
  436. addl3 -36(fp),-40(fp),r0
  437. bicl3 #0,r0,-36(fp)
  438. cmpl -36(fp),-40(fp)
  439. bgequ noname.53
  440. addl2 #65536,-48(fp)
  441. noname.53:
  442. movzwl -34(fp),r0
  443. bicl2 #-65536,r0
  444. addl2 r0,-48(fp)
  445. bicl3 #-65536,-36(fp),r0
  446. ashl #16,r0,-40(fp)
  447. addl3 -40(fp),-44(fp),r0
  448. bicl3 #0,r0,-44(fp)
  449. cmpl -44(fp),-40(fp)
  450. bgequ noname.54
  451. incl -48(fp)
  452. noname.54:
  453. movl -44(fp),r1
  454. movl -48(fp),r2
  455. addl2 r1,r8
  456. bicl2 #0,r8
  457. cmpl r8,r1
  458. bgequ noname.55
  459. incl r2
  460. noname.55:
  461. addl2 r2,r10
  462. bicl2 #0,r10
  463. cmpl r10,r2
  464. bgequ noname.56
  465. incl r9
  466. noname.56:
  467. movl r8,4(r11)
  468. clrl r8
  469. movzwl 10(r6),r2
  470. bicl3 #-65536,(r7),r3
  471. movzwl 2(r7),r0
  472. bicl2 #-65536,r0
  473. bicl3 #-65536,8(r6),-60(fp)
  474. bicl3 #-65536,r2,-64(fp)
  475. mull3 r0,-60(fp),-52(fp)
  476. mull2 r3,-60(fp)
  477. mull3 r3,-64(fp),-56(fp)
  478. mull2 r0,-64(fp)
  479. addl3 -52(fp),-56(fp),r0
  480. bicl3 #0,r0,-52(fp)
  481. cmpl -52(fp),-56(fp)
  482. bgequ noname.57
  483. addl2 #65536,-64(fp)
  484. noname.57:
  485. movzwl -50(fp),r0
  486. bicl2 #-65536,r0
  487. addl2 r0,-64(fp)
  488. bicl3 #-65536,-52(fp),r0
  489. ashl #16,r0,-56(fp)
  490. addl3 -56(fp),-60(fp),r0
  491. bicl3 #0,r0,-60(fp)
  492. cmpl -60(fp),-56(fp)
  493. bgequ noname.58
  494. incl -64(fp)
  495. noname.58:
  496. movl -60(fp),r1
  497. movl -64(fp),r2
  498. addl2 r1,r10
  499. bicl2 #0,r10
  500. cmpl r10,r1
  501. bgequ noname.59
  502. incl r2
  503. noname.59:
  504. addl2 r2,r9
  505. bicl2 #0,r9
  506. cmpl r9,r2
  507. bgequ noname.60
  508. incl r8
  509. noname.60:
  510. movzwl 6(r6),r2
  511. bicl3 #-65536,4(r7),r3
  512. movzwl 6(r7),r0
  513. bicl2 #-65536,r0
  514. bicl3 #-65536,4(r6),-76(fp)
  515. bicl3 #-65536,r2,-80(fp)
  516. mull3 r0,-76(fp),-68(fp)
  517. mull2 r3,-76(fp)
  518. mull3 r3,-80(fp),-72(fp)
  519. mull2 r0,-80(fp)
  520. addl3 -68(fp),-72(fp),r0
  521. bicl3 #0,r0,-68(fp)
  522. cmpl -68(fp),-72(fp)
  523. bgequ noname.61
  524. addl2 #65536,-80(fp)
  525. noname.61:
  526. movzwl -66(fp),r0
  527. bicl2 #-65536,r0
  528. addl2 r0,-80(fp)
  529. bicl3 #-65536,-68(fp),r0
  530. ashl #16,r0,-72(fp)
  531. addl3 -72(fp),-76(fp),r0
  532. bicl3 #0,r0,-76(fp)
  533. cmpl -76(fp),-72(fp)
  534. bgequ noname.62
  535. incl -80(fp)
  536. noname.62:
  537. movl -76(fp),r1
  538. movl -80(fp),r2
  539. addl2 r1,r10
  540. bicl2 #0,r10
  541. cmpl r10,r1
  542. bgequ noname.63
  543. incl r2
  544. noname.63:
  545. addl2 r2,r9
  546. bicl2 #0,r9
  547. cmpl r9,r2
  548. bgequ noname.64
  549. incl r8
  550. noname.64:
  551. movzwl 2(r6),r2
  552. bicl3 #-65536,8(r7),r3
  553. movzwl 10(r7),r0
  554. bicl2 #-65536,r0
  555. bicl3 #-65536,(r6),-92(fp)
  556. bicl3 #-65536,r2,-96(fp)
  557. mull3 r0,-92(fp),-84(fp)
  558. mull2 r3,-92(fp)
  559. mull3 r3,-96(fp),-88(fp)
  560. mull2 r0,-96(fp)
  561. addl3 -84(fp),-88(fp),r0
  562. bicl3 #0,r0,-84(fp)
  563. cmpl -84(fp),-88(fp)
  564. bgequ noname.65
  565. addl2 #65536,-96(fp)
  566. noname.65:
  567. movzwl -82(fp),r0
  568. bicl2 #-65536,r0
  569. addl2 r0,-96(fp)
  570. bicl3 #-65536,-84(fp),r0
  571. ashl #16,r0,-88(fp)
  572. addl3 -88(fp),-92(fp),r0
  573. bicl3 #0,r0,-92(fp)
  574. cmpl -92(fp),-88(fp)
  575. bgequ noname.66
  576. incl -96(fp)
  577. noname.66:
  578. movl -92(fp),r1
  579. movl -96(fp),r2
  580. addl2 r1,r10
  581. bicl2 #0,r10
  582. cmpl r10,r1
  583. bgequ noname.67
  584. incl r2
  585. noname.67:
  586. addl2 r2,r9
  587. bicl2 #0,r9
  588. cmpl r9,r2
  589. bgequ noname.68
  590. incl r8
  591. noname.68:
  592. movl r10,8(r11)
  593. clrl r10
  594. movzwl 2(r6),r2
  595. bicl3 #-65536,12(r7),r3
  596. movzwl 14(r7),r0
  597. bicl2 #-65536,r0
  598. bicl3 #-65536,(r6),-108(fp)
  599. bicl3 #-65536,r2,-112(fp)
  600. mull3 r0,-108(fp),-100(fp)
  601. mull2 r3,-108(fp)
  602. mull3 r3,-112(fp),-104(fp)
  603. mull2 r0,-112(fp)
  604. addl3 -100(fp),-104(fp),r0
  605. bicl3 #0,r0,-100(fp)
  606. cmpl -100(fp),-104(fp)
  607. bgequ noname.69
  608. addl2 #65536,-112(fp)
  609. noname.69:
  610. movzwl -98(fp),r0
  611. bicl2 #-65536,r0
  612. addl2 r0,-112(fp)
  613. bicl3 #-65536,-100(fp),r0
  614. ashl #16,r0,-104(fp)
  615. addl3 -104(fp),-108(fp),r0
  616. bicl3 #0,r0,-108(fp)
  617. cmpl -108(fp),-104(fp)
  618. bgequ noname.70
  619. incl -112(fp)
  620. noname.70:
  621. movl -108(fp),r1
  622. movl -112(fp),r2
  623. addl2 r1,r9
  624. bicl2 #0,r9
  625. cmpl r9,r1
  626. bgequ noname.71
  627. incl r2
  628. noname.71:
  629. addl2 r2,r8
  630. bicl2 #0,r8
  631. cmpl r8,r2
  632. bgequ noname.72
  633. incl r10
  634. noname.72:
  635. movzwl 6(r6),r2
  636. bicl3 #-65536,8(r7),r3
  637. movzwl 10(r7),r0
  638. bicl2 #-65536,r0
  639. bicl3 #-65536,4(r6),-124(fp)
  640. bicl3 #-65536,r2,-128(fp)
  641. mull3 r0,-124(fp),-116(fp)
  642. mull2 r3,-124(fp)
  643. mull3 r3,-128(fp),-120(fp)
  644. mull2 r0,-128(fp)
  645. addl3 -116(fp),-120(fp),r0
  646. bicl3 #0,r0,-116(fp)
  647. cmpl -116(fp),-120(fp)
  648. bgequ noname.73
  649. addl2 #65536,-128(fp)
  650. noname.73:
  651. movzwl -114(fp),r0
  652. bicl2 #-65536,r0
  653. addl2 r0,-128(fp)
  654. bicl3 #-65536,-116(fp),r0
  655. ashl #16,r0,-120(fp)
  656. addl3 -120(fp),-124(fp),r0
  657. bicl3 #0,r0,-124(fp)
  658. cmpl -124(fp),-120(fp)
  659. bgequ noname.74
  660. incl -128(fp)
  661. noname.74:
  662. movl -124(fp),r1
  663. movl -128(fp),r2
  664. addl2 r1,r9
  665. bicl2 #0,r9
  666. cmpl r9,r1
  667. bgequ noname.75
  668. incl r2
  669. noname.75:
  670. addl2 r2,r8
  671. bicl2 #0,r8
  672. cmpl r8,r2
  673. bgequ noname.76
  674. incl r10
  675. noname.76:
  676. movzwl 10(r6),r2
  677. bicl3 #-65536,4(r7),r3
  678. movzwl 6(r7),r0
  679. bicl2 #-65536,r0
  680. bicl3 #-65536,8(r6),-140(fp)
  681. bicl3 #-65536,r2,-144(fp)
  682. mull3 r0,-140(fp),-132(fp)
  683. mull2 r3,-140(fp)
  684. mull3 r3,-144(fp),-136(fp)
  685. mull2 r0,-144(fp)
  686. addl3 -132(fp),-136(fp),r0
  687. bicl3 #0,r0,-132(fp)
  688. cmpl -132(fp),-136(fp)
  689. bgequ noname.77
  690. addl2 #65536,-144(fp)
  691. noname.77:
  692. movzwl -130(fp),r0
  693. bicl2 #-65536,r0
  694. addl2 r0,-144(fp)
  695. bicl3 #-65536,-132(fp),r0
  696. ashl #16,r0,-136(fp)
  697. addl3 -136(fp),-140(fp),r0
  698. bicl3 #0,r0,-140(fp)
  699. cmpl -140(fp),-136(fp)
  700. bgequ noname.78
  701. incl -144(fp)
  702. noname.78:
  703. movl -140(fp),r1
  704. movl -144(fp),r2
  705. addl2 r1,r9
  706. bicl2 #0,r9
  707. cmpl r9,r1
  708. bgequ noname.79
  709. incl r2
  710. noname.79:
  711. addl2 r2,r8
  712. bicl2 #0,r8
  713. cmpl r8,r2
  714. bgequ noname.80
  715. incl r10
  716. noname.80:
  717. movzwl 14(r6),r2
  718. bicl3 #-65536,(r7),r3
  719. movzwl 2(r7),r0
  720. bicl2 #-65536,r0
  721. bicl3 #-65536,12(r6),-156(fp)
  722. bicl3 #-65536,r2,-160(fp)
  723. mull3 r0,-156(fp),-148(fp)
  724. mull2 r3,-156(fp)
  725. mull3 r3,-160(fp),-152(fp)
  726. mull2 r0,-160(fp)
  727. addl3 -148(fp),-152(fp),r0
  728. bicl3 #0,r0,-148(fp)
  729. cmpl -148(fp),-152(fp)
  730. bgequ noname.81
  731. addl2 #65536,-160(fp)
  732. noname.81:
  733. movzwl -146(fp),r0
  734. bicl2 #-65536,r0
  735. addl2 r0,-160(fp)
  736. bicl3 #-65536,-148(fp),r0
  737. ashl #16,r0,-152(fp)
  738. addl3 -152(fp),-156(fp),r0
  739. bicl3 #0,r0,-156(fp)
  740. cmpl -156(fp),-152(fp)
  741. bgequ noname.82
  742. incl -160(fp)
  743. noname.82:
  744. movl -156(fp),r1
  745. movl -160(fp),r2
  746. addl2 r1,r9
  747. bicl2 #0,r9
  748. cmpl r9,r1
  749. bgequ noname.83
  750. incl r2
  751. noname.83:
  752. addl2 r2,r8
  753. bicl2 #0,r8
  754. cmpl r8,r2
  755. bgequ noname.84
  756. incl r10
  757. noname.84:
  758. movl r9,12(r11)
  759. clrl r9
  760. movzwl 18(r6),r2
  761. bicl3 #-65536,(r7),r3
  762. movzwl 2(r7),r0
  763. bicl2 #-65536,r0
  764. bicl3 #-65536,16(r6),-172(fp)
  765. bicl3 #-65536,r2,-176(fp)
  766. mull3 r0,-172(fp),-164(fp)
  767. mull2 r3,-172(fp)
  768. mull3 r3,-176(fp),-168(fp)
  769. mull2 r0,-176(fp)
  770. addl3 -164(fp),-168(fp),r0
  771. bicl3 #0,r0,-164(fp)
  772. cmpl -164(fp),-168(fp)
  773. bgequ noname.85
  774. addl2 #65536,-176(fp)
  775. noname.85:
  776. movzwl -162(fp),r0
  777. bicl2 #-65536,r0
  778. addl2 r0,-176(fp)
  779. bicl3 #-65536,-164(fp),r0
  780. ashl #16,r0,-168(fp)
  781. addl3 -168(fp),-172(fp),r0
  782. bicl3 #0,r0,-172(fp)
  783. cmpl -172(fp),-168(fp)
  784. bgequ noname.86
  785. incl -176(fp)
  786. noname.86:
  787. movl -172(fp),r1
  788. movl -176(fp),r2
  789. addl2 r1,r8
  790. bicl2 #0,r8
  791. cmpl r8,r1
  792. bgequ noname.87
  793. incl r2
  794. noname.87:
  795. addl2 r2,r10
  796. bicl2 #0,r10
  797. cmpl r10,r2
  798. bgequ noname.88
  799. incl r9
  800. noname.88:
  801. movzwl 14(r6),r2
  802. bicl3 #-65536,4(r7),r3
  803. movzwl 6(r7),r0
  804. bicl2 #-65536,r0
  805. bicl3 #-65536,12(r6),-188(fp)
  806. bicl3 #-65536,r2,-192(fp)
  807. mull3 r0,-188(fp),-180(fp)
  808. mull2 r3,-188(fp)
  809. mull3 r3,-192(fp),-184(fp)
  810. mull2 r0,-192(fp)
  811. addl3 -180(fp),-184(fp),r0
  812. bicl3 #0,r0,-180(fp)
  813. cmpl -180(fp),-184(fp)
  814. bgequ noname.89
  815. addl2 #65536,-192(fp)
  816. noname.89:
  817. movzwl -178(fp),r0
  818. bicl2 #-65536,r0
  819. addl2 r0,-192(fp)
  820. bicl3 #-65536,-180(fp),r0
  821. ashl #16,r0,-184(fp)
  822. addl3 -184(fp),-188(fp),r0
  823. bicl3 #0,r0,-188(fp)
  824. cmpl -188(fp),-184(fp)
  825. bgequ noname.90
  826. incl -192(fp)
  827. noname.90:
  828. movl -188(fp),r1
  829. movl -192(fp),r2
  830. addl2 r1,r8
  831. bicl2 #0,r8
  832. cmpl r8,r1
  833. bgequ noname.91
  834. incl r2
  835. noname.91:
  836. addl2 r2,r10
  837. bicl2 #0,r10
  838. cmpl r10,r2
  839. bgequ noname.92
  840. incl r9
  841. noname.92:
  842. movzwl 10(r6),r2
  843. bicl3 #-65536,8(r7),r3
  844. movzwl 10(r7),r0
  845. bicl2 #-65536,r0
  846. bicl3 #-65536,8(r6),-204(fp)
  847. bicl3 #-65536,r2,-208(fp)
  848. mull3 r0,-204(fp),-196(fp)
  849. mull2 r3,-204(fp)
  850. mull3 r3,-208(fp),-200(fp)
  851. mull2 r0,-208(fp)
  852. addl3 -196(fp),-200(fp),r0
  853. bicl3 #0,r0,-196(fp)
  854. cmpl -196(fp),-200(fp)
  855. bgequ noname.93
  856. addl2 #65536,-208(fp)
  857. noname.93:
  858. movzwl -194(fp),r0
  859. bicl2 #-65536,r0
  860. addl2 r0,-208(fp)
  861. bicl3 #-65536,-196(fp),r0
  862. ashl #16,r0,-200(fp)
  863. addl3 -200(fp),-204(fp),r0
  864. bicl3 #0,r0,-204(fp)
  865. cmpl -204(fp),-200(fp)
  866. bgequ noname.94
  867. incl -208(fp)
  868. noname.94:
  869. movl -204(fp),r1
  870. movl -208(fp),r2
  871. addl2 r1,r8
  872. bicl2 #0,r8
  873. cmpl r8,r1
  874. bgequ noname.95
  875. incl r2
  876. noname.95:
  877. addl2 r2,r10
  878. bicl2 #0,r10
  879. cmpl r10,r2
  880. bgequ noname.96
  881. incl r9
  882. noname.96:
  883. movzwl 6(r6),r2
  884. bicl3 #-65536,12(r7),r3
  885. movzwl 14(r7),r0
  886. bicl2 #-65536,r0
  887. bicl3 #-65536,4(r6),-220(fp)
  888. bicl3 #-65536,r2,-224(fp)
  889. mull3 r0,-220(fp),-212(fp)
  890. mull2 r3,-220(fp)
  891. mull3 r3,-224(fp),-216(fp)
  892. mull2 r0,-224(fp)
  893. addl3 -212(fp),-216(fp),r0
  894. bicl3 #0,r0,-212(fp)
  895. cmpl -212(fp),-216(fp)
  896. bgequ noname.97
  897. addl2 #65536,-224(fp)
  898. noname.97:
  899. movzwl -210(fp),r0
  900. bicl2 #-65536,r0
  901. addl2 r0,-224(fp)
  902. bicl3 #-65536,-212(fp),r0
  903. ashl #16,r0,-216(fp)
  904. addl3 -216(fp),-220(fp),r0
  905. bicl3 #0,r0,-220(fp)
  906. cmpl -220(fp),-216(fp)
  907. bgequ noname.98
  908. incl -224(fp)
  909. noname.98:
  910. movl -220(fp),r1
  911. movl -224(fp),r2
  912. addl2 r1,r8
  913. bicl2 #0,r8
  914. cmpl r8,r1
  915. bgequ noname.99
  916. incl r2
  917. noname.99:
  918. addl2 r2,r10
  919. bicl2 #0,r10
  920. cmpl r10,r2
  921. bgequ noname.100
  922. incl r9
  923. noname.100:
  924. movzwl 2(r6),r2
  925. bicl3 #-65536,16(r7),r3
  926. movzwl 18(r7),r0
  927. bicl2 #-65536,r0
  928. bicl3 #-65536,(r6),-236(fp)
  929. bicl3 #-65536,r2,-240(fp)
  930. mull3 r0,-236(fp),-228(fp)
  931. mull2 r3,-236(fp)
  932. mull3 r3,-240(fp),-232(fp)
  933. mull2 r0,-240(fp)
  934. addl3 -228(fp),-232(fp),r0
  935. bicl3 #0,r0,-228(fp)
  936. cmpl -228(fp),-232(fp)
  937. bgequ noname.101
  938. addl2 #65536,-240(fp)
  939. noname.101:
  940. movzwl -226(fp),r0
  941. bicl2 #-65536,r0
  942. addl2 r0,-240(fp)
  943. bicl3 #-65536,-228(fp),r0
  944. ashl #16,r0,-232(fp)
  945. addl3 -232(fp),-236(fp),r0
  946. bicl3 #0,r0,-236(fp)
  947. cmpl -236(fp),-232(fp)
  948. bgequ noname.102
  949. incl -240(fp)
  950. noname.102:
  951. movl -236(fp),r1
  952. movl -240(fp),r2
  953. addl2 r1,r8
  954. bicl2 #0,r8
  955. cmpl r8,r1
  956. bgequ noname.103
  957. incl r2
  958. noname.103:
  959. addl2 r2,r10
  960. bicl2 #0,r10
  961. cmpl r10,r2
  962. bgequ noname.104
  963. incl r9
  964. noname.104:
  965. movl r8,16(r11)
  966. clrl r8
  967. movzwl 2(r6),r2
  968. bicl3 #-65536,20(r7),r3
  969. movzwl 22(r7),r0
  970. bicl2 #-65536,r0
  971. bicl3 #-65536,(r6),-252(fp)
  972. bicl3 #-65536,r2,-256(fp)
  973. mull3 r0,-252(fp),-244(fp)
  974. mull2 r3,-252(fp)
  975. mull3 r3,-256(fp),-248(fp)
  976. mull2 r0,-256(fp)
  977. addl3 -244(fp),-248(fp),r0
  978. bicl3 #0,r0,-244(fp)
  979. cmpl -244(fp),-248(fp)
  980. bgequ noname.105
  981. addl2 #65536,-256(fp)
  982. noname.105:
  983. movzwl -242(fp),r0
  984. bicl2 #-65536,r0
  985. addl2 r0,-256(fp)
  986. bicl3 #-65536,-244(fp),r0
  987. ashl #16,r0,-248(fp)
  988. addl3 -248(fp),-252(fp),r0
  989. bicl3 #0,r0,-252(fp)
  990. cmpl -252(fp),-248(fp)
  991. bgequ noname.106
  992. incl -256(fp)
  993. noname.106:
  994. movl -252(fp),r1
  995. movl -256(fp),r2
  996. addl2 r1,r10
  997. bicl2 #0,r10
  998. cmpl r10,r1
  999. bgequ noname.107
  1000. incl r2
  1001. noname.107:
  1002. addl2 r2,r9
  1003. bicl2 #0,r9
  1004. cmpl r9,r2
  1005. bgequ noname.108
  1006. incl r8
  1007. noname.108:
  1008. movzwl 6(r6),r2
  1009. bicl3 #-65536,16(r7),r3
  1010. movzwl 18(r7),r0
  1011. bicl2 #-65536,r0
  1012. bicl3 #-65536,4(r6),-268(fp)
  1013. bicl3 #-65536,r2,-272(fp)
  1014. mull3 r0,-268(fp),-260(fp)
  1015. mull2 r3,-268(fp)
  1016. mull3 r3,-272(fp),-264(fp)
  1017. mull2 r0,-272(fp)
  1018. addl3 -260(fp),-264(fp),r0
  1019. bicl3 #0,r0,-260(fp)
  1020. cmpl -260(fp),-264(fp)
  1021. bgequ noname.109
  1022. addl2 #65536,-272(fp)
  1023. noname.109:
  1024. movzwl -258(fp),r0
  1025. bicl2 #-65536,r0
  1026. addl2 r0,-272(fp)
  1027. bicl3 #-65536,-260(fp),r0
  1028. ashl #16,r0,-264(fp)
  1029. addl3 -264(fp),-268(fp),r0
  1030. bicl3 #0,r0,-268(fp)
  1031. cmpl -268(fp),-264(fp)
  1032. bgequ noname.110
  1033. incl -272(fp)
  1034. noname.110:
  1035. movl -268(fp),r1
  1036. movl -272(fp),r2
  1037. addl2 r1,r10
  1038. bicl2 #0,r10
  1039. cmpl r10,r1
  1040. bgequ noname.111
  1041. incl r2
  1042. noname.111:
  1043. addl2 r2,r9
  1044. bicl2 #0,r9
  1045. cmpl r9,r2
  1046. bgequ noname.112
  1047. incl r8
  1048. noname.112:
  1049. movzwl 10(r6),r2
  1050. bicl3 #-65536,12(r7),r3
  1051. movzwl 14(r7),r0
  1052. bicl2 #-65536,r0
  1053. bicl3 #-65536,8(r6),-284(fp)
  1054. bicl3 #-65536,r2,-288(fp)
  1055. mull3 r0,-284(fp),-276(fp)
  1056. mull2 r3,-284(fp)
  1057. mull3 r3,-288(fp),-280(fp)
  1058. mull2 r0,-288(fp)
  1059. addl3 -276(fp),-280(fp),r0
  1060. bicl3 #0,r0,-276(fp)
  1061. cmpl -276(fp),-280(fp)
  1062. bgequ noname.113
  1063. addl2 #65536,-288(fp)
  1064. noname.113:
  1065. movzwl -274(fp),r0
  1066. bicl2 #-65536,r0
  1067. addl2 r0,-288(fp)
  1068. bicl3 #-65536,-276(fp),r0
  1069. ashl #16,r0,-280(fp)
  1070. addl3 -280(fp),-284(fp),r0
  1071. bicl3 #0,r0,-284(fp)
  1072. cmpl -284(fp),-280(fp)
  1073. bgequ noname.114
  1074. incl -288(fp)
  1075. noname.114:
  1076. movl -284(fp),r1
  1077. movl -288(fp),r2
  1078. addl2 r1,r10
  1079. bicl2 #0,r10
  1080. cmpl r10,r1
  1081. bgequ noname.115
  1082. incl r2
  1083. noname.115:
  1084. addl2 r2,r9
  1085. bicl2 #0,r9
  1086. cmpl r9,r2
  1087. bgequ noname.116
  1088. incl r8
  1089. noname.116:
  1090. movzwl 14(r6),r2
  1091. bicl3 #-65536,8(r7),r3
  1092. movzwl 10(r7),r0
  1093. bicl2 #-65536,r0
  1094. bicl3 #-65536,12(r6),-300(fp)
  1095. bicl3 #-65536,r2,-304(fp)
  1096. mull3 r0,-300(fp),-292(fp)
  1097. mull2 r3,-300(fp)
  1098. mull3 r3,-304(fp),-296(fp)
  1099. mull2 r0,-304(fp)
  1100. addl3 -292(fp),-296(fp),r0
  1101. bicl3 #0,r0,-292(fp)
  1102. cmpl -292(fp),-296(fp)
  1103. bgequ noname.117
  1104. addl2 #65536,-304(fp)
  1105. noname.117:
  1106. movzwl -290(fp),r0
  1107. bicl2 #-65536,r0
  1108. addl2 r0,-304(fp)
  1109. bicl3 #-65536,-292(fp),r0
  1110. ashl #16,r0,-296(fp)
  1111. addl3 -296(fp),-300(fp),r0
  1112. bicl3 #0,r0,-300(fp)
  1113. cmpl -300(fp),-296(fp)
  1114. bgequ noname.118
  1115. incl -304(fp)
  1116. noname.118:
  1117. movl -300(fp),r1
  1118. movl -304(fp),r2
  1119. addl2 r1,r10
  1120. bicl2 #0,r10
  1121. cmpl r10,r1
  1122. bgequ noname.119
  1123. incl r2
  1124. noname.119:
  1125. addl2 r2,r9
  1126. bicl2 #0,r9
  1127. cmpl r9,r2
  1128. bgequ noname.120
  1129. incl r8
  1130. noname.120:
  1131. movzwl 18(r6),r2
  1132. bicl3 #-65536,4(r7),r3
  1133. movzwl 6(r7),r0
  1134. bicl2 #-65536,r0
  1135. bicl3 #-65536,16(r6),-316(fp)
  1136. bicl3 #-65536,r2,-320(fp)
  1137. mull3 r0,-316(fp),-308(fp)
  1138. mull2 r3,-316(fp)
  1139. mull3 r3,-320(fp),-312(fp)
  1140. mull2 r0,-320(fp)
  1141. addl3 -308(fp),-312(fp),r0
  1142. bicl3 #0,r0,-308(fp)
  1143. cmpl -308(fp),-312(fp)
  1144. bgequ noname.121
  1145. addl2 #65536,-320(fp)
  1146. noname.121:
  1147. movzwl -306(fp),r0
  1148. bicl2 #-65536,r0
  1149. addl2 r0,-320(fp)
  1150. bicl3 #-65536,-308(fp),r0
  1151. ashl #16,r0,-312(fp)
  1152. addl3 -312(fp),-316(fp),r0
  1153. bicl3 #0,r0,-316(fp)
  1154. cmpl -316(fp),-312(fp)
  1155. bgequ noname.122
  1156. incl -320(fp)
  1157. noname.122:
  1158. movl -316(fp),r1
  1159. movl -320(fp),r2
  1160. addl2 r1,r10
  1161. bicl2 #0,r10
  1162. cmpl r10,r1
  1163. bgequ noname.123
  1164. incl r2
  1165. noname.123:
  1166. addl2 r2,r9
  1167. bicl2 #0,r9
  1168. cmpl r9,r2
  1169. bgequ noname.124
  1170. incl r8
  1171. noname.124:
  1172. movzwl 22(r6),r2
  1173. bicl3 #-65536,(r7),r3
  1174. movzwl 2(r7),r0
  1175. bicl2 #-65536,r0
  1176. bicl3 #-65536,20(r6),-332(fp)
  1177. bicl3 #-65536,r2,-336(fp)
  1178. mull3 r0,-332(fp),-324(fp)
  1179. mull2 r3,-332(fp)
  1180. mull3 r3,-336(fp),-328(fp)
  1181. mull2 r0,-336(fp)
  1182. addl3 -324(fp),-328(fp),r0
  1183. bicl3 #0,r0,-324(fp)
  1184. cmpl -324(fp),-328(fp)
  1185. bgequ noname.125
  1186. addl2 #65536,-336(fp)
  1187. noname.125:
  1188. movzwl -322(fp),r0
  1189. bicl2 #-65536,r0
  1190. addl2 r0,-336(fp)
  1191. bicl3 #-65536,-324(fp),r0
  1192. ashl #16,r0,-328(fp)
  1193. addl3 -328(fp),-332(fp),r0
  1194. bicl3 #0,r0,-332(fp)
  1195. cmpl -332(fp),-328(fp)
  1196. bgequ noname.126
  1197. incl -336(fp)
  1198. noname.126:
  1199. movl -332(fp),r1
  1200. movl -336(fp),r2
  1201. addl2 r1,r10
  1202. bicl2 #0,r10
  1203. cmpl r10,r1
  1204. bgequ noname.127
  1205. incl r2
  1206. noname.127:
  1207. addl2 r2,r9
  1208. bicl2 #0,r9
  1209. cmpl r9,r2
  1210. bgequ noname.128
  1211. incl r8
  1212. noname.128:
  1213. movl r10,20(r11)
  1214. clrl r10
  1215. movzwl 26(r6),r2
  1216. bicl3 #-65536,(r7),r3
  1217. movzwl 2(r7),r0
  1218. bicl2 #-65536,r0
  1219. bicl3 #-65536,24(r6),-348(fp)
  1220. bicl3 #-65536,r2,-352(fp)
  1221. mull3 r0,-348(fp),-340(fp)
  1222. mull2 r3,-348(fp)
  1223. mull3 r3,-352(fp),-344(fp)
  1224. mull2 r0,-352(fp)
  1225. addl3 -340(fp),-344(fp),r0
  1226. bicl3 #0,r0,-340(fp)
  1227. cmpl -340(fp),-344(fp)
  1228. bgequ noname.129
  1229. addl2 #65536,-352(fp)
  1230. noname.129:
  1231. movzwl -338(fp),r0
  1232. bicl2 #-65536,r0
  1233. addl2 r0,-352(fp)
  1234. bicl3 #-65536,-340(fp),r0
  1235. ashl #16,r0,-344(fp)
  1236. addl3 -344(fp),-348(fp),r0
  1237. bicl3 #0,r0,-348(fp)
  1238. cmpl -348(fp),-344(fp)
  1239. bgequ noname.130
  1240. incl -352(fp)
  1241. noname.130:
  1242. movl -348(fp),r1
  1243. movl -352(fp),r2
  1244. addl2 r1,r9
  1245. bicl2 #0,r9
  1246. cmpl r9,r1
  1247. bgequ noname.131
  1248. incl r2
  1249. noname.131:
  1250. addl2 r2,r8
  1251. bicl2 #0,r8
  1252. cmpl r8,r2
  1253. bgequ noname.132
  1254. incl r10
  1255. noname.132:
  1256. movzwl 22(r6),r2
  1257. bicl3 #-65536,4(r7),r3
  1258. movzwl 6(r7),r0
  1259. bicl2 #-65536,r0
  1260. bicl3 #-65536,20(r6),-364(fp)
  1261. bicl3 #-65536,r2,-368(fp)
  1262. mull3 r0,-364(fp),-356(fp)
  1263. mull2 r3,-364(fp)
  1264. mull3 r3,-368(fp),-360(fp)
  1265. mull2 r0,-368(fp)
  1266. addl3 -356(fp),-360(fp),r0
  1267. bicl3 #0,r0,-356(fp)
  1268. cmpl -356(fp),-360(fp)
  1269. bgequ noname.133
  1270. addl2 #65536,-368(fp)
  1271. noname.133:
  1272. movzwl -354(fp),r0
  1273. bicl2 #-65536,r0
  1274. addl2 r0,-368(fp)
  1275. bicl3 #-65536,-356(fp),r0
  1276. ashl #16,r0,-360(fp)
  1277. addl3 -360(fp),-364(fp),r0
  1278. bicl3 #0,r0,-364(fp)
  1279. cmpl -364(fp),-360(fp)
  1280. bgequ noname.134
  1281. incl -368(fp)
  1282. noname.134:
  1283. movl -364(fp),r1
  1284. movl -368(fp),r2
  1285. addl2 r1,r9
  1286. bicl2 #0,r9
  1287. cmpl r9,r1
  1288. bgequ noname.135
  1289. incl r2
  1290. noname.135:
  1291. addl2 r2,r8
  1292. bicl2 #0,r8
  1293. cmpl r8,r2
  1294. bgequ noname.136
  1295. incl r10
  1296. noname.136:
  1297. movzwl 18(r6),r2
  1298. bicl3 #-65536,8(r7),r3
  1299. movzwl 10(r7),r0
  1300. bicl2 #-65536,r0
  1301. bicl3 #-65536,16(r6),-380(fp)
  1302. bicl3 #-65536,r2,-384(fp)
  1303. mull3 r0,-380(fp),-372(fp)
  1304. mull2 r3,-380(fp)
  1305. mull3 r3,-384(fp),-376(fp)
  1306. mull2 r0,-384(fp)
  1307. addl3 -372(fp),-376(fp),r0
  1308. bicl3 #0,r0,-372(fp)
  1309. cmpl -372(fp),-376(fp)
  1310. bgequ noname.137
  1311. addl2 #65536,-384(fp)
  1312. noname.137:
  1313. movzwl -370(fp),r0
  1314. bicl2 #-65536,r0
  1315. addl2 r0,-384(fp)
  1316. bicl3 #-65536,-372(fp),r0
  1317. ashl #16,r0,-376(fp)
  1318. addl3 -376(fp),-380(fp),r0
  1319. bicl3 #0,r0,-380(fp)
  1320. cmpl -380(fp),-376(fp)
  1321. bgequ noname.138
  1322. incl -384(fp)
  1323. noname.138:
  1324. movl -380(fp),r1
  1325. movl -384(fp),r2
  1326. addl2 r1,r9
  1327. bicl2 #0,r9
  1328. cmpl r9,r1
  1329. bgequ noname.139
  1330. incl r2
  1331. noname.139:
  1332. addl2 r2,r8
  1333. bicl2 #0,r8
  1334. cmpl r8,r2
  1335. bgequ noname.140
  1336. incl r10
  1337. noname.140:
  1338. movzwl 14(r6),r2
  1339. bicl3 #-65536,12(r7),r3
  1340. movzwl 14(r7),r0
  1341. bicl2 #-65536,r0
  1342. bicl3 #-65536,12(r6),-396(fp)
  1343. bicl3 #-65536,r2,-400(fp)
  1344. mull3 r0,-396(fp),-388(fp)
  1345. mull2 r3,-396(fp)
  1346. mull3 r3,-400(fp),-392(fp)
  1347. mull2 r0,-400(fp)
  1348. addl3 -388(fp),-392(fp),r0
  1349. bicl3 #0,r0,-388(fp)
  1350. cmpl -388(fp),-392(fp)
  1351. bgequ noname.141
  1352. addl2 #65536,-400(fp)
  1353. noname.141:
  1354. movzwl -386(fp),r0
  1355. bicl2 #-65536,r0
  1356. addl2 r0,-400(fp)
  1357. bicl3 #-65536,-388(fp),r0
  1358. ashl #16,r0,-392(fp)
  1359. addl3 -392(fp),-396(fp),r0
  1360. bicl3 #0,r0,-396(fp)
  1361. cmpl -396(fp),-392(fp)
  1362. bgequ noname.142
  1363. incl -400(fp)
  1364. noname.142:
  1365. movl -396(fp),r1
  1366. movl -400(fp),r2
  1367. addl2 r1,r9
  1368. bicl2 #0,r9
  1369. cmpl r9,r1
  1370. bgequ noname.143
  1371. incl r2
  1372. noname.143:
  1373. addl2 r2,r8
  1374. bicl2 #0,r8
  1375. cmpl r8,r2
  1376. bgequ noname.144
  1377. incl r10
  1378. noname.144:
  1379. movzwl 10(r6),r2
  1380. bicl3 #-65536,16(r7),r3
  1381. movzwl 18(r7),r0
  1382. bicl2 #-65536,r0
  1383. bicl3 #-65536,8(r6),-412(fp)
  1384. bicl3 #-65536,r2,-416(fp)
  1385. mull3 r0,-412(fp),-404(fp)
  1386. mull2 r3,-412(fp)
  1387. mull3 r3,-416(fp),-408(fp)
  1388. mull2 r0,-416(fp)
  1389. addl3 -404(fp),-408(fp),r0
  1390. bicl3 #0,r0,-404(fp)
  1391. cmpl -404(fp),-408(fp)
  1392. bgequ noname.145
  1393. addl2 #65536,-416(fp)
  1394. noname.145:
  1395. movzwl -402(fp),r0
  1396. bicl2 #-65536,r0
  1397. addl2 r0,-416(fp)
  1398. bicl3 #-65536,-404(fp),r0
  1399. ashl #16,r0,-408(fp)
  1400. addl3 -408(fp),-412(fp),r0
  1401. bicl3 #0,r0,-412(fp)
  1402. cmpl -412(fp),-408(fp)
  1403. bgequ noname.146
  1404. incl -416(fp)
  1405. noname.146:
  1406. movl -412(fp),r1
  1407. movl -416(fp),r2
  1408. addl2 r1,r9
  1409. bicl2 #0,r9
  1410. cmpl r9,r1
  1411. bgequ noname.147
  1412. incl r2
  1413. noname.147:
  1414. addl2 r2,r8
  1415. bicl2 #0,r8
  1416. cmpl r8,r2
  1417. bgequ noname.148
  1418. incl r10
  1419. noname.148:
  1420. movzwl 6(r6),r2
  1421. bicl3 #-65536,20(r7),r3
  1422. movzwl 22(r7),r0
  1423. bicl2 #-65536,r0
  1424. bicl3 #-65536,4(r6),-428(fp)
  1425. bicl3 #-65536,r2,-432(fp)
  1426. mull3 r0,-428(fp),-420(fp)
  1427. mull2 r3,-428(fp)
  1428. mull3 r3,-432(fp),-424(fp)
  1429. mull2 r0,-432(fp)
  1430. addl3 -420(fp),-424(fp),r0
  1431. bicl3 #0,r0,-420(fp)
  1432. cmpl -420(fp),-424(fp)
  1433. bgequ noname.149
  1434. addl2 #65536,-432(fp)
  1435. noname.149:
  1436. movzwl -418(fp),r0
  1437. bicl2 #-65536,r0
  1438. addl2 r0,-432(fp)
  1439. bicl3 #-65536,-420(fp),r0
  1440. ashl #16,r0,-424(fp)
  1441. addl3 -424(fp),-428(fp),r0
  1442. bicl3 #0,r0,-428(fp)
  1443. cmpl -428(fp),-424(fp)
  1444. bgequ noname.150
  1445. incl -432(fp)
  1446. noname.150:
  1447. movl -428(fp),r1
  1448. movl -432(fp),r2
  1449. addl2 r1,r9
  1450. bicl2 #0,r9
  1451. cmpl r9,r1
  1452. bgequ noname.151
  1453. incl r2
  1454. noname.151:
  1455. addl2 r2,r8
  1456. bicl2 #0,r8
  1457. cmpl r8,r2
  1458. bgequ noname.152
  1459. incl r10
  1460. noname.152:
  1461. movzwl 2(r6),r2
  1462. bicl3 #-65536,24(r7),r3
  1463. movzwl 26(r7),r0
  1464. bicl2 #-65536,r0
  1465. bicl3 #-65536,(r6),-444(fp)
  1466. bicl3 #-65536,r2,-448(fp)
  1467. mull3 r0,-444(fp),-436(fp)
  1468. mull2 r3,-444(fp)
  1469. mull3 r3,-448(fp),-440(fp)
  1470. mull2 r0,-448(fp)
  1471. addl3 -436(fp),-440(fp),r0
  1472. bicl3 #0,r0,-436(fp)
  1473. cmpl -436(fp),-440(fp)
  1474. bgequ noname.153
  1475. addl2 #65536,-448(fp)
  1476. noname.153:
  1477. movzwl -434(fp),r0
  1478. bicl2 #-65536,r0
  1479. addl2 r0,-448(fp)
  1480. bicl3 #-65536,-436(fp),r0
  1481. ashl #16,r0,-440(fp)
  1482. addl3 -440(fp),-444(fp),r0
  1483. bicl3 #0,r0,-444(fp)
  1484. cmpl -444(fp),-440(fp)
  1485. bgequ noname.154
  1486. incl -448(fp)
  1487. noname.154:
  1488. movl -444(fp),r1
  1489. movl -448(fp),r2
  1490. addl2 r1,r9
  1491. bicl2 #0,r9
  1492. cmpl r9,r1
  1493. bgequ noname.155
  1494. incl r2
  1495. noname.155:
  1496. addl2 r2,r8
  1497. bicl2 #0,r8
  1498. cmpl r8,r2
  1499. bgequ noname.156
  1500. incl r10
  1501. noname.156:
  1502. movl r9,24(r11)
  1503. clrl r9
  1504. movzwl 2(r6),r2
  1505. bicl3 #-65536,28(r7),r3
  1506. movzwl 30(r7),r0
  1507. bicl2 #-65536,r0
  1508. bicl3 #-65536,(r6),-460(fp)
  1509. bicl3 #-65536,r2,-464(fp)
  1510. mull3 r0,-460(fp),-452(fp)
  1511. mull2 r3,-460(fp)
  1512. mull3 r3,-464(fp),-456(fp)
  1513. mull2 r0,-464(fp)
  1514. addl3 -452(fp),-456(fp),r0
  1515. bicl3 #0,r0,-452(fp)
  1516. cmpl -452(fp),-456(fp)
  1517. bgequ noname.157
  1518. addl2 #65536,-464(fp)
  1519. noname.157:
  1520. movzwl -450(fp),r0
  1521. bicl2 #-65536,r0
  1522. addl2 r0,-464(fp)
  1523. bicl3 #-65536,-452(fp),r0
  1524. ashl #16,r0,-456(fp)
  1525. addl3 -456(fp),-460(fp),r0
  1526. bicl3 #0,r0,-460(fp)
  1527. cmpl -460(fp),-456(fp)
  1528. bgequ noname.158
  1529. incl -464(fp)
  1530. noname.158:
  1531. movl -460(fp),r1
  1532. movl -464(fp),r2
  1533. addl2 r1,r8
  1534. bicl2 #0,r8
  1535. cmpl r8,r1
  1536. bgequ noname.159
  1537. incl r2
  1538. noname.159:
  1539. addl2 r2,r10
  1540. bicl2 #0,r10
  1541. cmpl r10,r2
  1542. bgequ noname.160
  1543. incl r9
  1544. noname.160:
  1545. movzwl 6(r6),r2
  1546. bicl3 #-65536,24(r7),r3
  1547. movzwl 26(r7),r0
  1548. bicl2 #-65536,r0
  1549. bicl3 #-65536,4(r6),-476(fp)
  1550. bicl3 #-65536,r2,-480(fp)
  1551. mull3 r0,-476(fp),-468(fp)
  1552. mull2 r3,-476(fp)
  1553. mull3 r3,-480(fp),-472(fp)
  1554. mull2 r0,-480(fp)
  1555. addl3 -468(fp),-472(fp),r0
  1556. bicl3 #0,r0,-468(fp)
  1557. cmpl -468(fp),-472(fp)
  1558. bgequ noname.161
  1559. addl2 #65536,-480(fp)
  1560. noname.161:
  1561. movzwl -466(fp),r0
  1562. bicl2 #-65536,r0
  1563. addl2 r0,-480(fp)
  1564. bicl3 #-65536,-468(fp),r0
  1565. ashl #16,r0,-472(fp)
  1566. addl3 -472(fp),-476(fp),r0
  1567. bicl3 #0,r0,-476(fp)
  1568. cmpl -476(fp),-472(fp)
  1569. bgequ noname.162
  1570. incl -480(fp)
  1571. noname.162:
  1572. movl -476(fp),r1
  1573. movl -480(fp),r2
  1574. addl2 r1,r8
  1575. bicl2 #0,r8
  1576. cmpl r8,r1
  1577. bgequ noname.163
  1578. incl r2
  1579. noname.163:
  1580. addl2 r2,r10
  1581. bicl2 #0,r10
  1582. cmpl r10,r2
  1583. bgequ noname.164
  1584. incl r9
  1585. noname.164:
  1586. movzwl 10(r6),r2
  1587. bicl3 #-65536,20(r7),r3
  1588. movzwl 22(r7),r0
  1589. bicl2 #-65536,r0
  1590. bicl3 #-65536,8(r6),-492(fp)
  1591. bicl3 #-65536,r2,-496(fp)
  1592. mull3 r0,-492(fp),-484(fp)
  1593. mull2 r3,-492(fp)
  1594. mull3 r3,-496(fp),-488(fp)
  1595. mull2 r0,-496(fp)
  1596. addl3 -484(fp),-488(fp),r0
  1597. bicl3 #0,r0,-484(fp)
  1598. cmpl -484(fp),-488(fp)
  1599. bgequ noname.165
  1600. addl2 #65536,-496(fp)
  1601. noname.165:
  1602. movzwl -482(fp),r0
  1603. bicl2 #-65536,r0
  1604. addl2 r0,-496(fp)
  1605. bicl3 #-65536,-484(fp),r0
  1606. ashl #16,r0,-488(fp)
  1607. addl3 -488(fp),-492(fp),r0
  1608. bicl3 #0,r0,-492(fp)
  1609. cmpl -492(fp),-488(fp)
  1610. bgequ noname.166
  1611. incl -496(fp)
  1612. noname.166:
  1613. movl -492(fp),r1
  1614. movl -496(fp),r2
  1615. addl2 r1,r8
  1616. bicl2 #0,r8
  1617. cmpl r8,r1
  1618. bgequ noname.167
  1619. incl r2
  1620. noname.167:
  1621. addl2 r2,r10
  1622. bicl2 #0,r10
  1623. cmpl r10,r2
  1624. bgequ noname.168
  1625. incl r9
  1626. noname.168:
  1627. movzwl 14(r6),r2
  1628. bicl3 #-65536,16(r7),r3
  1629. movzwl 18(r7),r0
  1630. bicl2 #-65536,r0
  1631. bicl3 #-65536,12(r6),-508(fp)
  1632. bicl3 #-65536,r2,-512(fp)
  1633. mull3 r0,-508(fp),-500(fp)
  1634. mull2 r3,-508(fp)
  1635. mull3 r3,-512(fp),-504(fp)
  1636. mull2 r0,-512(fp)
  1637. addl3 -500(fp),-504(fp),r0
  1638. bicl3 #0,r0,-500(fp)
  1639. cmpl -500(fp),-504(fp)
  1640. bgequ noname.169
  1641. addl2 #65536,-512(fp)
  1642. noname.169:
  1643. movzwl -498(fp),r0
  1644. bicl2 #-65536,r0
  1645. addl2 r0,-512(fp)
  1646. bicl3 #-65536,-500(fp),r0
  1647. ashl #16,r0,-504(fp)
  1648. addl3 -504(fp),-508(fp),r0
  1649. bicl3 #0,r0,-508(fp)
  1650. cmpl -508(fp),-504(fp)
  1651. bgequ noname.170
  1652. incl -512(fp)
  1653. noname.170:
  1654. movl -508(fp),r1
  1655. movl -512(fp),r2
  1656. addl2 r1,r8
  1657. bicl2 #0,r8
  1658. cmpl r8,r1
  1659. bgequ noname.171
  1660. incl r2
  1661. noname.171:
  1662. addl2 r2,r10
  1663. bicl2 #0,r10
  1664. cmpl r10,r2
  1665. bgequ noname.172
  1666. incl r9
  1667. noname.172:
  1668. movzwl 18(r6),r2
  1669. bicl3 #-65536,12(r7),r3
  1670. movzwl 14(r7),r0
  1671. bicl2 #-65536,r0
  1672. bicl3 #-65536,16(r6),-524(fp)
  1673. bicl3 #-65536,r2,-528(fp)
  1674. mull3 r0,-524(fp),-516(fp)
  1675. mull2 r3,-524(fp)
  1676. mull3 r3,-528(fp),-520(fp)
  1677. mull2 r0,-528(fp)
  1678. addl3 -516(fp),-520(fp),r0
  1679. bicl3 #0,r0,-516(fp)
  1680. cmpl -516(fp),-520(fp)
  1681. bgequ noname.173
  1682. addl2 #65536,-528(fp)
  1683. noname.173:
  1684. movzwl -514(fp),r0
  1685. bicl2 #-65536,r0
  1686. addl2 r0,-528(fp)
  1687. bicl3 #-65536,-516(fp),r0
  1688. ashl #16,r0,-520(fp)
  1689. addl3 -520(fp),-524(fp),r0
  1690. bicl3 #0,r0,-524(fp)
  1691. cmpl -524(fp),-520(fp)
  1692. bgequ noname.174
  1693. incl -528(fp)
  1694. noname.174:
  1695. movl -524(fp),r1
  1696. movl -528(fp),r2
  1697. addl2 r1,r8
  1698. bicl2 #0,r8
  1699. cmpl r8,r1
  1700. bgequ noname.175
  1701. incl r2
  1702. noname.175:
  1703. addl2 r2,r10
  1704. bicl2 #0,r10
  1705. cmpl r10,r2
  1706. bgequ noname.176
  1707. incl r9
  1708. noname.176:
  1709. movzwl 22(r6),r2
  1710. bicl3 #-65536,8(r7),r3
  1711. movzwl 10(r7),r0
  1712. bicl2 #-65536,r0
  1713. bicl3 #-65536,20(r6),-540(fp)
  1714. bicl3 #-65536,r2,-544(fp)
  1715. mull3 r0,-540(fp),-532(fp)
  1716. mull2 r3,-540(fp)
  1717. mull3 r3,-544(fp),-536(fp)
  1718. mull2 r0,-544(fp)
  1719. addl3 -532(fp),-536(fp),r0
  1720. bicl3 #0,r0,-532(fp)
  1721. cmpl -532(fp),-536(fp)
  1722. bgequ noname.177
  1723. addl2 #65536,-544(fp)
  1724. noname.177:
  1725. movzwl -530(fp),r0
  1726. bicl2 #-65536,r0
  1727. addl2 r0,-544(fp)
  1728. bicl3 #-65536,-532(fp),r0
  1729. ashl #16,r0,-536(fp)
  1730. addl3 -536(fp),-540(fp),r0
  1731. bicl3 #0,r0,-540(fp)
  1732. cmpl -540(fp),-536(fp)
  1733. bgequ noname.178
  1734. incl -544(fp)
  1735. noname.178:
  1736. movl -540(fp),r1
  1737. movl -544(fp),r2
  1738. addl2 r1,r8
  1739. bicl2 #0,r8
  1740. cmpl r8,r1
  1741. bgequ noname.179
  1742. incl r2
  1743. noname.179:
  1744. addl2 r2,r10
  1745. bicl2 #0,r10
  1746. cmpl r10,r2
  1747. bgequ noname.180
  1748. incl r9
  1749. noname.180:
  1750. movzwl 26(r6),r2
  1751. bicl3 #-65536,4(r7),r3
  1752. movzwl 6(r7),r0
  1753. bicl2 #-65536,r0
  1754. bicl3 #-65536,24(r6),-556(fp)
  1755. bicl3 #-65536,r2,-560(fp)
  1756. mull3 r0,-556(fp),-548(fp)
  1757. mull2 r3,-556(fp)
  1758. mull3 r3,-560(fp),-552(fp)
  1759. mull2 r0,-560(fp)
  1760. addl3 -548(fp),-552(fp),r0
  1761. bicl3 #0,r0,-548(fp)
  1762. cmpl -548(fp),-552(fp)
  1763. bgequ noname.181
  1764. addl2 #65536,-560(fp)
  1765. noname.181:
  1766. movzwl -546(fp),r0
  1767. bicl2 #-65536,r0
  1768. addl2 r0,-560(fp)
  1769. bicl3 #-65536,-548(fp),r0
  1770. ashl #16,r0,-552(fp)
  1771. addl3 -552(fp),-556(fp),r0
  1772. bicl3 #0,r0,-556(fp)
  1773. cmpl -556(fp),-552(fp)
  1774. bgequ noname.182
  1775. incl -560(fp)
  1776. noname.182:
  1777. movl -556(fp),r1
  1778. movl -560(fp),r2
  1779. addl2 r1,r8
  1780. bicl2 #0,r8
  1781. cmpl r8,r1
  1782. bgequ noname.183
  1783. incl r2
  1784. noname.183:
  1785. addl2 r2,r10
  1786. bicl2 #0,r10
  1787. cmpl r10,r2
  1788. bgequ noname.184
  1789. incl r9
  1790. noname.184:
  1791. movzwl 30(r6),r2
  1792. bicl3 #-65536,(r7),r3
  1793. movzwl 2(r7),r0
  1794. bicl2 #-65536,r0
  1795. bicl3 #-65536,28(r6),-572(fp)
  1796. bicl3 #-65536,r2,-576(fp)
  1797. mull3 r0,-572(fp),-564(fp)
  1798. mull2 r3,-572(fp)
  1799. mull3 r3,-576(fp),-568(fp)
  1800. mull2 r0,-576(fp)
  1801. addl3 -564(fp),-568(fp),r0
  1802. bicl3 #0,r0,-564(fp)
  1803. cmpl -564(fp),-568(fp)
  1804. bgequ noname.185
  1805. addl2 #65536,-576(fp)
  1806. noname.185:
  1807. movzwl -562(fp),r0
  1808. bicl2 #-65536,r0
  1809. addl2 r0,-576(fp)
  1810. bicl3 #-65536,-564(fp),r0
  1811. ashl #16,r0,-568(fp)
  1812. addl3 -568(fp),-572(fp),r0
  1813. bicl3 #0,r0,-572(fp)
  1814. cmpl -572(fp),-568(fp)
  1815. bgequ noname.186
  1816. incl -576(fp)
  1817. noname.186:
  1818. movl -572(fp),r1
  1819. movl -576(fp),r2
  1820. addl2 r1,r8
  1821. bicl2 #0,r8
  1822. cmpl r8,r1
  1823. bgequ noname.187
  1824. incl r2
  1825. noname.187:
  1826. addl2 r2,r10
  1827. bicl2 #0,r10
  1828. cmpl r10,r2
  1829. bgequ noname.188
  1830. incl r9
  1831. noname.188:
  1832. movl r8,28(r11)
  1833. clrl r8
  1834. movzwl 30(r6),r2
  1835. bicl3 #-65536,4(r7),r3
  1836. movzwl 6(r7),r0
  1837. bicl2 #-65536,r0
  1838. bicl3 #-65536,28(r6),-588(fp)
  1839. bicl3 #-65536,r2,-592(fp)
  1840. mull3 r0,-588(fp),-580(fp)
  1841. mull2 r3,-588(fp)
  1842. mull3 r3,-592(fp),-584(fp)
  1843. mull2 r0,-592(fp)
  1844. addl3 -580(fp),-584(fp),r0
  1845. bicl3 #0,r0,-580(fp)
  1846. cmpl -580(fp),-584(fp)
  1847. bgequ noname.189
  1848. addl2 #65536,-592(fp)
  1849. noname.189:
  1850. movzwl -578(fp),r0
  1851. bicl2 #-65536,r0
  1852. addl2 r0,-592(fp)
  1853. bicl3 #-65536,-580(fp),r0
  1854. ashl #16,r0,-584(fp)
  1855. addl3 -584(fp),-588(fp),r0
  1856. bicl3 #0,r0,-588(fp)
  1857. cmpl -588(fp),-584(fp)
  1858. bgequ noname.190
  1859. incl -592(fp)
  1860. noname.190:
  1861. movl -588(fp),r1
  1862. movl -592(fp),r2
  1863. addl2 r1,r10
  1864. bicl2 #0,r10
  1865. cmpl r10,r1
  1866. bgequ noname.191
  1867. incl r2
  1868. noname.191:
  1869. addl2 r2,r9
  1870. bicl2 #0,r9
  1871. cmpl r9,r2
  1872. bgequ noname.192
  1873. incl r8
  1874. noname.192:
  1875. movzwl 26(r6),r2
  1876. bicl3 #-65536,8(r7),r3
  1877. movzwl 10(r7),r0
  1878. bicl2 #-65536,r0
  1879. bicl3 #-65536,24(r6),-604(fp)
  1880. bicl3 #-65536,r2,-608(fp)
  1881. mull3 r0,-604(fp),-596(fp)
  1882. mull2 r3,-604(fp)
  1883. mull3 r3,-608(fp),-600(fp)
  1884. mull2 r0,-608(fp)
  1885. addl3 -596(fp),-600(fp),r0
  1886. bicl3 #0,r0,-596(fp)
  1887. cmpl -596(fp),-600(fp)
  1888. bgequ noname.193
  1889. addl2 #65536,-608(fp)
  1890. noname.193:
  1891. movzwl -594(fp),r0
  1892. bicl2 #-65536,r0
  1893. addl2 r0,-608(fp)
  1894. bicl3 #-65536,-596(fp),r0
  1895. ashl #16,r0,-600(fp)
  1896. addl3 -600(fp),-604(fp),r0
  1897. bicl3 #0,r0,-604(fp)
  1898. cmpl -604(fp),-600(fp)
  1899. bgequ noname.194
  1900. incl -608(fp)
  1901. noname.194:
  1902. movl -604(fp),r1
  1903. movl -608(fp),r2
  1904. addl2 r1,r10
  1905. bicl2 #0,r10
  1906. cmpl r10,r1
  1907. bgequ noname.195
  1908. incl r2
  1909. noname.195:
  1910. addl2 r2,r9
  1911. bicl2 #0,r9
  1912. cmpl r9,r2
  1913. bgequ noname.196
  1914. incl r8
  1915. noname.196:
  1916. movzwl 22(r6),r2
  1917. bicl3 #-65536,12(r7),r3
  1918. movzwl 14(r7),r0
  1919. bicl2 #-65536,r0
  1920. bicl3 #-65536,20(r6),-620(fp)
  1921. bicl3 #-65536,r2,-624(fp)
  1922. mull3 r0,-620(fp),-612(fp)
  1923. mull2 r3,-620(fp)
  1924. mull3 r3,-624(fp),-616(fp)
  1925. mull2 r0,-624(fp)
  1926. addl3 -612(fp),-616(fp),r0
  1927. bicl3 #0,r0,-612(fp)
  1928. cmpl -612(fp),-616(fp)
  1929. bgequ noname.197
  1930. addl2 #65536,-624(fp)
  1931. noname.197:
  1932. movzwl -610(fp),r0
  1933. bicl2 #-65536,r0
  1934. addl2 r0,-624(fp)
  1935. bicl3 #-65536,-612(fp),r0
  1936. ashl #16,r0,-616(fp)
  1937. addl3 -616(fp),-620(fp),r0
  1938. bicl3 #0,r0,-620(fp)
  1939. cmpl -620(fp),-616(fp)
  1940. bgequ noname.198
  1941. incl -624(fp)
  1942. noname.198:
  1943. movl -620(fp),r1
  1944. movl -624(fp),r2
  1945. addl2 r1,r10
  1946. bicl2 #0,r10
  1947. cmpl r10,r1
  1948. bgequ noname.199
  1949. incl r2
  1950. noname.199:
  1951. addl2 r2,r9
  1952. bicl2 #0,r9
  1953. cmpl r9,r2
  1954. bgequ noname.200
  1955. incl r8
  1956. noname.200:
  1957. movzwl 18(r6),r2
  1958. bicl3 #-65536,16(r7),r3
  1959. movzwl 18(r7),r0
  1960. bicl2 #-65536,r0
  1961. bicl3 #-65536,16(r6),-636(fp)
  1962. bicl3 #-65536,r2,-640(fp)
  1963. mull3 r0,-636(fp),-628(fp)
  1964. mull2 r3,-636(fp)
  1965. mull3 r3,-640(fp),-632(fp)
  1966. mull2 r0,-640(fp)
  1967. addl3 -628(fp),-632(fp),r0
  1968. bicl3 #0,r0,-628(fp)
  1969. cmpl -628(fp),-632(fp)
  1970. bgequ noname.201
  1971. addl2 #65536,-640(fp)
  1972. noname.201:
  1973. movzwl -626(fp),r0
  1974. bicl2 #-65536,r0
  1975. addl2 r0,-640(fp)
  1976. bicl3 #-65536,-628(fp),r0
  1977. ashl #16,r0,-632(fp)
  1978. addl3 -632(fp),-636(fp),r0
  1979. bicl3 #0,r0,-636(fp)
  1980. cmpl -636(fp),-632(fp)
  1981. bgequ noname.202
  1982. incl -640(fp)
  1983. noname.202:
  1984. movl -636(fp),r1
  1985. movl -640(fp),r2
  1986. addl2 r1,r10
  1987. bicl2 #0,r10
  1988. cmpl r10,r1
  1989. bgequ noname.203
  1990. incl r2
  1991. noname.203:
  1992. addl2 r2,r9
  1993. bicl2 #0,r9
  1994. cmpl r9,r2
  1995. bgequ noname.204
  1996. incl r8
  1997. noname.204:
  1998. movzwl 14(r6),r2
  1999. bicl3 #-65536,20(r7),r3
  2000. movzwl 22(r7),r0
  2001. bicl2 #-65536,r0
  2002. bicl3 #-65536,12(r6),-652(fp)
  2003. bicl3 #-65536,r2,-656(fp)
  2004. mull3 r0,-652(fp),-644(fp)
  2005. mull2 r3,-652(fp)
  2006. mull3 r3,-656(fp),-648(fp)
  2007. mull2 r0,-656(fp)
  2008. addl3 -644(fp),-648(fp),r0
  2009. bicl3 #0,r0,-644(fp)
  2010. cmpl -644(fp),-648(fp)
  2011. bgequ noname.205
  2012. addl2 #65536,-656(fp)
  2013. noname.205:
  2014. movzwl -642(fp),r0
  2015. bicl2 #-65536,r0
  2016. addl2 r0,-656(fp)
  2017. bicl3 #-65536,-644(fp),r0
  2018. ashl #16,r0,-648(fp)
  2019. addl3 -648(fp),-652(fp),r0
  2020. bicl3 #0,r0,-652(fp)
  2021. cmpl -652(fp),-648(fp)
  2022. bgequ noname.206
  2023. incl -656(fp)
  2024. noname.206:
  2025. movl -652(fp),r1
  2026. movl -656(fp),r2
  2027. addl2 r1,r10
  2028. bicl2 #0,r10
  2029. cmpl r10,r1
  2030. bgequ noname.207
  2031. incl r2
  2032. noname.207:
  2033. addl2 r2,r9
  2034. bicl2 #0,r9
  2035. cmpl r9,r2
  2036. bgequ noname.208
  2037. incl r8
  2038. noname.208:
  2039. movzwl 10(r6),r2
  2040. bicl3 #-65536,24(r7),r3
  2041. movzwl 26(r7),r0
  2042. bicl2 #-65536,r0
  2043. bicl3 #-65536,8(r6),-668(fp)
  2044. bicl3 #-65536,r2,-672(fp)
  2045. mull3 r0,-668(fp),-660(fp)
  2046. mull2 r3,-668(fp)
  2047. mull3 r3,-672(fp),-664(fp)
  2048. mull2 r0,-672(fp)
  2049. addl3 -660(fp),-664(fp),r0
  2050. bicl3 #0,r0,-660(fp)
  2051. cmpl -660(fp),-664(fp)
  2052. bgequ noname.209
  2053. addl2 #65536,-672(fp)
  2054. noname.209:
  2055. movzwl -658(fp),r0
  2056. bicl2 #-65536,r0
  2057. addl2 r0,-672(fp)
  2058. bicl3 #-65536,-660(fp),r0
  2059. ashl #16,r0,-664(fp)
  2060. addl3 -664(fp),-668(fp),r0
  2061. bicl3 #0,r0,-668(fp)
  2062. cmpl -668(fp),-664(fp)
  2063. bgequ noname.210
  2064. incl -672(fp)
  2065. noname.210:
  2066. movl -668(fp),r1
  2067. movl -672(fp),r2
  2068. addl2 r1,r10
  2069. bicl2 #0,r10
  2070. cmpl r10,r1
  2071. bgequ noname.211
  2072. incl r2
  2073. noname.211:
  2074. addl2 r2,r9
  2075. bicl2 #0,r9
  2076. cmpl r9,r2
  2077. bgequ noname.212
  2078. incl r8
  2079. noname.212:
  2080. movzwl 6(r6),r2
  2081. bicl3 #-65536,28(r7),r3
  2082. movzwl 30(r7),r0
  2083. bicl2 #-65536,r0
  2084. bicl3 #-65536,4(r6),-684(fp)
  2085. bicl3 #-65536,r2,-688(fp)
  2086. mull3 r0,-684(fp),-676(fp)
  2087. mull2 r3,-684(fp)
  2088. mull3 r3,-688(fp),-680(fp)
  2089. mull2 r0,-688(fp)
  2090. addl3 -676(fp),-680(fp),r0
  2091. bicl3 #0,r0,-676(fp)
  2092. cmpl -676(fp),-680(fp)
  2093. bgequ noname.213
  2094. addl2 #65536,-688(fp)
  2095. noname.213:
  2096. movzwl -674(fp),r0
  2097. bicl2 #-65536,r0
  2098. addl2 r0,-688(fp)
  2099. bicl3 #-65536,-676(fp),r0
  2100. ashl #16,r0,-680(fp)
  2101. addl3 -680(fp),-684(fp),r0
  2102. bicl3 #0,r0,-684(fp)
  2103. cmpl -684(fp),-680(fp)
  2104. bgequ noname.214
  2105. incl -688(fp)
  2106. noname.214:
  2107. movl -684(fp),r1
  2108. movl -688(fp),r2
  2109. addl2 r1,r10
  2110. bicl2 #0,r10
  2111. cmpl r10,r1
  2112. bgequ noname.215
  2113. incl r2
  2114. noname.215:
  2115. addl2 r2,r9
  2116. bicl2 #0,r9
  2117. cmpl r9,r2
  2118. bgequ noname.216
  2119. incl r8
  2120. noname.216:
  2121. movl r10,32(r11)
  2122. clrl r10
  2123. movzwl 10(r6),r2
  2124. bicl3 #-65536,28(r7),r3
  2125. movzwl 30(r7),r0
  2126. bicl2 #-65536,r0
  2127. bicl3 #-65536,8(r6),-700(fp)
  2128. bicl3 #-65536,r2,-704(fp)
  2129. mull3 r0,-700(fp),-692(fp)
  2130. mull2 r3,-700(fp)
  2131. mull3 r3,-704(fp),-696(fp)
  2132. mull2 r0,-704(fp)
  2133. addl3 -692(fp),-696(fp),r0
  2134. bicl3 #0,r0,-692(fp)
  2135. cmpl -692(fp),-696(fp)
  2136. bgequ noname.217
  2137. addl2 #65536,-704(fp)
  2138. noname.217:
  2139. movzwl -690(fp),r0
  2140. bicl2 #-65536,r0
  2141. addl2 r0,-704(fp)
  2142. bicl3 #-65536,-692(fp),r0
  2143. ashl #16,r0,-696(fp)
  2144. addl3 -696(fp),-700(fp),r0
  2145. bicl3 #0,r0,-700(fp)
  2146. cmpl -700(fp),-696(fp)
  2147. bgequ noname.218
  2148. incl -704(fp)
  2149. noname.218:
  2150. movl -700(fp),r1
  2151. movl -704(fp),r2
  2152. addl2 r1,r9
  2153. bicl2 #0,r9
  2154. cmpl r9,r1
  2155. bgequ noname.219
  2156. incl r2
  2157. noname.219:
  2158. addl2 r2,r8
  2159. bicl2 #0,r8
  2160. cmpl r8,r2
  2161. bgequ noname.220
  2162. incl r10
  2163. noname.220:
  2164. movzwl 14(r6),r2
  2165. bicl3 #-65536,24(r7),r3
  2166. movzwl 26(r7),r0
  2167. bicl2 #-65536,r0
  2168. bicl3 #-65536,12(r6),-716(fp)
  2169. bicl3 #-65536,r2,-720(fp)
  2170. mull3 r0,-716(fp),-708(fp)
  2171. mull2 r3,-716(fp)
  2172. mull3 r3,-720(fp),-712(fp)
  2173. mull2 r0,-720(fp)
  2174. addl3 -708(fp),-712(fp),r0
  2175. bicl3 #0,r0,-708(fp)
  2176. cmpl -708(fp),-712(fp)
  2177. bgequ noname.221
  2178. addl2 #65536,-720(fp)
  2179. noname.221:
  2180. movzwl -706(fp),r0
  2181. bicl2 #-65536,r0
  2182. addl2 r0,-720(fp)
  2183. bicl3 #-65536,-708(fp),r0
  2184. ashl #16,r0,-712(fp)
  2185. addl3 -712(fp),-716(fp),r0
  2186. bicl3 #0,r0,-716(fp)
  2187. cmpl -716(fp),-712(fp)
  2188. bgequ noname.222
  2189. incl -720(fp)
  2190. noname.222:
  2191. movl -716(fp),r1
  2192. movl -720(fp),r2
  2193. addl2 r1,r9
  2194. bicl2 #0,r9
  2195. cmpl r9,r1
  2196. bgequ noname.223
  2197. incl r2
  2198. noname.223:
  2199. addl2 r2,r8
  2200. bicl2 #0,r8
  2201. cmpl r8,r2
  2202. bgequ noname.224
  2203. incl r10
  2204. noname.224:
  2205. movzwl 18(r6),r2
  2206. bicl3 #-65536,20(r7),r3
  2207. movzwl 22(r7),r0
  2208. bicl2 #-65536,r0
  2209. bicl3 #-65536,16(r6),-732(fp)
  2210. bicl3 #-65536,r2,-736(fp)
  2211. mull3 r0,-732(fp),-724(fp)
  2212. mull2 r3,-732(fp)
  2213. mull3 r3,-736(fp),-728(fp)
  2214. mull2 r0,-736(fp)
  2215. addl3 -724(fp),-728(fp),r0
  2216. bicl3 #0,r0,-724(fp)
  2217. cmpl -724(fp),-728(fp)
  2218. bgequ noname.225
  2219. addl2 #65536,-736(fp)
  2220. noname.225:
  2221. movzwl -722(fp),r0
  2222. bicl2 #-65536,r0
  2223. addl2 r0,-736(fp)
  2224. bicl3 #-65536,-724(fp),r0
  2225. ashl #16,r0,-728(fp)
  2226. addl3 -728(fp),-732(fp),r0
  2227. bicl3 #0,r0,-732(fp)
  2228. cmpl -732(fp),-728(fp)
  2229. bgequ noname.226
  2230. incl -736(fp)
  2231. noname.226:
  2232. movl -732(fp),r1
  2233. movl -736(fp),r2
  2234. addl2 r1,r9
  2235. bicl2 #0,r9
  2236. cmpl r9,r1
  2237. bgequ noname.227
  2238. incl r2
  2239. noname.227:
  2240. addl2 r2,r8
  2241. bicl2 #0,r8
  2242. cmpl r8,r2
  2243. bgequ noname.228
  2244. incl r10
  2245. noname.228:
  2246. movzwl 22(r6),r2
  2247. bicl3 #-65536,16(r7),r3
  2248. movzwl 18(r7),r0
  2249. bicl2 #-65536,r0
  2250. bicl3 #-65536,20(r6),-748(fp)
  2251. bicl3 #-65536,r2,-752(fp)
  2252. mull3 r0,-748(fp),-740(fp)
  2253. mull2 r3,-748(fp)
  2254. mull3 r3,-752(fp),-744(fp)
  2255. mull2 r0,-752(fp)
  2256. addl3 -740(fp),-744(fp),r0
  2257. bicl3 #0,r0,-740(fp)
  2258. cmpl -740(fp),-744(fp)
  2259. bgequ noname.229
  2260. addl2 #65536,-752(fp)
  2261. noname.229:
  2262. movzwl -738(fp),r0
  2263. bicl2 #-65536,r0
  2264. addl2 r0,-752(fp)
  2265. bicl3 #-65536,-740(fp),r0
  2266. ashl #16,r0,-744(fp)
  2267. addl3 -744(fp),-748(fp),r0
  2268. bicl3 #0,r0,-748(fp)
  2269. cmpl -748(fp),-744(fp)
  2270. bgequ noname.230
  2271. incl -752(fp)
  2272. noname.230:
  2273. movl -748(fp),r1
  2274. movl -752(fp),r2
  2275. addl2 r1,r9
  2276. bicl2 #0,r9
  2277. cmpl r9,r1
  2278. bgequ noname.231
  2279. incl r2
  2280. noname.231:
  2281. addl2 r2,r8
  2282. bicl2 #0,r8
  2283. cmpl r8,r2
  2284. bgequ noname.232
  2285. incl r10
  2286. noname.232:
  2287. movzwl 26(r6),r2
  2288. bicl3 #-65536,12(r7),r3
  2289. movzwl 14(r7),r0
  2290. bicl2 #-65536,r0
  2291. bicl3 #-65536,24(r6),-764(fp)
  2292. bicl3 #-65536,r2,-768(fp)
  2293. mull3 r0,-764(fp),-756(fp)
  2294. mull2 r3,-764(fp)
  2295. mull3 r3,-768(fp),-760(fp)
  2296. mull2 r0,-768(fp)
  2297. addl3 -756(fp),-760(fp),r0
  2298. bicl3 #0,r0,-756(fp)
  2299. cmpl -756(fp),-760(fp)
  2300. bgequ noname.233
  2301. addl2 #65536,-768(fp)
  2302. noname.233:
  2303. movzwl -754(fp),r0
  2304. bicl2 #-65536,r0
  2305. addl2 r0,-768(fp)
  2306. bicl3 #-65536,-756(fp),r0
  2307. ashl #16,r0,-760(fp)
  2308. addl3 -760(fp),-764(fp),r0
  2309. bicl3 #0,r0,-764(fp)
  2310. cmpl -764(fp),-760(fp)
  2311. bgequ noname.234
  2312. incl -768(fp)
  2313. noname.234:
  2314. movl -764(fp),r1
  2315. movl -768(fp),r2
  2316. addl2 r1,r9
  2317. bicl2 #0,r9
  2318. cmpl r9,r1
  2319. bgequ noname.235
  2320. incl r2
  2321. noname.235:
  2322. addl2 r2,r8
  2323. bicl2 #0,r8
  2324. cmpl r8,r2
  2325. bgequ noname.236
  2326. incl r10
  2327. noname.236:
  2328. bicl3 #-65536,28(r6),r3
  2329. movzwl 30(r6),r1
  2330. bicl2 #-65536,r1
  2331. bicl3 #-65536,8(r7),r2
  2332. movzwl 10(r7),r0
  2333. bicl2 #-65536,r0
  2334. movl r3,r5
  2335. movl r1,r4
  2336. mull3 r0,r5,-772(fp)
  2337. mull2 r2,r5
  2338. mull3 r2,r4,-776(fp)
  2339. mull2 r0,r4
  2340. addl3 -772(fp),-776(fp),r0
  2341. bicl3 #0,r0,-772(fp)
  2342. cmpl -772(fp),-776(fp)
  2343. bgequ noname.237
  2344. addl2 #65536,r4
  2345. noname.237:
  2346. movzwl -770(fp),r0
  2347. bicl2 #-65536,r0
  2348. addl2 r0,r4
  2349. bicl3 #-65536,-772(fp),r0
  2350. ashl #16,r0,-776(fp)
  2351. addl2 -776(fp),r5
  2352. bicl2 #0,r5
  2353. cmpl r5,-776(fp)
  2354. bgequ noname.238
  2355. incl r4
  2356. noname.238:
  2357. movl r5,r1
  2358. movl r4,r2
  2359. addl2 r1,r9
  2360. bicl2 #0,r9
  2361. cmpl r9,r1
  2362. bgequ noname.239
  2363. incl r2
  2364. noname.239:
  2365. addl2 r2,r8
  2366. bicl2 #0,r8
  2367. cmpl r8,r2
  2368. bgequ noname.240
  2369. incl r10
  2370. noname.240:
  2371. movl r9,36(r11)
  2372. clrl r9
  2373. bicl3 #-65536,28(r6),r3
  2374. movzwl 30(r6),r1
  2375. bicl2 #-65536,r1
  2376. bicl3 #-65536,12(r7),r2
  2377. movzwl 14(r7),r0
  2378. bicl2 #-65536,r0
  2379. movl r3,r5
  2380. movl r1,r4
  2381. mull3 r0,r5,-780(fp)
  2382. mull2 r2,r5
  2383. mull3 r2,r4,-784(fp)
  2384. mull2 r0,r4
  2385. addl3 -780(fp),-784(fp),r0
  2386. bicl3 #0,r0,-780(fp)
  2387. cmpl -780(fp),-784(fp)
  2388. bgequ noname.241
  2389. addl2 #65536,r4
  2390. noname.241:
  2391. movzwl -778(fp),r0
  2392. bicl2 #-65536,r0
  2393. addl2 r0,r4
  2394. bicl3 #-65536,-780(fp),r0
  2395. ashl #16,r0,-784(fp)
  2396. addl2 -784(fp),r5
  2397. bicl2 #0,r5
  2398. cmpl r5,-784(fp)
  2399. bgequ noname.242
  2400. incl r4
  2401. noname.242:
  2402. movl r5,r1
  2403. movl r4,r2
  2404. addl2 r1,r8
  2405. bicl2 #0,r8
  2406. cmpl r8,r1
  2407. bgequ noname.243
  2408. incl r2
  2409. noname.243:
  2410. addl2 r2,r10
  2411. bicl2 #0,r10
  2412. cmpl r10,r2
  2413. bgequ noname.244
  2414. incl r9
  2415. noname.244:
  2416. bicl3 #-65536,24(r6),r3
  2417. movzwl 26(r6),r1
  2418. bicl2 #-65536,r1
  2419. bicl3 #-65536,16(r7),r2
  2420. movzwl 18(r7),r0
  2421. bicl2 #-65536,r0
  2422. movl r3,r5
  2423. movl r1,r4
  2424. mull3 r0,r5,-788(fp)
  2425. mull2 r2,r5
  2426. mull3 r2,r4,-792(fp)
  2427. mull2 r0,r4
  2428. addl3 -788(fp),-792(fp),r0
  2429. bicl3 #0,r0,-788(fp)
  2430. cmpl -788(fp),-792(fp)
  2431. bgequ noname.245
  2432. addl2 #65536,r4
  2433. noname.245:
  2434. movzwl -786(fp),r0
  2435. bicl2 #-65536,r0
  2436. addl2 r0,r4
  2437. bicl3 #-65536,-788(fp),r0
  2438. ashl #16,r0,-792(fp)
  2439. addl2 -792(fp),r5
  2440. bicl2 #0,r5
  2441. cmpl r5,-792(fp)
  2442. bgequ noname.246
  2443. incl r4
  2444. noname.246:
  2445. movl r5,r1
  2446. movl r4,r2
  2447. addl2 r1,r8
  2448. bicl2 #0,r8
  2449. cmpl r8,r1
  2450. bgequ noname.247
  2451. incl r2
  2452. noname.247:
  2453. addl2 r2,r10
  2454. bicl2 #0,r10
  2455. cmpl r10,r2
  2456. bgequ noname.248
  2457. incl r9
  2458. noname.248:
  2459. bicl3 #-65536,20(r6),r3
  2460. movzwl 22(r6),r1
  2461. bicl2 #-65536,r1
  2462. bicl3 #-65536,20(r7),r2
  2463. movzwl 22(r7),r0
  2464. bicl2 #-65536,r0
  2465. movl r3,r5
  2466. movl r1,r4
  2467. mull3 r0,r5,-796(fp)
  2468. mull2 r2,r5
  2469. mull3 r2,r4,-800(fp)
  2470. mull2 r0,r4
  2471. addl3 -796(fp),-800(fp),r0
  2472. bicl3 #0,r0,-796(fp)
  2473. cmpl -796(fp),-800(fp)
  2474. bgequ noname.249
  2475. addl2 #65536,r4
  2476. noname.249:
  2477. movzwl -794(fp),r0
  2478. bicl2 #-65536,r0
  2479. addl2 r0,r4
  2480. bicl3 #-65536,-796(fp),r0
  2481. ashl #16,r0,-800(fp)
  2482. addl2 -800(fp),r5
  2483. bicl2 #0,r5
  2484. cmpl r5,-800(fp)
  2485. bgequ noname.250
  2486. incl r4
  2487. noname.250:
  2488. movl r5,r1
  2489. movl r4,r2
  2490. addl2 r1,r8
  2491. bicl2 #0,r8
  2492. cmpl r8,r1
  2493. bgequ noname.251
  2494. incl r2
  2495. noname.251:
  2496. addl2 r2,r10
  2497. bicl2 #0,r10
  2498. cmpl r10,r2
  2499. bgequ noname.252
  2500. incl r9
  2501. noname.252:
  2502. bicl3 #-65536,16(r6),r3
  2503. movzwl 18(r6),r1
  2504. bicl2 #-65536,r1
  2505. bicl3 #-65536,24(r7),r2
  2506. movzwl 26(r7),r0
  2507. bicl2 #-65536,r0
  2508. movl r3,r5
  2509. movl r1,r4
  2510. mull3 r0,r5,-804(fp)
  2511. mull2 r2,r5
  2512. mull3 r2,r4,-808(fp)
  2513. mull2 r0,r4
  2514. addl3 -804(fp),-808(fp),r0
  2515. bicl3 #0,r0,-804(fp)
  2516. cmpl -804(fp),-808(fp)
  2517. bgequ noname.253
  2518. addl2 #65536,r4
  2519. noname.253:
  2520. movzwl -802(fp),r0
  2521. bicl2 #-65536,r0
  2522. addl2 r0,r4
  2523. bicl3 #-65536,-804(fp),r0
  2524. ashl #16,r0,-808(fp)
  2525. addl2 -808(fp),r5
  2526. bicl2 #0,r5
  2527. cmpl r5,-808(fp)
  2528. bgequ noname.254
  2529. incl r4
  2530. noname.254:
  2531. movl r5,r1
  2532. movl r4,r2
  2533. addl2 r1,r8
  2534. bicl2 #0,r8
  2535. cmpl r8,r1
  2536. bgequ noname.255
  2537. incl r2
  2538. noname.255:
  2539. addl2 r2,r10
  2540. bicl2 #0,r10
  2541. cmpl r10,r2
  2542. bgequ noname.256
  2543. incl r9
  2544. noname.256:
  2545. bicl3 #-65536,12(r6),r3
  2546. movzwl 14(r6),r1
  2547. bicl2 #-65536,r1
  2548. bicl3 #-65536,28(r7),r2
  2549. movzwl 30(r7),r0
  2550. bicl2 #-65536,r0
  2551. movl r3,r5
  2552. movl r1,r4
  2553. mull3 r0,r5,-812(fp)
  2554. mull2 r2,r5
  2555. mull3 r2,r4,-816(fp)
  2556. mull2 r0,r4
  2557. addl3 -812(fp),-816(fp),r0
  2558. bicl3 #0,r0,-812(fp)
  2559. cmpl -812(fp),-816(fp)
  2560. bgequ noname.257
  2561. addl2 #65536,r4
  2562. noname.257:
  2563. movzwl -810(fp),r0
  2564. bicl2 #-65536,r0
  2565. addl2 r0,r4
  2566. bicl3 #-65536,-812(fp),r0
  2567. ashl #16,r0,-816(fp)
  2568. addl2 -816(fp),r5
  2569. bicl2 #0,r5
  2570. cmpl r5,-816(fp)
  2571. bgequ noname.258
  2572. incl r4
  2573. noname.258:
  2574. movl r5,r1
  2575. movl r4,r2
  2576. addl2 r1,r8
  2577. bicl2 #0,r8
  2578. cmpl r8,r1
  2579. bgequ noname.259
  2580. incl r2
  2581. noname.259:
  2582. addl2 r2,r10
  2583. bicl2 #0,r10
  2584. cmpl r10,r2
  2585. bgequ noname.260
  2586. incl r9
  2587. noname.260:
  2588. movl r8,40(r11)
  2589. clrl r8
  2590. bicl3 #-65536,16(r6),r3
  2591. movzwl 18(r6),r2
  2592. bicl3 #-65536,28(r7),r1
  2593. movzwl 30(r7),r0
  2594. bicl2 #-65536,r0
  2595. movl r3,r4
  2596. bicl3 #-65536,r2,-828(fp)
  2597. mull3 r0,r4,-820(fp)
  2598. mull2 r1,r4
  2599. mull3 r1,-828(fp),-824(fp)
  2600. mull2 r0,-828(fp)
  2601. addl3 -820(fp),-824(fp),r0
  2602. bicl3 #0,r0,-820(fp)
  2603. cmpl -820(fp),-824(fp)
  2604. bgequ noname.261
  2605. addl2 #65536,-828(fp)
  2606. noname.261:
  2607. movzwl -818(fp),r0
  2608. bicl2 #-65536,r0
  2609. addl2 r0,-828(fp)
  2610. bicl3 #-65536,-820(fp),r0
  2611. ashl #16,r0,-824(fp)
  2612. addl2 -824(fp),r4
  2613. bicl2 #0,r4
  2614. cmpl r4,-824(fp)
  2615. bgequ noname.262
  2616. incl -828(fp)
  2617. noname.262:
  2618. movl r4,r1
  2619. movl -828(fp),r2
  2620. addl2 r1,r10
  2621. bicl2 #0,r10
  2622. cmpl r10,r1
  2623. bgequ noname.263
  2624. incl r2
  2625. noname.263:
  2626. addl2 r2,r9
  2627. bicl2 #0,r9
  2628. cmpl r9,r2
  2629. bgequ noname.264
  2630. incl r8
  2631. noname.264:
  2632. movzwl 22(r6),r2
  2633. bicl3 #-65536,24(r7),r3
  2634. movzwl 26(r7),r0
  2635. bicl2 #-65536,r0
  2636. bicl3 #-65536,20(r6),-840(fp)
  2637. bicl3 #-65536,r2,-844(fp)
  2638. mull3 r0,-840(fp),-832(fp)
  2639. mull2 r3,-840(fp)
  2640. mull3 r3,-844(fp),-836(fp)
  2641. mull2 r0,-844(fp)
  2642. addl3 -832(fp),-836(fp),r0
  2643. bicl3 #0,r0,-832(fp)
  2644. cmpl -832(fp),-836(fp)
  2645. bgequ noname.265
  2646. addl2 #65536,-844(fp)
  2647. noname.265:
  2648. movzwl -830(fp),r0
  2649. bicl2 #-65536,r0
  2650. addl2 r0,-844(fp)
  2651. bicl3 #-65536,-832(fp),r0
  2652. ashl #16,r0,-836(fp)
  2653. addl3 -836(fp),-840(fp),r0
  2654. bicl3 #0,r0,-840(fp)
  2655. cmpl -840(fp),-836(fp)
  2656. bgequ noname.266
  2657. incl -844(fp)
  2658. noname.266:
  2659. movl -840(fp),r1
  2660. movl -844(fp),r2
  2661. addl2 r1,r10
  2662. bicl2 #0,r10
  2663. cmpl r10,r1
  2664. bgequ noname.267
  2665. incl r2
  2666. noname.267:
  2667. addl2 r2,r9
  2668. bicl2 #0,r9
  2669. cmpl r9,r2
  2670. bgequ noname.268
  2671. incl r8
  2672. noname.268:
  2673. bicl3 #-65536,24(r6),r3
  2674. movzwl 26(r6),r1
  2675. bicl2 #-65536,r1
  2676. bicl3 #-65536,20(r7),r2
  2677. movzwl 22(r7),r0
  2678. bicl2 #-65536,r0
  2679. movl r3,r5
  2680. movl r1,r4
  2681. mull3 r0,r5,-848(fp)
  2682. mull2 r2,r5
  2683. mull3 r2,r4,-852(fp)
  2684. mull2 r0,r4
  2685. addl3 -848(fp),-852(fp),r0
  2686. bicl3 #0,r0,-848(fp)
  2687. cmpl -848(fp),-852(fp)
  2688. bgequ noname.269
  2689. addl2 #65536,r4
  2690. noname.269:
  2691. movzwl -846(fp),r0
  2692. bicl2 #-65536,r0
  2693. addl2 r0,r4
  2694. bicl3 #-65536,-848(fp),r0
  2695. ashl #16,r0,-852(fp)
  2696. addl2 -852(fp),r5
  2697. bicl2 #0,r5
  2698. cmpl r5,-852(fp)
  2699. bgequ noname.270
  2700. incl r4
  2701. noname.270:
  2702. movl r5,r1
  2703. movl r4,r2
  2704. addl2 r1,r10
  2705. bicl2 #0,r10
  2706. cmpl r10,r1
  2707. bgequ noname.271
  2708. incl r2
  2709. noname.271:
  2710. addl2 r2,r9
  2711. bicl2 #0,r9
  2712. cmpl r9,r2
  2713. bgequ noname.272
  2714. incl r8
  2715. noname.272:
  2716. bicl3 #-65536,28(r6),r3
  2717. movzwl 30(r6),r1
  2718. bicl2 #-65536,r1
  2719. bicl3 #-65536,16(r7),r2
  2720. movzwl 18(r7),r0
  2721. bicl2 #-65536,r0
  2722. movl r3,r5
  2723. movl r1,r4
  2724. mull3 r0,r5,-856(fp)
  2725. mull2 r2,r5
  2726. mull3 r2,r4,-860(fp)
  2727. mull2 r0,r4
  2728. addl3 -856(fp),-860(fp),r0
  2729. bicl3 #0,r0,-856(fp)
  2730. cmpl -856(fp),-860(fp)
  2731. bgequ noname.273
  2732. addl2 #65536,r4
  2733. noname.273:
  2734. movzwl -854(fp),r0
  2735. bicl2 #-65536,r0
  2736. addl2 r0,r4
  2737. bicl3 #-65536,-856(fp),r0
  2738. ashl #16,r0,-860(fp)
  2739. addl2 -860(fp),r5
  2740. bicl2 #0,r5
  2741. cmpl r5,-860(fp)
  2742. bgequ noname.274
  2743. incl r4
  2744. noname.274:
  2745. movl r5,r1
  2746. movl r4,r2
  2747. addl2 r1,r10
  2748. bicl2 #0,r10
  2749. cmpl r10,r1
  2750. bgequ noname.275
  2751. incl r2
  2752. noname.275:
  2753. addl2 r2,r9
  2754. bicl2 #0,r9
  2755. cmpl r9,r2
  2756. bgequ noname.276
  2757. incl r8
  2758. noname.276:
  2759. movl r10,44(r11)
  2760. clrl r10
  2761. bicl3 #-65536,28(r6),r3
  2762. movzwl 30(r6),r1
  2763. bicl2 #-65536,r1
  2764. bicl3 #-65536,20(r7),r2
  2765. movzwl 22(r7),r0
  2766. bicl2 #-65536,r0
  2767. movl r3,r5
  2768. movl r1,r4
  2769. mull3 r0,r5,-864(fp)
  2770. mull2 r2,r5
  2771. mull3 r2,r4,-868(fp)
  2772. mull2 r0,r4
  2773. addl3 -864(fp),-868(fp),r0
  2774. bicl3 #0,r0,-864(fp)
  2775. cmpl -864(fp),-868(fp)
  2776. bgequ noname.277
  2777. addl2 #65536,r4
  2778. noname.277:
  2779. movzwl -862(fp),r0
  2780. bicl2 #-65536,r0
  2781. addl2 r0,r4
  2782. bicl3 #-65536,-864(fp),r0
  2783. ashl #16,r0,-868(fp)
  2784. addl2 -868(fp),r5
  2785. bicl2 #0,r5
  2786. cmpl r5,-868(fp)
  2787. bgequ noname.278
  2788. incl r4
  2789. noname.278:
  2790. movl r5,r1
  2791. movl r4,r2
  2792. addl2 r1,r9
  2793. bicl2 #0,r9
  2794. cmpl r9,r1
  2795. bgequ noname.279
  2796. incl r2
  2797. noname.279:
  2798. addl2 r2,r8
  2799. bicl2 #0,r8
  2800. cmpl r8,r2
  2801. bgequ noname.280
  2802. incl r10
  2803. noname.280:
  2804. bicl3 #-65536,24(r6),r3
  2805. movzwl 26(r6),r1
  2806. bicl2 #-65536,r1
  2807. bicl3 #-65536,24(r7),r2
  2808. movzwl 26(r7),r0
  2809. bicl2 #-65536,r0
  2810. movl r3,r5
  2811. movl r1,r4
  2812. mull3 r0,r5,-872(fp)
  2813. mull2 r2,r5
  2814. mull3 r2,r4,-876(fp)
  2815. mull2 r0,r4
  2816. addl3 -872(fp),-876(fp),r0
  2817. bicl3 #0,r0,-872(fp)
  2818. cmpl -872(fp),-876(fp)
  2819. bgequ noname.281
  2820. addl2 #65536,r4
  2821. noname.281:
  2822. movzwl -870(fp),r0
  2823. bicl2 #-65536,r0
  2824. addl2 r0,r4
  2825. bicl3 #-65536,-872(fp),r0
  2826. ashl #16,r0,-876(fp)
  2827. addl2 -876(fp),r5
  2828. bicl2 #0,r5
  2829. cmpl r5,-876(fp)
  2830. bgequ noname.282
  2831. incl r4
  2832. noname.282:
  2833. movl r5,r1
  2834. movl r4,r2
  2835. addl2 r1,r9
  2836. bicl2 #0,r9
  2837. cmpl r9,r1
  2838. bgequ noname.283
  2839. incl r2
  2840. noname.283:
  2841. addl2 r2,r8
  2842. bicl2 #0,r8
  2843. cmpl r8,r2
  2844. bgequ noname.284
  2845. incl r10
  2846. noname.284:
  2847. bicl3 #-65536,20(r6),r3
  2848. movzwl 22(r6),r1
  2849. bicl2 #-65536,r1
  2850. bicl3 #-65536,28(r7),r2
  2851. movzwl 30(r7),r0
  2852. bicl2 #-65536,r0
  2853. movl r3,r5
  2854. movl r1,r4
  2855. mull3 r0,r5,-880(fp)
  2856. mull2 r2,r5
  2857. mull3 r2,r4,-884(fp)
  2858. mull2 r0,r4
  2859. addl3 -880(fp),-884(fp),r0
  2860. bicl3 #0,r0,-880(fp)
  2861. cmpl -880(fp),-884(fp)
  2862. bgequ noname.285
  2863. addl2 #65536,r4
  2864. noname.285:
  2865. movzwl -878(fp),r0
  2866. bicl2 #-65536,r0
  2867. addl2 r0,r4
  2868. bicl3 #-65536,-880(fp),r0
  2869. ashl #16,r0,-884(fp)
  2870. addl2 -884(fp),r5
  2871. bicl2 #0,r5
  2872. cmpl r5,-884(fp)
  2873. bgequ noname.286
  2874. incl r4
  2875. noname.286:
  2876. movl r5,r1
  2877. movl r4,r2
  2878. addl2 r1,r9
  2879. bicl2 #0,r9
  2880. cmpl r9,r1
  2881. bgequ noname.287
  2882. incl r2
  2883. noname.287:
  2884. addl2 r2,r8
  2885. bicl2 #0,r8
  2886. cmpl r8,r2
  2887. bgequ noname.288
  2888. incl r10
  2889. noname.288:
  2890. movl r9,48(r11)
  2891. clrl r9
  2892. bicl3 #-65536,24(r6),r3
  2893. movzwl 26(r6),r1
  2894. bicl2 #-65536,r1
  2895. bicl3 #-65536,28(r7),r2
  2896. movzwl 30(r7),r0
  2897. bicl2 #-65536,r0
  2898. movl r3,r5
  2899. movl r1,r4
  2900. mull3 r0,r5,-888(fp)
  2901. mull2 r2,r5
  2902. mull3 r2,r4,-892(fp)
  2903. mull2 r0,r4
  2904. addl3 -888(fp),-892(fp),r0
  2905. bicl3 #0,r0,-888(fp)
  2906. cmpl -888(fp),-892(fp)
  2907. bgequ noname.289
  2908. addl2 #65536,r4
  2909. noname.289:
  2910. movzwl -886(fp),r0
  2911. bicl2 #-65536,r0
  2912. addl2 r0,r4
  2913. bicl3 #-65536,-888(fp),r0
  2914. ashl #16,r0,-892(fp)
  2915. addl2 -892(fp),r5
  2916. bicl2 #0,r5
  2917. cmpl r5,-892(fp)
  2918. bgequ noname.290
  2919. incl r4
  2920. noname.290:
  2921. movl r5,r1
  2922. movl r4,r2
  2923. addl2 r1,r8
  2924. bicl2 #0,r8
  2925. cmpl r8,r1
  2926. bgequ noname.291
  2927. incl r2
  2928. noname.291:
  2929. addl2 r2,r10
  2930. bicl2 #0,r10
  2931. cmpl r10,r2
  2932. bgequ noname.292
  2933. incl r9
  2934. noname.292:
  2935. movzwl 30(r6),r2
  2936. bicl3 #-65536,24(r7),r3
  2937. movzwl 26(r7),r0
  2938. bicl2 #-65536,r0
  2939. bicl3 #-65536,28(r6),-904(fp)
  2940. bicl3 #-65536,r2,-908(fp)
  2941. mull3 r0,-904(fp),-896(fp)
  2942. mull2 r3,-904(fp)
  2943. mull3 r3,-908(fp),-900(fp)
  2944. mull2 r0,-908(fp)
  2945. addl3 -896(fp),-900(fp),r0
  2946. bicl3 #0,r0,-896(fp)
  2947. cmpl -896(fp),-900(fp)
  2948. bgequ noname.293
  2949. addl2 #65536,-908(fp)
  2950. noname.293:
  2951. movzwl -894(fp),r0
  2952. bicl2 #-65536,r0
  2953. addl2 r0,-908(fp)
  2954. bicl3 #-65536,-896(fp),r0
  2955. ashl #16,r0,-900(fp)
  2956. addl3 -900(fp),-904(fp),r0
  2957. bicl3 #0,r0,-904(fp)
  2958. cmpl -904(fp),-900(fp)
  2959. bgequ noname.294
  2960. incl -908(fp)
  2961. noname.294:
  2962. movl -904(fp),r1
  2963. movl -908(fp),r2
  2964. addl2 r1,r8
  2965. bicl2 #0,r8
  2966. cmpl r8,r1
  2967. bgequ noname.295
  2968. incl r2
  2969. noname.295:
  2970. addl2 r2,r10
  2971. bicl2 #0,r10
  2972. cmpl r10,r2
  2973. bgequ noname.296
  2974. incl r9
  2975. noname.296:
  2976. movl r8,52(r11)
  2977. clrl r8
  2978. movzwl 30(r6),r2
  2979. bicl3 #-65536,28(r7),r3
  2980. movzwl 30(r7),r0
  2981. bicl2 #-65536,r0
  2982. bicl3 #-65536,28(r6),-920(fp)
  2983. bicl3 #-65536,r2,-924(fp)
  2984. mull3 r0,-920(fp),-912(fp)
  2985. mull2 r3,-920(fp)
  2986. mull3 r3,-924(fp),-916(fp)
  2987. mull2 r0,-924(fp)
  2988. addl3 -912(fp),-916(fp),r0
  2989. bicl3 #0,r0,-912(fp)
  2990. cmpl -912(fp),-916(fp)
  2991. bgequ noname.297
  2992. addl2 #65536,-924(fp)
  2993. noname.297:
  2994. movzwl -910(fp),r0
  2995. bicl2 #-65536,r0
  2996. addl2 r0,-924(fp)
  2997. bicl3 #-65536,-912(fp),r0
  2998. ashl #16,r0,-916(fp)
  2999. addl3 -916(fp),-920(fp),r0
  3000. bicl3 #0,r0,-920(fp)
  3001. cmpl -920(fp),-916(fp)
  3002. bgequ noname.298
  3003. incl -924(fp)
  3004. noname.298:
  3005. movl -920(fp),r1
  3006. movl -924(fp),r2
  3007. addl2 r1,r10
  3008. bicl2 #0,r10
  3009. cmpl r10,r1
  3010. bgequ noname.299
  3011. incl r2
  3012. noname.299:
  3013. addl2 r2,r9
  3014. bicl2 #0,r9
  3015. cmpl r9,r2
  3016. bgequ noname.300
  3017. incl r8
  3018. noname.300:
  3019. movl r10,56(r11)
  3020. movl r9,60(r11)
  3021. ret
  3022. ;r=4 ;(AP)
  3023. ;a=8 ;(AP)
  3024. ;b=12 ;(AP)
  3025. ;n=16 ;(AP) n by value (input)
  3026. .psect code,nowrt
  3027. .entry BN_MUL_COMBA4,^m<r2,r3,r4,r5,r6,r7,r8,r9,r10,r11>
  3028. movab -156(sp),sp
  3029. clrq r9
  3030. clrl r8
  3031. movl 8(ap),r6
  3032. bicl3 #-65536,(r6),r3
  3033. movzwl 2(r6),r2
  3034. bicl2 #-65536,r2
  3035. movl 12(ap),r7
  3036. bicl3 #-65536,(r7),r1
  3037. movzwl 2(r7),r0
  3038. bicl2 #-65536,r0
  3039. movl r3,r5
  3040. movl r2,r4
  3041. mull3 r0,r5,-4(fp)
  3042. mull2 r1,r5
  3043. mull3 r1,r4,-8(fp)
  3044. mull2 r0,r4
  3045. addl3 -4(fp),-8(fp),r0
  3046. bicl3 #0,r0,-4(fp)
  3047. cmpl -4(fp),-8(fp)
  3048. bgequ noname.303
  3049. addl2 #65536,r4
  3050. noname.303:
  3051. movzwl -2(fp),r0
  3052. bicl2 #-65536,r0
  3053. addl2 r0,r4
  3054. bicl3 #-65536,-4(fp),r0
  3055. ashl #16,r0,-8(fp)
  3056. addl2 -8(fp),r5
  3057. bicl2 #0,r5
  3058. cmpl r5,-8(fp)
  3059. bgequ noname.304
  3060. incl r4
  3061. noname.304:
  3062. movl r5,r1
  3063. movl r4,r2
  3064. addl2 r1,r10
  3065. bicl2 #0,r10
  3066. cmpl r10,r1
  3067. bgequ noname.305
  3068. incl r2
  3069. noname.305:
  3070. addl2 r2,r9
  3071. bicl2 #0,r9
  3072. cmpl r9,r2
  3073. bgequ noname.306
  3074. incl r8
  3075. noname.306:
  3076. movl 4(ap),r11
  3077. movl r10,(r11)
  3078. clrl r10
  3079. bicl3 #-65536,(r6),r3
  3080. movzwl 2(r6),r1
  3081. bicl2 #-65536,r1
  3082. bicl3 #-65536,4(r7),r2
  3083. movzwl 6(r7),r0
  3084. bicl2 #-65536,r0
  3085. movl r3,r5
  3086. movl r1,r4
  3087. mull3 r0,r5,-12(fp)
  3088. mull2 r2,r5
  3089. mull3 r2,r4,-16(fp)
  3090. mull2 r0,r4
  3091. addl3 -12(fp),-16(fp),r0
  3092. bicl3 #0,r0,-12(fp)
  3093. cmpl -12(fp),-16(fp)
  3094. bgequ noname.307
  3095. addl2 #65536,r4
  3096. noname.307:
  3097. movzwl -10(fp),r0
  3098. bicl2 #-65536,r0
  3099. addl2 r0,r4
  3100. bicl3 #-65536,-12(fp),r0
  3101. ashl #16,r0,-16(fp)
  3102. addl2 -16(fp),r5
  3103. bicl2 #0,r5
  3104. cmpl r5,-16(fp)
  3105. bgequ noname.308
  3106. incl r4
  3107. noname.308:
  3108. movl r5,r1
  3109. movl r4,r2
  3110. addl2 r1,r9
  3111. bicl2 #0,r9
  3112. cmpl r9,r1
  3113. bgequ noname.309
  3114. incl r2
  3115. noname.309:
  3116. addl2 r2,r8
  3117. bicl2 #0,r8
  3118. cmpl r8,r2
  3119. bgequ noname.310
  3120. incl r10
  3121. noname.310:
  3122. bicl3 #-65536,4(r6),r3
  3123. movzwl 6(r6),r1
  3124. bicl2 #-65536,r1
  3125. bicl3 #-65536,(r7),r2
  3126. movzwl 2(r7),r0
  3127. bicl2 #-65536,r0
  3128. movl r3,r5
  3129. movl r1,r4
  3130. mull3 r0,r5,-20(fp)
  3131. mull2 r2,r5
  3132. mull3 r2,r4,-24(fp)
  3133. mull2 r0,r4
  3134. addl3 -20(fp),-24(fp),r0
  3135. bicl3 #0,r0,-20(fp)
  3136. cmpl -20(fp),-24(fp)
  3137. bgequ noname.311
  3138. addl2 #65536,r4
  3139. noname.311:
  3140. movzwl -18(fp),r0
  3141. bicl2 #-65536,r0
  3142. addl2 r0,r4
  3143. bicl3 #-65536,-20(fp),r0
  3144. ashl #16,r0,-24(fp)
  3145. addl2 -24(fp),r5
  3146. bicl2 #0,r5
  3147. cmpl r5,-24(fp)
  3148. bgequ noname.312
  3149. incl r4
  3150. noname.312:
  3151. movl r5,r1
  3152. movl r4,r2
  3153. addl2 r1,r9
  3154. bicl2 #0,r9
  3155. cmpl r9,r1
  3156. bgequ noname.313
  3157. incl r2
  3158. noname.313:
  3159. addl2 r2,r8
  3160. bicl2 #0,r8
  3161. cmpl r8,r2
  3162. bgequ noname.314
  3163. incl r10
  3164. noname.314:
  3165. movl r9,4(r11)
  3166. clrl r9
  3167. bicl3 #-65536,8(r6),r3
  3168. movzwl 10(r6),r1
  3169. bicl2 #-65536,r1
  3170. bicl3 #-65536,(r7),r2
  3171. movzwl 2(r7),r0
  3172. bicl2 #-65536,r0
  3173. movl r3,r5
  3174. movl r1,r4
  3175. mull3 r0,r5,-28(fp)
  3176. mull2 r2,r5
  3177. mull3 r2,r4,-32(fp)
  3178. mull2 r0,r4
  3179. addl3 -28(fp),-32(fp),r0
  3180. bicl3 #0,r0,-28(fp)
  3181. cmpl -28(fp),-32(fp)
  3182. bgequ noname.315
  3183. addl2 #65536,r4
  3184. noname.315:
  3185. movzwl -26(fp),r0
  3186. bicl2 #-65536,r0
  3187. addl2 r0,r4
  3188. bicl3 #-65536,-28(fp),r0
  3189. ashl #16,r0,-32(fp)
  3190. addl2 -32(fp),r5
  3191. bicl2 #0,r5
  3192. cmpl r5,-32(fp)
  3193. bgequ noname.316
  3194. incl r4
  3195. noname.316:
  3196. movl r5,r1
  3197. movl r4,r2
  3198. addl2 r1,r8
  3199. bicl2 #0,r8
  3200. cmpl r8,r1
  3201. bgequ noname.317
  3202. incl r2
  3203. noname.317:
  3204. addl2 r2,r10
  3205. bicl2 #0,r10
  3206. cmpl r10,r2
  3207. bgequ noname.318
  3208. incl r9
  3209. noname.318:
  3210. bicl3 #-65536,4(r6),r3
  3211. movzwl 6(r6),r1
  3212. bicl2 #-65536,r1
  3213. bicl3 #-65536,4(r7),r2
  3214. movzwl 6(r7),r0
  3215. bicl2 #-65536,r0
  3216. movl r3,r5
  3217. movl r1,r4
  3218. mull3 r0,r5,-36(fp)
  3219. mull2 r2,r5
  3220. mull3 r2,r4,-40(fp)
  3221. mull2 r0,r4
  3222. addl3 -36(fp),-40(fp),r0
  3223. bicl3 #0,r0,-36(fp)
  3224. cmpl -36(fp),-40(fp)
  3225. bgequ noname.319
  3226. addl2 #65536,r4
  3227. noname.319:
  3228. movzwl -34(fp),r0
  3229. bicl2 #-65536,r0
  3230. addl2 r0,r4
  3231. bicl3 #-65536,-36(fp),r0
  3232. ashl #16,r0,-40(fp)
  3233. addl2 -40(fp),r5
  3234. bicl2 #0,r5
  3235. cmpl r5,-40(fp)
  3236. bgequ noname.320
  3237. incl r4
  3238. noname.320:
  3239. movl r5,r1
  3240. movl r4,r2
  3241. addl2 r1,r8
  3242. bicl2 #0,r8
  3243. cmpl r8,r1
  3244. bgequ noname.321
  3245. incl r2
  3246. noname.321:
  3247. addl2 r2,r10
  3248. bicl2 #0,r10
  3249. cmpl r10,r2
  3250. bgequ noname.322
  3251. incl r9
  3252. noname.322:
  3253. bicl3 #-65536,(r6),r3
  3254. movzwl 2(r6),r1
  3255. bicl2 #-65536,r1
  3256. bicl3 #-65536,8(r7),r2
  3257. movzwl 10(r7),r0
  3258. bicl2 #-65536,r0
  3259. movl r3,r5
  3260. movl r1,r4
  3261. mull3 r0,r5,-44(fp)
  3262. mull2 r2,r5
  3263. mull3 r2,r4,-48(fp)
  3264. mull2 r0,r4
  3265. addl3 -44(fp),-48(fp),r0
  3266. bicl3 #0,r0,-44(fp)
  3267. cmpl -44(fp),-48(fp)
  3268. bgequ noname.323
  3269. addl2 #65536,r4
  3270. noname.323:
  3271. movzwl -42(fp),r0
  3272. bicl2 #-65536,r0
  3273. addl2 r0,r4
  3274. bicl3 #-65536,-44(fp),r0
  3275. ashl #16,r0,-48(fp)
  3276. addl2 -48(fp),r5
  3277. bicl2 #0,r5
  3278. cmpl r5,-48(fp)
  3279. bgequ noname.324
  3280. incl r4
  3281. noname.324:
  3282. movl r5,r1
  3283. movl r4,r2
  3284. addl2 r1,r8
  3285. bicl2 #0,r8
  3286. cmpl r8,r1
  3287. bgequ noname.325
  3288. incl r2
  3289. noname.325:
  3290. addl2 r2,r10
  3291. bicl2 #0,r10
  3292. cmpl r10,r2
  3293. bgequ noname.326
  3294. incl r9
  3295. noname.326:
  3296. movl r8,8(r11)
  3297. clrl r8
  3298. bicl3 #-65536,(r6),r3
  3299. movzwl 2(r6),r2
  3300. bicl3 #-65536,12(r7),r1
  3301. movzwl 14(r7),r0
  3302. bicl2 #-65536,r0
  3303. movl r3,r4
  3304. bicl3 #-65536,r2,-60(fp)
  3305. mull3 r0,r4,-52(fp)
  3306. mull2 r1,r4
  3307. mull3 r1,-60(fp),-56(fp)
  3308. mull2 r0,-60(fp)
  3309. addl3 -52(fp),-56(fp),r0
  3310. bicl3 #0,r0,-52(fp)
  3311. cmpl -52(fp),-56(fp)
  3312. bgequ noname.327
  3313. addl2 #65536,-60(fp)
  3314. noname.327:
  3315. movzwl -50(fp),r0
  3316. bicl2 #-65536,r0
  3317. addl2 r0,-60(fp)
  3318. bicl3 #-65536,-52(fp),r0
  3319. ashl #16,r0,-56(fp)
  3320. addl2 -56(fp),r4
  3321. bicl2 #0,r4
  3322. cmpl r4,-56(fp)
  3323. bgequ noname.328
  3324. incl -60(fp)
  3325. noname.328:
  3326. movl r4,r1
  3327. movl -60(fp),r2
  3328. addl2 r1,r10
  3329. bicl2 #0,r10
  3330. cmpl r10,r1
  3331. bgequ noname.329
  3332. incl r2
  3333. noname.329:
  3334. addl2 r2,r9
  3335. bicl2 #0,r9
  3336. cmpl r9,r2
  3337. bgequ noname.330
  3338. incl r8
  3339. noname.330:
  3340. movzwl 6(r6),r2
  3341. bicl3 #-65536,8(r7),r3
  3342. movzwl 10(r7),r0
  3343. bicl2 #-65536,r0
  3344. bicl3 #-65536,4(r6),-72(fp)
  3345. bicl3 #-65536,r2,-76(fp)
  3346. mull3 r0,-72(fp),-64(fp)
  3347. mull2 r3,-72(fp)
  3348. mull3 r3,-76(fp),-68(fp)
  3349. mull2 r0,-76(fp)
  3350. addl3 -64(fp),-68(fp),r0
  3351. bicl3 #0,r0,-64(fp)
  3352. cmpl -64(fp),-68(fp)
  3353. bgequ noname.331
  3354. addl2 #65536,-76(fp)
  3355. noname.331:
  3356. movzwl -62(fp),r0
  3357. bicl2 #-65536,r0
  3358. addl2 r0,-76(fp)
  3359. bicl3 #-65536,-64(fp),r0
  3360. ashl #16,r0,-68(fp)
  3361. addl3 -68(fp),-72(fp),r0
  3362. bicl3 #0,r0,-72(fp)
  3363. cmpl -72(fp),-68(fp)
  3364. bgequ noname.332
  3365. incl -76(fp)
  3366. noname.332:
  3367. movl -72(fp),r1
  3368. movl -76(fp),r2
  3369. addl2 r1,r10
  3370. bicl2 #0,r10
  3371. cmpl r10,r1
  3372. bgequ noname.333
  3373. incl r2
  3374. noname.333:
  3375. addl2 r2,r9
  3376. bicl2 #0,r9
  3377. cmpl r9,r2
  3378. bgequ noname.334
  3379. incl r8
  3380. noname.334:
  3381. bicl3 #-65536,8(r6),r3
  3382. movzwl 10(r6),r1
  3383. bicl2 #-65536,r1
  3384. bicl3 #-65536,4(r7),r2
  3385. movzwl 6(r7),r0
  3386. bicl2 #-65536,r0
  3387. movl r3,r5
  3388. movl r1,r4
  3389. mull3 r0,r5,-80(fp)
  3390. mull2 r2,r5
  3391. mull3 r2,r4,-84(fp)
  3392. mull2 r0,r4
  3393. addl3 -80(fp),-84(fp),r0
  3394. bicl3 #0,r0,-80(fp)
  3395. cmpl -80(fp),-84(fp)
  3396. bgequ noname.335
  3397. addl2 #65536,r4
  3398. noname.335:
  3399. movzwl -78(fp),r0
  3400. bicl2 #-65536,r0
  3401. addl2 r0,r4
  3402. bicl3 #-65536,-80(fp),r0
  3403. ashl #16,r0,-84(fp)
  3404. addl2 -84(fp),r5
  3405. bicl2 #0,r5
  3406. cmpl r5,-84(fp)
  3407. bgequ noname.336
  3408. incl r4
  3409. noname.336:
  3410. movl r5,r1
  3411. movl r4,r2
  3412. addl2 r1,r10
  3413. bicl2 #0,r10
  3414. cmpl r10,r1
  3415. bgequ noname.337
  3416. incl r2
  3417. noname.337:
  3418. addl2 r2,r9
  3419. bicl2 #0,r9
  3420. cmpl r9,r2
  3421. bgequ noname.338
  3422. incl r8
  3423. noname.338:
  3424. bicl3 #-65536,12(r6),r3
  3425. movzwl 14(r6),r1
  3426. bicl2 #-65536,r1
  3427. bicl3 #-65536,(r7),r2
  3428. movzwl 2(r7),r0
  3429. bicl2 #-65536,r0
  3430. movl r3,r5
  3431. movl r1,r4
  3432. mull3 r0,r5,-88(fp)
  3433. mull2 r2,r5
  3434. mull3 r2,r4,-92(fp)
  3435. mull2 r0,r4
  3436. addl3 -88(fp),-92(fp),r0
  3437. bicl3 #0,r0,-88(fp)
  3438. cmpl -88(fp),-92(fp)
  3439. bgequ noname.339
  3440. addl2 #65536,r4
  3441. noname.339:
  3442. movzwl -86(fp),r0
  3443. bicl2 #-65536,r0
  3444. addl2 r0,r4
  3445. bicl3 #-65536,-88(fp),r0
  3446. ashl #16,r0,-92(fp)
  3447. addl2 -92(fp),r5
  3448. bicl2 #0,r5
  3449. cmpl r5,-92(fp)
  3450. bgequ noname.340
  3451. incl r4
  3452. noname.340:
  3453. movl r5,r1
  3454. movl r4,r2
  3455. addl2 r1,r10
  3456. bicl2 #0,r10
  3457. cmpl r10,r1
  3458. bgequ noname.341
  3459. incl r2
  3460. noname.341:
  3461. addl2 r2,r9
  3462. bicl2 #0,r9
  3463. cmpl r9,r2
  3464. bgequ noname.342
  3465. incl r8
  3466. noname.342:
  3467. movl r10,12(r11)
  3468. clrl r10
  3469. bicl3 #-65536,12(r6),r3
  3470. movzwl 14(r6),r1
  3471. bicl2 #-65536,r1
  3472. bicl3 #-65536,4(r7),r2
  3473. movzwl 6(r7),r0
  3474. bicl2 #-65536,r0
  3475. movl r3,r5
  3476. movl r1,r4
  3477. mull3 r0,r5,-96(fp)
  3478. mull2 r2,r5
  3479. mull3 r2,r4,-100(fp)
  3480. mull2 r0,r4
  3481. addl3 -96(fp),-100(fp),r0
  3482. bicl3 #0,r0,-96(fp)
  3483. cmpl -96(fp),-100(fp)
  3484. bgequ noname.343
  3485. addl2 #65536,r4
  3486. noname.343:
  3487. movzwl -94(fp),r0
  3488. bicl2 #-65536,r0
  3489. addl2 r0,r4
  3490. bicl3 #-65536,-96(fp),r0
  3491. ashl #16,r0,-100(fp)
  3492. addl2 -100(fp),r5
  3493. bicl2 #0,r5
  3494. cmpl r5,-100(fp)
  3495. bgequ noname.344
  3496. incl r4
  3497. noname.344:
  3498. movl r5,r1
  3499. movl r4,r2
  3500. addl2 r1,r9
  3501. bicl2 #0,r9
  3502. cmpl r9,r1
  3503. bgequ noname.345
  3504. incl r2
  3505. noname.345:
  3506. addl2 r2,r8
  3507. bicl2 #0,r8
  3508. cmpl r8,r2
  3509. bgequ noname.346
  3510. incl r10
  3511. noname.346:
  3512. bicl3 #-65536,8(r6),r3
  3513. movzwl 10(r6),r1
  3514. bicl2 #-65536,r1
  3515. bicl3 #-65536,8(r7),r2
  3516. movzwl 10(r7),r0
  3517. bicl2 #-65536,r0
  3518. movl r3,r5
  3519. movl r1,r4
  3520. mull3 r0,r5,-104(fp)
  3521. mull2 r2,r5
  3522. mull3 r2,r4,-108(fp)
  3523. mull2 r0,r4
  3524. addl3 -104(fp),-108(fp),r0
  3525. bicl3 #0,r0,-104(fp)
  3526. cmpl -104(fp),-108(fp)
  3527. bgequ noname.347
  3528. addl2 #65536,r4
  3529. noname.347:
  3530. movzwl -102(fp),r0
  3531. bicl2 #-65536,r0
  3532. addl2 r0,r4
  3533. bicl3 #-65536,-104(fp),r0
  3534. ashl #16,r0,-108(fp)
  3535. addl2 -108(fp),r5
  3536. bicl2 #0,r5
  3537. cmpl r5,-108(fp)
  3538. bgequ noname.348
  3539. incl r4
  3540. noname.348:
  3541. movl r5,r1
  3542. movl r4,r2
  3543. addl2 r1,r9
  3544. bicl2 #0,r9
  3545. cmpl r9,r1
  3546. bgequ noname.349
  3547. incl r2
  3548. noname.349:
  3549. addl2 r2,r8
  3550. bicl2 #0,r8
  3551. cmpl r8,r2
  3552. bgequ noname.350
  3553. incl r10
  3554. noname.350:
  3555. bicl3 #-65536,4(r6),r3
  3556. movzwl 6(r6),r1
  3557. bicl2 #-65536,r1
  3558. bicl3 #-65536,12(r7),r2
  3559. movzwl 14(r7),r0
  3560. bicl2 #-65536,r0
  3561. movl r3,r5
  3562. movl r1,r4
  3563. mull3 r0,r5,-112(fp)
  3564. mull2 r2,r5
  3565. mull3 r2,r4,-116(fp)
  3566. mull2 r0,r4
  3567. addl3 -112(fp),-116(fp),r0
  3568. bicl3 #0,r0,-112(fp)
  3569. cmpl -112(fp),-116(fp)
  3570. bgequ noname.351
  3571. addl2 #65536,r4
  3572. noname.351:
  3573. movzwl -110(fp),r0
  3574. bicl2 #-65536,r0
  3575. addl2 r0,r4
  3576. bicl3 #-65536,-112(fp),r0
  3577. ashl #16,r0,-116(fp)
  3578. addl2 -116(fp),r5
  3579. bicl2 #0,r5
  3580. cmpl r5,-116(fp)
  3581. bgequ noname.352
  3582. incl r4
  3583. noname.352:
  3584. movl r5,r1
  3585. movl r4,r2
  3586. addl2 r1,r9
  3587. bicl2 #0,r9
  3588. cmpl r9,r1
  3589. bgequ noname.353
  3590. incl r2
  3591. noname.353:
  3592. addl2 r2,r8
  3593. bicl2 #0,r8
  3594. cmpl r8,r2
  3595. bgequ noname.354
  3596. incl r10
  3597. noname.354:
  3598. movl r9,16(r11)
  3599. clrl r9
  3600. bicl3 #-65536,8(r6),r3
  3601. movzwl 10(r6),r1
  3602. bicl2 #-65536,r1
  3603. bicl3 #-65536,12(r7),r2
  3604. movzwl 14(r7),r0
  3605. bicl2 #-65536,r0
  3606. movl r3,r5
  3607. movl r1,r4
  3608. mull3 r0,r5,-120(fp)
  3609. mull2 r2,r5
  3610. mull3 r2,r4,-124(fp)
  3611. mull2 r0,r4
  3612. addl3 -120(fp),-124(fp),r0
  3613. bicl3 #0,r0,-120(fp)
  3614. cmpl -120(fp),-124(fp)
  3615. bgequ noname.355
  3616. addl2 #65536,r4
  3617. noname.355:
  3618. movzwl -118(fp),r0
  3619. bicl2 #-65536,r0
  3620. addl2 r0,r4
  3621. bicl3 #-65536,-120(fp),r0
  3622. ashl #16,r0,-124(fp)
  3623. addl2 -124(fp),r5
  3624. bicl2 #0,r5
  3625. cmpl r5,-124(fp)
  3626. bgequ noname.356
  3627. incl r4
  3628. noname.356:
  3629. movl r5,r1
  3630. movl r4,r2
  3631. addl2 r1,r8
  3632. bicl2 #0,r8
  3633. cmpl r8,r1
  3634. bgequ noname.357
  3635. incl r2
  3636. noname.357:
  3637. addl2 r2,r10
  3638. bicl2 #0,r10
  3639. cmpl r10,r2
  3640. bgequ noname.358
  3641. incl r9
  3642. noname.358:
  3643. movzwl 14(r6),r2
  3644. bicl3 #-65536,8(r7),r3
  3645. movzwl 10(r7),r0
  3646. bicl2 #-65536,r0
  3647. bicl3 #-65536,12(r6),-136(fp)
  3648. bicl3 #-65536,r2,-140(fp)
  3649. mull3 r0,-136(fp),-128(fp)
  3650. mull2 r3,-136(fp)
  3651. mull3 r3,-140(fp),-132(fp)
  3652. mull2 r0,-140(fp)
  3653. addl3 -128(fp),-132(fp),r0
  3654. bicl3 #0,r0,-128(fp)
  3655. cmpl -128(fp),-132(fp)
  3656. bgequ noname.359
  3657. addl2 #65536,-140(fp)
  3658. noname.359:
  3659. movzwl -126(fp),r0
  3660. bicl2 #-65536,r0
  3661. addl2 r0,-140(fp)
  3662. bicl3 #-65536,-128(fp),r0
  3663. ashl #16,r0,-132(fp)
  3664. addl3 -132(fp),-136(fp),r0
  3665. bicl3 #0,r0,-136(fp)
  3666. cmpl -136(fp),-132(fp)
  3667. bgequ noname.360
  3668. incl -140(fp)
  3669. noname.360:
  3670. movl -136(fp),r1
  3671. movl -140(fp),r2
  3672. addl2 r1,r8
  3673. bicl2 #0,r8
  3674. cmpl r8,r1
  3675. bgequ noname.361
  3676. incl r2
  3677. noname.361:
  3678. addl2 r2,r10
  3679. bicl2 #0,r10
  3680. cmpl r10,r2
  3681. bgequ noname.362
  3682. incl r9
  3683. noname.362:
  3684. movl r8,20(r11)
  3685. clrl r8
  3686. movzwl 14(r6),r2
  3687. bicl3 #-65536,12(r7),r3
  3688. movzwl 14(r7),r0
  3689. bicl2 #-65536,r0
  3690. bicl3 #-65536,12(r6),-152(fp)
  3691. bicl3 #-65536,r2,-156(fp)
  3692. mull3 r0,-152(fp),-144(fp)
  3693. mull2 r3,-152(fp)
  3694. mull3 r3,-156(fp),-148(fp)
  3695. mull2 r0,-156(fp)
  3696. addl3 -144(fp),-148(fp),r0
  3697. bicl3 #0,r0,-144(fp)
  3698. cmpl -144(fp),-148(fp)
  3699. bgequ noname.363
  3700. addl2 #65536,-156(fp)
  3701. noname.363:
  3702. movzwl -142(fp),r0
  3703. bicl2 #-65536,r0
  3704. addl2 r0,-156(fp)
  3705. bicl3 #-65536,-144(fp),r0
  3706. ashl #16,r0,-148(fp)
  3707. addl3 -148(fp),-152(fp),r0
  3708. bicl3 #0,r0,-152(fp)
  3709. cmpl -152(fp),-148(fp)
  3710. bgequ noname.364
  3711. incl -156(fp)
  3712. noname.364:
  3713. movl -152(fp),r1
  3714. movl -156(fp),r2
  3715. addl2 r1,r10
  3716. bicl2 #0,r10
  3717. cmpl r10,r1
  3718. bgequ noname.365
  3719. incl r2
  3720. noname.365:
  3721. addl2 r2,r9
  3722. bicl2 #0,r9
  3723. cmpl r9,r2
  3724. bgequ noname.366
  3725. incl r8
  3726. noname.366:
  3727. movl r10,24(r11)
  3728. movl r9,28(r11)
  3729. ret
  3730. ;r=4 ;(AP)
  3731. ;a=8 ;(AP)
  3732. ;b=12 ;(AP)
  3733. ;n=16 ;(AP) n by value (input)
  3734. .psect code,nowrt
  3735. .entry BN_SQR_COMBA8,^m<r2,r3,r4,r5,r6,r7,r8,r9>
  3736. movab -444(sp),sp
  3737. clrq r8
  3738. clrl r7
  3739. movl 8(ap),r4
  3740. movl (r4),r3
  3741. bicl3 #-65536,r3,-4(fp)
  3742. extzv #16,#16,r3,r0
  3743. bicl3 #-65536,r0,r3
  3744. movl -4(fp),r0
  3745. mull3 r0,r3,-8(fp)
  3746. mull3 r0,r0,-4(fp)
  3747. mull2 r3,r3
  3748. bicl3 #32767,-8(fp),r0
  3749. extzv #15,#17,r0,r0
  3750. addl2 r0,r3
  3751. bicl3 #-65536,-8(fp),r0
  3752. ashl #17,r0,-8(fp)
  3753. addl3 -4(fp),-8(fp),r0
  3754. bicl3 #0,r0,-4(fp)
  3755. cmpl -4(fp),-8(fp)
  3756. bgequ noname.369
  3757. incl r3
  3758. noname.369:
  3759. movl -4(fp),r1
  3760. movl r3,r2
  3761. addl2 r1,r9
  3762. bicl2 #0,r9
  3763. cmpl r9,r1
  3764. bgequ noname.370
  3765. incl r2
  3766. noname.370:
  3767. addl2 r2,r8
  3768. bicl2 #0,r8
  3769. cmpl r8,r2
  3770. bgequ noname.371
  3771. incl r7
  3772. noname.371:
  3773. movl r9,@4(ap)
  3774. clrl r9
  3775. movzwl 6(r4),r2
  3776. bicl3 #-65536,(r4),r3
  3777. movzwl 2(r4),r0
  3778. bicl2 #-65536,r0
  3779. bicl3 #-65536,4(r4),-20(fp)
  3780. bicl3 #-65536,r2,-24(fp)
  3781. mull3 r0,-20(fp),-12(fp)
  3782. mull2 r3,-20(fp)
  3783. mull3 r3,-24(fp),-16(fp)
  3784. mull2 r0,-24(fp)
  3785. addl3 -12(fp),-16(fp),r0
  3786. bicl3 #0,r0,-12(fp)
  3787. cmpl -12(fp),-16(fp)
  3788. bgequ noname.372
  3789. addl2 #65536,-24(fp)
  3790. noname.372:
  3791. movzwl -10(fp),r0
  3792. bicl2 #-65536,r0
  3793. addl2 r0,-24(fp)
  3794. bicl3 #-65536,-12(fp),r0
  3795. ashl #16,r0,-16(fp)
  3796. addl3 -16(fp),-20(fp),r0
  3797. bicl3 #0,r0,-20(fp)
  3798. cmpl -20(fp),-16(fp)
  3799. bgequ noname.373
  3800. incl -24(fp)
  3801. noname.373:
  3802. movl -20(fp),r3
  3803. movl -24(fp),r2
  3804. bbc #31,r2,noname.374
  3805. incl r9
  3806. noname.374:
  3807. addl2 r2,r2
  3808. bicl2 #0,r2
  3809. bbc #31,r3,noname.375
  3810. incl r2
  3811. noname.375:
  3812. addl2 r3,r3
  3813. bicl2 #0,r3
  3814. addl2 r3,r8
  3815. bicl2 #0,r8
  3816. cmpl r8,r3
  3817. bgequ noname.376
  3818. incl r2
  3819. bicl3 #0,r2,r0
  3820. bneq noname.376
  3821. incl r9
  3822. noname.376:
  3823. addl2 r2,r7
  3824. bicl2 #0,r7
  3825. cmpl r7,r2
  3826. bgequ noname.377
  3827. incl r9
  3828. noname.377:
  3829. movl 4(ap),r0
  3830. movl r8,4(r0)
  3831. clrl r8
  3832. movl 8(ap),r4
  3833. movl 4(r4),r3
  3834. bicl3 #-65536,r3,-28(fp)
  3835. extzv #16,#16,r3,r0
  3836. bicl3 #-65536,r0,r3
  3837. movl -28(fp),r0
  3838. mull3 r0,r3,-32(fp)
  3839. mull3 r0,r0,-28(fp)
  3840. mull2 r3,r3
  3841. bicl3 #32767,-32(fp),r0
  3842. extzv #15,#17,r0,r0
  3843. addl2 r0,r3
  3844. bicl3 #-65536,-32(fp),r0
  3845. ashl #17,r0,-32(fp)
  3846. addl3 -28(fp),-32(fp),r0
  3847. bicl3 #0,r0,-28(fp)
  3848. cmpl -28(fp),-32(fp)
  3849. bgequ noname.378
  3850. incl r3
  3851. noname.378:
  3852. movl -28(fp),r1
  3853. movl r3,r2
  3854. addl2 r1,r7
  3855. bicl2 #0,r7
  3856. cmpl r7,r1
  3857. bgequ noname.379
  3858. incl r2
  3859. noname.379:
  3860. addl2 r2,r9
  3861. bicl2 #0,r9
  3862. cmpl r9,r2
  3863. bgequ noname.380
  3864. incl r8
  3865. noname.380:
  3866. movzwl 10(r4),r2
  3867. bicl3 #-65536,(r4),r3
  3868. movzwl 2(r4),r0
  3869. bicl2 #-65536,r0
  3870. bicl3 #-65536,8(r4),-44(fp)
  3871. bicl3 #-65536,r2,-48(fp)
  3872. mull3 r0,-44(fp),-36(fp)
  3873. mull2 r3,-44(fp)
  3874. mull3 r3,-48(fp),-40(fp)
  3875. mull2 r0,-48(fp)
  3876. addl3 -36(fp),-40(fp),r0
  3877. bicl3 #0,r0,-36(fp)
  3878. cmpl -36(fp),-40(fp)
  3879. bgequ noname.381
  3880. addl2 #65536,-48(fp)
  3881. noname.381:
  3882. movzwl -34(fp),r0
  3883. bicl2 #-65536,r0
  3884. addl2 r0,-48(fp)
  3885. bicl3 #-65536,-36(fp),r0
  3886. ashl #16,r0,-40(fp)
  3887. addl3 -40(fp),-44(fp),r0
  3888. bicl3 #0,r0,-44(fp)
  3889. cmpl -44(fp),-40(fp)
  3890. bgequ noname.382
  3891. incl -48(fp)
  3892. noname.382:
  3893. movl -44(fp),r3
  3894. movl -48(fp),r2
  3895. bbc #31,r2,noname.383
  3896. incl r8
  3897. noname.383:
  3898. addl2 r2,r2
  3899. bicl2 #0,r2
  3900. bbc #31,r3,noname.384
  3901. incl r2
  3902. noname.384:
  3903. addl2 r3,r3
  3904. bicl2 #0,r3
  3905. addl2 r3,r7
  3906. bicl2 #0,r7
  3907. cmpl r7,r3
  3908. bgequ noname.385
  3909. incl r2
  3910. bicl3 #0,r2,r0
  3911. bneq noname.385
  3912. incl r8
  3913. noname.385:
  3914. addl2 r2,r9
  3915. bicl2 #0,r9
  3916. cmpl r9,r2
  3917. bgequ noname.386
  3918. incl r8
  3919. noname.386:
  3920. movl 4(ap),r0
  3921. movl r7,8(r0)
  3922. clrl r7
  3923. movl 8(ap),r0
  3924. movzwl 14(r0),r2
  3925. bicl3 #-65536,(r0),r3
  3926. movzwl 2(r0),r1
  3927. bicl2 #-65536,r1
  3928. bicl3 #-65536,12(r0),-60(fp)
  3929. bicl3 #-65536,r2,-64(fp)
  3930. mull3 r1,-60(fp),-52(fp)
  3931. mull2 r3,-60(fp)
  3932. mull3 r3,-64(fp),-56(fp)
  3933. mull2 r1,-64(fp)
  3934. addl3 -52(fp),-56(fp),r0
  3935. bicl3 #0,r0,-52(fp)
  3936. cmpl -52(fp),-56(fp)
  3937. bgequ noname.387
  3938. addl2 #65536,-64(fp)
  3939. noname.387:
  3940. movzwl -50(fp),r0
  3941. bicl2 #-65536,r0
  3942. addl2 r0,-64(fp)
  3943. bicl3 #-65536,-52(fp),r0
  3944. ashl #16,r0,-56(fp)
  3945. addl3 -56(fp),-60(fp),r0
  3946. bicl3 #0,r0,-60(fp)
  3947. cmpl -60(fp),-56(fp)
  3948. bgequ noname.388
  3949. incl -64(fp)
  3950. noname.388:
  3951. movl -60(fp),r3
  3952. movl -64(fp),r2
  3953. bbc #31,r2,noname.389
  3954. incl r7
  3955. noname.389:
  3956. addl2 r2,r2
  3957. bicl2 #0,r2
  3958. bbc #31,r3,noname.390
  3959. incl r2
  3960. noname.390:
  3961. addl2 r3,r3
  3962. bicl2 #0,r3
  3963. addl2 r3,r9
  3964. bicl2 #0,r9
  3965. cmpl r9,r3
  3966. bgequ noname.391
  3967. incl r2
  3968. bicl3 #0,r2,r0
  3969. bneq noname.391
  3970. incl r7
  3971. noname.391:
  3972. addl2 r2,r8
  3973. bicl2 #0,r8
  3974. cmpl r8,r2
  3975. bgequ noname.392
  3976. incl r7
  3977. noname.392:
  3978. movl 8(ap),r0
  3979. movzwl 10(r0),r2
  3980. bicl3 #-65536,4(r0),r3
  3981. movzwl 6(r0),r1
  3982. bicl2 #-65536,r1
  3983. bicl3 #-65536,8(r0),-76(fp)
  3984. bicl3 #-65536,r2,-80(fp)
  3985. mull3 r1,-76(fp),-68(fp)
  3986. mull2 r3,-76(fp)
  3987. mull3 r3,-80(fp),-72(fp)
  3988. mull2 r1,-80(fp)
  3989. addl3 -68(fp),-72(fp),r0
  3990. bicl3 #0,r0,-68(fp)
  3991. cmpl -68(fp),-72(fp)
  3992. bgequ noname.393
  3993. addl2 #65536,-80(fp)
  3994. noname.393:
  3995. movzwl -66(fp),r0
  3996. bicl2 #-65536,r0
  3997. addl2 r0,-80(fp)
  3998. bicl3 #-65536,-68(fp),r0
  3999. ashl #16,r0,-72(fp)
  4000. addl3 -72(fp),-76(fp),r0
  4001. bicl3 #0,r0,-76(fp)
  4002. cmpl -76(fp),-72(fp)
  4003. bgequ noname.394
  4004. incl -80(fp)
  4005. noname.394:
  4006. movl -76(fp),r3
  4007. movl -80(fp),r2
  4008. bbc #31,r2,noname.395
  4009. incl r7
  4010. noname.395:
  4011. addl2 r2,r2
  4012. bicl2 #0,r2
  4013. bbc #31,r3,noname.396
  4014. incl r2
  4015. noname.396:
  4016. addl2 r3,r3
  4017. bicl2 #0,r3
  4018. addl2 r3,r9
  4019. bicl2 #0,r9
  4020. cmpl r9,r3
  4021. bgequ noname.397
  4022. incl r2
  4023. bicl3 #0,r2,r0
  4024. bneq noname.397
  4025. incl r7
  4026. noname.397:
  4027. addl2 r2,r8
  4028. bicl2 #0,r8
  4029. cmpl r8,r2
  4030. bgequ noname.398
  4031. incl r7
  4032. noname.398:
  4033. movl 4(ap),r0
  4034. movl r9,12(r0)
  4035. clrl r9
  4036. movl 8(ap),r2
  4037. movl 8(r2),r4
  4038. bicl3 #-65536,r4,-84(fp)
  4039. extzv #16,#16,r4,r0
  4040. bicl3 #-65536,r0,r4
  4041. movl -84(fp),r0
  4042. mull3 r0,r4,-88(fp)
  4043. mull3 r0,r0,-84(fp)
  4044. mull2 r4,r4
  4045. bicl3 #32767,-88(fp),r0
  4046. extzv #15,#17,r0,r0
  4047. addl2 r0,r4
  4048. bicl3 #-65536,-88(fp),r0
  4049. ashl #17,r0,-88(fp)
  4050. addl3 -84(fp),-88(fp),r0
  4051. bicl3 #0,r0,-84(fp)
  4052. cmpl -84(fp),-88(fp)
  4053. bgequ noname.399
  4054. incl r4
  4055. noname.399:
  4056. movl -84(fp),r1
  4057. movl r4,r3
  4058. addl2 r1,r8
  4059. bicl2 #0,r8
  4060. cmpl r8,r1
  4061. bgequ noname.400
  4062. incl r3
  4063. noname.400:
  4064. addl2 r3,r7
  4065. bicl2 #0,r7
  4066. cmpl r7,r3
  4067. bgequ noname.401
  4068. incl r9
  4069. noname.401:
  4070. movzwl 14(r2),r3
  4071. bicl3 #-65536,4(r2),r1
  4072. movzwl 6(r2),r0
  4073. bicl2 #-65536,r0
  4074. bicl3 #-65536,12(r2),-100(fp)
  4075. bicl3 #-65536,r3,-104(fp)
  4076. mull3 r0,-100(fp),-92(fp)
  4077. mull2 r1,-100(fp)
  4078. mull3 r1,-104(fp),-96(fp)
  4079. mull2 r0,-104(fp)
  4080. addl3 -92(fp),-96(fp),r0
  4081. bicl3 #0,r0,-92(fp)
  4082. cmpl -92(fp),-96(fp)
  4083. bgequ noname.402
  4084. addl2 #65536,-104(fp)
  4085. noname.402:
  4086. movzwl -90(fp),r0
  4087. bicl2 #-65536,r0
  4088. addl2 r0,-104(fp)
  4089. bicl3 #-65536,-92(fp),r0
  4090. ashl #16,r0,-96(fp)
  4091. addl3 -96(fp),-100(fp),r0
  4092. bicl3 #0,r0,-100(fp)
  4093. cmpl -100(fp),-96(fp)
  4094. bgequ noname.403
  4095. incl -104(fp)
  4096. noname.403:
  4097. movl -100(fp),r3
  4098. movl -104(fp),r2
  4099. bbc #31,r2,noname.404
  4100. incl r9
  4101. noname.404:
  4102. addl2 r2,r2
  4103. bicl2 #0,r2
  4104. bbc #31,r3,noname.405
  4105. incl r2
  4106. noname.405:
  4107. addl2 r3,r3
  4108. bicl2 #0,r3
  4109. addl2 r3,r8
  4110. bicl2 #0,r8
  4111. cmpl r8,r3
  4112. bgequ noname.406
  4113. incl r2
  4114. bicl3 #0,r2,r0
  4115. bneq noname.406
  4116. incl r9
  4117. noname.406:
  4118. addl2 r2,r7
  4119. bicl2 #0,r7
  4120. cmpl r7,r2
  4121. bgequ noname.407
  4122. incl r9
  4123. noname.407:
  4124. movl 8(ap),r0
  4125. movzwl 18(r0),r2
  4126. bicl3 #-65536,(r0),r3
  4127. movzwl 2(r0),r1
  4128. bicl2 #-65536,r1
  4129. bicl3 #-65536,16(r0),-116(fp)
  4130. bicl3 #-65536,r2,-120(fp)
  4131. mull3 r1,-116(fp),-108(fp)
  4132. mull2 r3,-116(fp)
  4133. mull3 r3,-120(fp),-112(fp)
  4134. mull2 r1,-120(fp)
  4135. addl3 -108(fp),-112(fp),r0
  4136. bicl3 #0,r0,-108(fp)
  4137. cmpl -108(fp),-112(fp)
  4138. bgequ noname.408
  4139. addl2 #65536,-120(fp)
  4140. noname.408:
  4141. movzwl -106(fp),r0
  4142. bicl2 #-65536,r0
  4143. addl2 r0,-120(fp)
  4144. bicl3 #-65536,-108(fp),r0
  4145. ashl #16,r0,-112(fp)
  4146. addl3 -112(fp),-116(fp),r0
  4147. bicl3 #0,r0,-116(fp)
  4148. cmpl -116(fp),-112(fp)
  4149. bgequ noname.409
  4150. incl -120(fp)
  4151. noname.409:
  4152. movl -116(fp),r3
  4153. movl -120(fp),r2
  4154. bbc #31,r2,noname.410
  4155. incl r9
  4156. noname.410:
  4157. addl2 r2,r2
  4158. bicl2 #0,r2
  4159. bbc #31,r3,noname.411
  4160. incl r2
  4161. noname.411:
  4162. addl2 r3,r3
  4163. bicl2 #0,r3
  4164. addl2 r3,r8
  4165. bicl2 #0,r8
  4166. cmpl r8,r3
  4167. bgequ noname.412
  4168. incl r2
  4169. bicl3 #0,r2,r0
  4170. bneq noname.412
  4171. incl r9
  4172. noname.412:
  4173. addl2 r2,r7
  4174. bicl2 #0,r7
  4175. cmpl r7,r2
  4176. bgequ noname.413
  4177. incl r9
  4178. noname.413:
  4179. movl 4(ap),r0
  4180. movl r8,16(r0)
  4181. clrl r8
  4182. movl 8(ap),r0
  4183. movzwl 22(r0),r2
  4184. bicl3 #-65536,(r0),r3
  4185. movzwl 2(r0),r1
  4186. bicl2 #-65536,r1
  4187. bicl3 #-65536,20(r0),-132(fp)
  4188. bicl3 #-65536,r2,-136(fp)
  4189. mull3 r1,-132(fp),-124(fp)
  4190. mull2 r3,-132(fp)
  4191. mull3 r3,-136(fp),-128(fp)
  4192. mull2 r1,-136(fp)
  4193. addl3 -124(fp),-128(fp),r0
  4194. bicl3 #0,r0,-124(fp)
  4195. cmpl -124(fp),-128(fp)
  4196. bgequ noname.414
  4197. addl2 #65536,-136(fp)
  4198. noname.414:
  4199. movzwl -122(fp),r0
  4200. bicl2 #-65536,r0
  4201. addl2 r0,-136(fp)
  4202. bicl3 #-65536,-124(fp),r0
  4203. ashl #16,r0,-128(fp)
  4204. addl3 -128(fp),-132(fp),r0
  4205. bicl3 #0,r0,-132(fp)
  4206. cmpl -132(fp),-128(fp)
  4207. bgequ noname.415
  4208. incl -136(fp)
  4209. noname.415:
  4210. movl -132(fp),r3
  4211. movl -136(fp),r2
  4212. bbc #31,r2,noname.416
  4213. incl r8
  4214. noname.416:
  4215. addl2 r2,r2
  4216. bicl2 #0,r2
  4217. bbc #31,r3,noname.417
  4218. incl r2
  4219. noname.417:
  4220. addl2 r3,r3
  4221. bicl2 #0,r3
  4222. addl2 r3,r7
  4223. bicl2 #0,r7
  4224. cmpl r7,r3
  4225. bgequ noname.418
  4226. incl r2
  4227. bicl3 #0,r2,r0
  4228. bneq noname.418
  4229. incl r8
  4230. noname.418:
  4231. addl2 r2,r9
  4232. bicl2 #0,r9
  4233. cmpl r9,r2
  4234. bgequ noname.419
  4235. incl r8
  4236. noname.419:
  4237. movl 8(ap),r0
  4238. movzwl 18(r0),r2
  4239. bicl3 #-65536,4(r0),r3
  4240. movzwl 6(r0),r1
  4241. bicl2 #-65536,r1
  4242. bicl3 #-65536,16(r0),-148(fp)
  4243. bicl3 #-65536,r2,-152(fp)
  4244. mull3 r1,-148(fp),-140(fp)
  4245. mull2 r3,-148(fp)
  4246. mull3 r3,-152(fp),-144(fp)
  4247. mull2 r1,-152(fp)
  4248. addl3 -140(fp),-144(fp),r0
  4249. bicl3 #0,r0,-140(fp)
  4250. cmpl -140(fp),-144(fp)
  4251. bgequ noname.420
  4252. addl2 #65536,-152(fp)
  4253. noname.420:
  4254. movzwl -138(fp),r0
  4255. bicl2 #-65536,r0
  4256. addl2 r0,-152(fp)
  4257. bicl3 #-65536,-140(fp),r0
  4258. ashl #16,r0,-144(fp)
  4259. addl3 -144(fp),-148(fp),r0
  4260. bicl3 #0,r0,-148(fp)
  4261. cmpl -148(fp),-144(fp)
  4262. bgequ noname.421
  4263. incl -152(fp)
  4264. noname.421:
  4265. movl -148(fp),r3
  4266. movl -152(fp),r2
  4267. bbc #31,r2,noname.422
  4268. incl r8
  4269. noname.422:
  4270. addl2 r2,r2
  4271. bicl2 #0,r2
  4272. bbc #31,r3,noname.423
  4273. incl r2
  4274. noname.423:
  4275. addl2 r3,r3
  4276. bicl2 #0,r3
  4277. addl2 r3,r7
  4278. bicl2 #0,r7
  4279. cmpl r7,r3
  4280. bgequ noname.424
  4281. incl r2
  4282. bicl3 #0,r2,r0
  4283. bneq noname.424
  4284. incl r8
  4285. noname.424:
  4286. addl2 r2,r9
  4287. bicl2 #0,r9
  4288. cmpl r9,r2
  4289. bgequ noname.425
  4290. incl r8
  4291. noname.425:
  4292. movl 8(ap),r0
  4293. movzwl 14(r0),r2
  4294. bicl3 #-65536,8(r0),r3
  4295. movzwl 10(r0),r1
  4296. bicl2 #-65536,r1
  4297. bicl3 #-65536,12(r0),-164(fp)
  4298. bicl3 #-65536,r2,-168(fp)
  4299. mull3 r1,-164(fp),-156(fp)
  4300. mull2 r3,-164(fp)
  4301. mull3 r3,-168(fp),-160(fp)
  4302. mull2 r1,-168(fp)
  4303. addl3 -156(fp),-160(fp),r0
  4304. bicl3 #0,r0,-156(fp)
  4305. cmpl -156(fp),-160(fp)
  4306. bgequ noname.426
  4307. addl2 #65536,-168(fp)
  4308. noname.426:
  4309. movzwl -154(fp),r0
  4310. bicl2 #-65536,r0
  4311. addl2 r0,-168(fp)
  4312. bicl3 #-65536,-156(fp),r0
  4313. ashl #16,r0,-160(fp)
  4314. addl3 -160(fp),-164(fp),r0
  4315. bicl3 #0,r0,-164(fp)
  4316. cmpl -164(fp),-160(fp)
  4317. bgequ noname.427
  4318. incl -168(fp)
  4319. noname.427:
  4320. movl -164(fp),r3
  4321. movl -168(fp),r2
  4322. bbc #31,r2,noname.428
  4323. incl r8
  4324. noname.428:
  4325. addl2 r2,r2
  4326. bicl2 #0,r2
  4327. bbc #31,r3,noname.429
  4328. incl r2
  4329. noname.429:
  4330. addl2 r3,r3
  4331. bicl2 #0,r3
  4332. addl2 r3,r7
  4333. bicl2 #0,r7
  4334. cmpl r7,r3
  4335. bgequ noname.430
  4336. incl r2
  4337. bicl3 #0,r2,r0
  4338. bneq noname.430
  4339. incl r8
  4340. noname.430:
  4341. addl2 r2,r9
  4342. bicl2 #0,r9
  4343. cmpl r9,r2
  4344. bgequ noname.431
  4345. incl r8
  4346. noname.431:
  4347. movl 4(ap),r0
  4348. movl r7,20(r0)
  4349. clrl r7
  4350. movl 8(ap),r2
  4351. movl 12(r2),r4
  4352. bicl3 #-65536,r4,-172(fp)
  4353. extzv #16,#16,r4,r0
  4354. bicl3 #-65536,r0,r4
  4355. movl -172(fp),r0
  4356. mull3 r0,r4,-176(fp)
  4357. mull3 r0,r0,-172(fp)
  4358. mull2 r4,r4
  4359. bicl3 #32767,-176(fp),r0
  4360. extzv #15,#17,r0,r0
  4361. addl2 r0,r4
  4362. bicl3 #-65536,-176(fp),r0
  4363. ashl #17,r0,-176(fp)
  4364. addl3 -172(fp),-176(fp),r0
  4365. bicl3 #0,r0,-172(fp)
  4366. cmpl -172(fp),-176(fp)
  4367. bgequ noname.432
  4368. incl r4
  4369. noname.432:
  4370. movl -172(fp),r1
  4371. movl r4,r3
  4372. addl2 r1,r9
  4373. bicl2 #0,r9
  4374. cmpl r9,r1
  4375. bgequ noname.433
  4376. incl r3
  4377. noname.433:
  4378. addl2 r3,r8
  4379. bicl2 #0,r8
  4380. cmpl r8,r3
  4381. bgequ noname.434
  4382. incl r7
  4383. noname.434:
  4384. movzwl 18(r2),r3
  4385. bicl3 #-65536,8(r2),r1
  4386. movzwl 10(r2),r0
  4387. bicl2 #-65536,r0
  4388. bicl3 #-65536,16(r2),-188(fp)
  4389. bicl3 #-65536,r3,-192(fp)
  4390. mull3 r0,-188(fp),-180(fp)
  4391. mull2 r1,-188(fp)
  4392. mull3 r1,-192(fp),-184(fp)
  4393. mull2 r0,-192(fp)
  4394. addl3 -180(fp),-184(fp),r0
  4395. bicl3 #0,r0,-180(fp)
  4396. cmpl -180(fp),-184(fp)
  4397. bgequ noname.435
  4398. addl2 #65536,-192(fp)
  4399. noname.435:
  4400. movzwl -178(fp),r0
  4401. bicl2 #-65536,r0
  4402. addl2 r0,-192(fp)
  4403. bicl3 #-65536,-180(fp),r0
  4404. ashl #16,r0,-184(fp)
  4405. addl3 -184(fp),-188(fp),r0
  4406. bicl3 #0,r0,-188(fp)
  4407. cmpl -188(fp),-184(fp)
  4408. bgequ noname.436
  4409. incl -192(fp)
  4410. noname.436:
  4411. movl -188(fp),r3
  4412. movl -192(fp),r2
  4413. bbc #31,r2,noname.437
  4414. incl r7
  4415. noname.437:
  4416. addl2 r2,r2
  4417. bicl2 #0,r2
  4418. bbc #31,r3,noname.438
  4419. incl r2
  4420. noname.438:
  4421. addl2 r3,r3
  4422. bicl2 #0,r3
  4423. addl2 r3,r9
  4424. bicl2 #0,r9
  4425. cmpl r9,r3
  4426. bgequ noname.439
  4427. incl r2
  4428. bicl3 #0,r2,r0
  4429. bneq noname.439
  4430. incl r7
  4431. noname.439:
  4432. addl2 r2,r8
  4433. bicl2 #0,r8
  4434. cmpl r8,r2
  4435. bgequ noname.440
  4436. incl r7
  4437. noname.440:
  4438. movl 8(ap),r0
  4439. movzwl 22(r0),r2
  4440. bicl3 #-65536,4(r0),r3
  4441. movzwl 6(r0),r1
  4442. bicl2 #-65536,r1
  4443. bicl3 #-65536,20(r0),-204(fp)
  4444. bicl3 #-65536,r2,-208(fp)
  4445. mull3 r1,-204(fp),-196(fp)
  4446. mull2 r3,-204(fp)
  4447. mull3 r3,-208(fp),-200(fp)
  4448. mull2 r1,-208(fp)
  4449. addl3 -196(fp),-200(fp),r0
  4450. bicl3 #0,r0,-196(fp)
  4451. cmpl -196(fp),-200(fp)
  4452. bgequ noname.441
  4453. addl2 #65536,-208(fp)
  4454. noname.441:
  4455. movzwl -194(fp),r0
  4456. bicl2 #-65536,r0
  4457. addl2 r0,-208(fp)
  4458. bicl3 #-65536,-196(fp),r0
  4459. ashl #16,r0,-200(fp)
  4460. addl3 -200(fp),-204(fp),r0
  4461. bicl3 #0,r0,-204(fp)
  4462. cmpl -204(fp),-200(fp)
  4463. bgequ noname.442
  4464. incl -208(fp)
  4465. noname.442:
  4466. movl -204(fp),r3
  4467. movl -208(fp),r2
  4468. bbc #31,r2,noname.443
  4469. incl r7
  4470. noname.443:
  4471. addl2 r2,r2
  4472. bicl2 #0,r2
  4473. bbc #31,r3,noname.444
  4474. incl r2
  4475. noname.444:
  4476. addl2 r3,r3
  4477. bicl2 #0,r3
  4478. addl2 r3,r9
  4479. bicl2 #0,r9
  4480. cmpl r9,r3
  4481. bgequ noname.445
  4482. incl r2
  4483. bicl3 #0,r2,r0
  4484. bneq noname.445
  4485. incl r7
  4486. noname.445:
  4487. addl2 r2,r8
  4488. bicl2 #0,r8
  4489. cmpl r8,r2
  4490. bgequ noname.446
  4491. incl r7
  4492. noname.446:
  4493. movl 8(ap),r0
  4494. movzwl 26(r0),r2
  4495. bicl3 #-65536,(r0),r3
  4496. movzwl 2(r0),r1
  4497. bicl2 #-65536,r1
  4498. bicl3 #-65536,24(r0),-220(fp)
  4499. bicl3 #-65536,r2,-224(fp)
  4500. mull3 r1,-220(fp),-212(fp)
  4501. mull2 r3,-220(fp)
  4502. mull3 r3,-224(fp),-216(fp)
  4503. mull2 r1,-224(fp)
  4504. addl3 -212(fp),-216(fp),r0
  4505. bicl3 #0,r0,-212(fp)
  4506. cmpl -212(fp),-216(fp)
  4507. bgequ noname.447
  4508. addl2 #65536,-224(fp)
  4509. noname.447:
  4510. movzwl -210(fp),r0
  4511. bicl2 #-65536,r0
  4512. addl2 r0,-224(fp)
  4513. bicl3 #-65536,-212(fp),r0
  4514. ashl #16,r0,-216(fp)
  4515. addl3 -216(fp),-220(fp),r0
  4516. bicl3 #0,r0,-220(fp)
  4517. cmpl -220(fp),-216(fp)
  4518. bgequ noname.448
  4519. incl -224(fp)
  4520. noname.448:
  4521. movl -220(fp),r3
  4522. movl -224(fp),r2
  4523. bbc #31,r2,noname.449
  4524. incl r7
  4525. noname.449:
  4526. addl2 r2,r2
  4527. bicl2 #0,r2
  4528. bbc #31,r3,noname.450
  4529. incl r2
  4530. noname.450:
  4531. addl2 r3,r3
  4532. bicl2 #0,r3
  4533. addl2 r3,r9
  4534. bicl2 #0,r9
  4535. cmpl r9,r3
  4536. bgequ noname.451
  4537. incl r2
  4538. bicl3 #0,r2,r0
  4539. bneq noname.451
  4540. incl r7
  4541. noname.451:
  4542. addl2 r2,r8
  4543. bicl2 #0,r8
  4544. cmpl r8,r2
  4545. bgequ noname.452
  4546. incl r7
  4547. noname.452:
  4548. movl 4(ap),r0
  4549. movl r9,24(r0)
  4550. clrl r9
  4551. movl 8(ap),r0
  4552. movzwl 30(r0),r2
  4553. bicl3 #-65536,(r0),r3
  4554. movzwl 2(r0),r1
  4555. bicl2 #-65536,r1
  4556. bicl3 #-65536,28(r0),-236(fp)
  4557. bicl3 #-65536,r2,-240(fp)
  4558. mull3 r1,-236(fp),-228(fp)
  4559. mull2 r3,-236(fp)
  4560. mull3 r3,-240(fp),-232(fp)
  4561. mull2 r1,-240(fp)
  4562. addl3 -228(fp),-232(fp),r0
  4563. bicl3 #0,r0,-228(fp)
  4564. cmpl -228(fp),-232(fp)
  4565. bgequ noname.453
  4566. addl2 #65536,-240(fp)
  4567. noname.453:
  4568. movzwl -226(fp),r0
  4569. bicl2 #-65536,r0
  4570. addl2 r0,-240(fp)
  4571. bicl3 #-65536,-228(fp),r0
  4572. ashl #16,r0,-232(fp)
  4573. addl3 -232(fp),-236(fp),r0
  4574. bicl3 #0,r0,-236(fp)
  4575. cmpl -236(fp),-232(fp)
  4576. bgequ noname.454
  4577. incl -240(fp)
  4578. noname.454:
  4579. movl -236(fp),r3
  4580. movl -240(fp),r2
  4581. bbc #31,r2,noname.455
  4582. incl r9
  4583. noname.455:
  4584. addl2 r2,r2
  4585. bicl2 #0,r2
  4586. bbc #31,r3,noname.456
  4587. incl r2
  4588. noname.456:
  4589. addl2 r3,r3
  4590. bicl2 #0,r3
  4591. addl2 r3,r8
  4592. bicl2 #0,r8
  4593. cmpl r8,r3
  4594. bgequ noname.457
  4595. incl r2
  4596. bicl3 #0,r2,r0
  4597. bneq noname.457
  4598. incl r9
  4599. noname.457:
  4600. addl2 r2,r7
  4601. bicl2 #0,r7
  4602. cmpl r7,r2
  4603. bgequ noname.458
  4604. incl r9
  4605. noname.458:
  4606. movl 8(ap),r0
  4607. movzwl 26(r0),r2
  4608. bicl3 #-65536,4(r0),r3
  4609. movzwl 6(r0),r1
  4610. bicl2 #-65536,r1
  4611. bicl3 #-65536,24(r0),-252(fp)
  4612. bicl3 #-65536,r2,-256(fp)
  4613. mull3 r1,-252(fp),-244(fp)
  4614. mull2 r3,-252(fp)
  4615. mull3 r3,-256(fp),-248(fp)
  4616. mull2 r1,-256(fp)
  4617. addl3 -244(fp),-248(fp),r0
  4618. bicl3 #0,r0,-244(fp)
  4619. cmpl -244(fp),-248(fp)
  4620. bgequ noname.459
  4621. addl2 #65536,-256(fp)
  4622. noname.459:
  4623. movzwl -242(fp),r0
  4624. bicl2 #-65536,r0
  4625. addl2 r0,-256(fp)
  4626. bicl3 #-65536,-244(fp),r0
  4627. ashl #16,r0,-248(fp)
  4628. addl3 -248(fp),-252(fp),r0
  4629. bicl3 #0,r0,-252(fp)
  4630. cmpl -252(fp),-248(fp)
  4631. bgequ noname.460
  4632. incl -256(fp)
  4633. noname.460:
  4634. movl -252(fp),r3
  4635. movl -256(fp),r2
  4636. bbc #31,r2,noname.461
  4637. incl r9
  4638. noname.461:
  4639. addl2 r2,r2
  4640. bicl2 #0,r2
  4641. bbc #31,r3,noname.462
  4642. incl r2
  4643. noname.462:
  4644. addl2 r3,r3
  4645. bicl2 #0,r3
  4646. addl2 r3,r8
  4647. bicl2 #0,r8
  4648. cmpl r8,r3
  4649. bgequ noname.463
  4650. incl r2
  4651. bicl3 #0,r2,r0
  4652. bneq noname.463
  4653. incl r9
  4654. noname.463:
  4655. addl2 r2,r7
  4656. bicl2 #0,r7
  4657. cmpl r7,r2
  4658. bgequ noname.464
  4659. incl r9
  4660. noname.464:
  4661. movl 8(ap),r0
  4662. movzwl 22(r0),r2
  4663. bicl3 #-65536,8(r0),r3
  4664. movzwl 10(r0),r1
  4665. bicl2 #-65536,r1
  4666. bicl3 #-65536,20(r0),-268(fp)
  4667. bicl3 #-65536,r2,-272(fp)
  4668. mull3 r1,-268(fp),-260(fp)
  4669. mull2 r3,-268(fp)
  4670. mull3 r3,-272(fp),-264(fp)
  4671. mull2 r1,-272(fp)
  4672. addl3 -260(fp),-264(fp),r0
  4673. bicl3 #0,r0,-260(fp)
  4674. cmpl -260(fp),-264(fp)
  4675. bgequ noname.465
  4676. addl2 #65536,-272(fp)
  4677. noname.465:
  4678. movzwl -258(fp),r0
  4679. bicl2 #-65536,r0
  4680. addl2 r0,-272(fp)
  4681. bicl3 #-65536,-260(fp),r0
  4682. ashl #16,r0,-264(fp)
  4683. addl3 -264(fp),-268(fp),r0
  4684. bicl3 #0,r0,-268(fp)
  4685. cmpl -268(fp),-264(fp)
  4686. bgequ noname.466
  4687. incl -272(fp)
  4688. noname.466:
  4689. movl -268(fp),r3
  4690. movl -272(fp),r2
  4691. bbc #31,r2,noname.467
  4692. incl r9
  4693. noname.467:
  4694. addl2 r2,r2
  4695. bicl2 #0,r2
  4696. bbc #31,r3,noname.468
  4697. incl r2
  4698. noname.468:
  4699. addl2 r3,r3
  4700. bicl2 #0,r3
  4701. addl2 r3,r8
  4702. bicl2 #0,r8
  4703. cmpl r8,r3
  4704. bgequ noname.469
  4705. incl r2
  4706. bicl3 #0,r2,r0
  4707. bneq noname.469
  4708. incl r9
  4709. noname.469:
  4710. addl2 r2,r7
  4711. bicl2 #0,r7
  4712. cmpl r7,r2
  4713. bgequ noname.470
  4714. incl r9
  4715. noname.470:
  4716. movl 8(ap),r0
  4717. movzwl 18(r0),r2
  4718. bicl3 #-65536,12(r0),r3
  4719. movzwl 14(r0),r1
  4720. bicl2 #-65536,r1
  4721. bicl3 #-65536,16(r0),-284(fp)
  4722. bicl3 #-65536,r2,-288(fp)
  4723. mull3 r1,-284(fp),-276(fp)
  4724. mull2 r3,-284(fp)
  4725. mull3 r3,-288(fp),-280(fp)
  4726. mull2 r1,-288(fp)
  4727. addl3 -276(fp),-280(fp),r0
  4728. bicl3 #0,r0,-276(fp)
  4729. cmpl -276(fp),-280(fp)
  4730. bgequ noname.471
  4731. addl2 #65536,-288(fp)
  4732. noname.471:
  4733. movzwl -274(fp),r0
  4734. bicl2 #-65536,r0
  4735. addl2 r0,-288(fp)
  4736. bicl3 #-65536,-276(fp),r0
  4737. ashl #16,r0,-280(fp)
  4738. addl3 -280(fp),-284(fp),r0
  4739. bicl3 #0,r0,-284(fp)
  4740. cmpl -284(fp),-280(fp)
  4741. bgequ noname.472
  4742. incl -288(fp)
  4743. noname.472:
  4744. movl -284(fp),r3
  4745. movl -288(fp),r2
  4746. bbc #31,r2,noname.473
  4747. incl r9
  4748. noname.473:
  4749. addl2 r2,r2
  4750. bicl2 #0,r2
  4751. bbc #31,r3,noname.474
  4752. incl r2
  4753. noname.474:
  4754. addl2 r3,r3
  4755. bicl2 #0,r3
  4756. addl2 r3,r8
  4757. bicl2 #0,r8
  4758. cmpl r8,r3
  4759. bgequ noname.475
  4760. incl r2
  4761. bicl3 #0,r2,r0
  4762. bneq noname.475
  4763. incl r9
  4764. noname.475:
  4765. addl2 r2,r7
  4766. bicl2 #0,r7
  4767. cmpl r7,r2
  4768. bgequ noname.476
  4769. incl r9
  4770. noname.476:
  4771. movl 4(ap),r0
  4772. movl r8,28(r0)
  4773. clrl r8
  4774. movl 8(ap),r3
  4775. movl 16(r3),r4
  4776. bicl3 #-65536,r4,r5
  4777. extzv #16,#16,r4,r0
  4778. bicl3 #-65536,r0,r4
  4779. mull3 r5,r4,-292(fp)
  4780. mull2 r5,r5
  4781. mull2 r4,r4
  4782. bicl3 #32767,-292(fp),r0
  4783. extzv #15,#17,r0,r0
  4784. addl2 r0,r4
  4785. bicl3 #-65536,-292(fp),r0
  4786. ashl #17,r0,-292(fp)
  4787. addl2 -292(fp),r5
  4788. bicl2 #0,r5
  4789. cmpl r5,-292(fp)
  4790. bgequ noname.477
  4791. incl r4
  4792. noname.477:
  4793. movl r5,r1
  4794. movl r4,r2
  4795. addl2 r1,r7
  4796. bicl2 #0,r7
  4797. cmpl r7,r1
  4798. bgequ noname.478
  4799. incl r2
  4800. noname.478:
  4801. addl2 r2,r9
  4802. bicl2 #0,r9
  4803. cmpl r9,r2
  4804. bgequ noname.479
  4805. incl r8
  4806. noname.479:
  4807. bicl3 #-65536,20(r3),r4
  4808. movzwl 22(r3),r1
  4809. bicl2 #-65536,r1
  4810. bicl3 #-65536,12(r3),r2
  4811. movzwl 14(r3),r0
  4812. bicl2 #-65536,r0
  4813. movl r4,r6
  4814. movl r1,r5
  4815. mull3 r0,r6,-296(fp)
  4816. mull2 r2,r6
  4817. mull3 r2,r5,-300(fp)
  4818. mull2 r0,r5
  4819. addl3 -296(fp),-300(fp),r0
  4820. bicl3 #0,r0,-296(fp)
  4821. cmpl -296(fp),-300(fp)
  4822. bgequ noname.480
  4823. addl2 #65536,r5
  4824. noname.480:
  4825. movzwl -294(fp),r0
  4826. bicl2 #-65536,r0
  4827. addl2 r0,r5
  4828. bicl3 #-65536,-296(fp),r0
  4829. ashl #16,r0,-300(fp)
  4830. addl2 -300(fp),r6
  4831. bicl2 #0,r6
  4832. cmpl r6,-300(fp)
  4833. bgequ noname.481
  4834. incl r5
  4835. noname.481:
  4836. movl r6,r3
  4837. movl r5,r2
  4838. bbc #31,r2,noname.482
  4839. incl r8
  4840. noname.482:
  4841. addl2 r2,r2
  4842. bicl2 #0,r2
  4843. bbc #31,r3,noname.483
  4844. incl r2
  4845. noname.483:
  4846. addl2 r3,r3
  4847. bicl2 #0,r3
  4848. addl2 r3,r7
  4849. bicl2 #0,r7
  4850. cmpl r7,r3
  4851. bgequ noname.484
  4852. incl r2
  4853. bicl3 #0,r2,r0
  4854. bneq noname.484
  4855. incl r8
  4856. noname.484:
  4857. addl2 r2,r9
  4858. bicl2 #0,r9
  4859. cmpl r9,r2
  4860. bgequ noname.485
  4861. incl r8
  4862. noname.485:
  4863. movl 8(ap),r0
  4864. bicl3 #-65536,24(r0),r3
  4865. movzwl 26(r0),r1
  4866. bicl2 #-65536,r1
  4867. bicl3 #-65536,8(r0),r2
  4868. movzwl 10(r0),r0
  4869. bicl2 #-65536,r0
  4870. movl r3,r5
  4871. movl r1,r4
  4872. mull3 r0,r5,-304(fp)
  4873. mull2 r2,r5
  4874. mull3 r2,r4,-308(fp)
  4875. mull2 r0,r4
  4876. addl3 -304(fp),-308(fp),r0
  4877. bicl3 #0,r0,-304(fp)
  4878. cmpl -304(fp),-308(fp)
  4879. bgequ noname.486
  4880. addl2 #65536,r4
  4881. noname.486:
  4882. movzwl -302(fp),r0
  4883. bicl2 #-65536,r0
  4884. addl2 r0,r4
  4885. bicl3 #-65536,-304(fp),r0
  4886. ashl #16,r0,-308(fp)
  4887. addl2 -308(fp),r5
  4888. bicl2 #0,r5
  4889. cmpl r5,-308(fp)
  4890. bgequ noname.487
  4891. incl r4
  4892. noname.487:
  4893. movl r5,r3
  4894. movl r4,r2
  4895. bbc #31,r2,noname.488
  4896. incl r8
  4897. noname.488:
  4898. addl2 r2,r2
  4899. bicl2 #0,r2
  4900. bbc #31,r3,noname.489
  4901. incl r2
  4902. noname.489:
  4903. addl2 r3,r3
  4904. bicl2 #0,r3
  4905. addl2 r3,r7
  4906. bicl2 #0,r7
  4907. cmpl r7,r3
  4908. bgequ noname.490
  4909. incl r2
  4910. bicl3 #0,r2,r0
  4911. bneq noname.490
  4912. incl r8
  4913. noname.490:
  4914. addl2 r2,r9
  4915. bicl2 #0,r9
  4916. cmpl r9,r2
  4917. bgequ noname.491
  4918. incl r8
  4919. noname.491:
  4920. movl 8(ap),r0
  4921. bicl3 #-65536,28(r0),r3
  4922. movzwl 30(r0),r1
  4923. bicl2 #-65536,r1
  4924. bicl3 #-65536,4(r0),r2
  4925. movzwl 6(r0),r0
  4926. bicl2 #-65536,r0
  4927. movl r3,r5
  4928. movl r1,r4
  4929. mull3 r0,r5,-312(fp)
  4930. mull2 r2,r5
  4931. mull3 r2,r4,-316(fp)
  4932. mull2 r0,r4
  4933. addl3 -312(fp),-316(fp),r0
  4934. bicl3 #0,r0,-312(fp)
  4935. cmpl -312(fp),-316(fp)
  4936. bgequ noname.492
  4937. addl2 #65536,r4
  4938. noname.492:
  4939. movzwl -310(fp),r0
  4940. bicl2 #-65536,r0
  4941. addl2 r0,r4
  4942. bicl3 #-65536,-312(fp),r0
  4943. ashl #16,r0,-316(fp)
  4944. addl2 -316(fp),r5
  4945. bicl2 #0,r5
  4946. cmpl r5,-316(fp)
  4947. bgequ noname.493
  4948. incl r4
  4949. noname.493:
  4950. movl r5,r3
  4951. movl r4,r2
  4952. bbc #31,r2,noname.494
  4953. incl r8
  4954. noname.494:
  4955. addl2 r2,r2
  4956. bicl2 #0,r2
  4957. bbc #31,r3,noname.495
  4958. incl r2
  4959. noname.495:
  4960. addl2 r3,r3
  4961. bicl2 #0,r3
  4962. addl2 r3,r7
  4963. bicl2 #0,r7
  4964. cmpl r7,r3
  4965. bgequ noname.496
  4966. incl r2
  4967. bicl3 #0,r2,r0
  4968. bneq noname.496
  4969. incl r8
  4970. noname.496:
  4971. addl2 r2,r9
  4972. bicl2 #0,r9
  4973. cmpl r9,r2
  4974. bgequ noname.497
  4975. incl r8
  4976. noname.497:
  4977. movl 4(ap),r0
  4978. movl r7,32(r0)
  4979. clrl r7
  4980. movl 8(ap),r0
  4981. bicl3 #-65536,28(r0),r3
  4982. movzwl 30(r0),r2
  4983. bicl3 #-65536,8(r0),r1
  4984. movzwl 10(r0),r0
  4985. bicl2 #-65536,r0
  4986. movl r3,r4
  4987. bicl3 #-65536,r2,-328(fp)
  4988. mull3 r0,r4,-320(fp)
  4989. mull2 r1,r4
  4990. mull3 r1,-328(fp),-324(fp)
  4991. mull2 r0,-328(fp)
  4992. addl3 -320(fp),-324(fp),r0
  4993. bicl3 #0,r0,-320(fp)
  4994. cmpl -320(fp),-324(fp)
  4995. bgequ noname.498
  4996. addl2 #65536,-328(fp)
  4997. noname.498:
  4998. movzwl -318(fp),r0
  4999. bicl2 #-65536,r0
  5000. addl2 r0,-328(fp)
  5001. bicl3 #-65536,-320(fp),r0
  5002. ashl #16,r0,-324(fp)
  5003. addl2 -324(fp),r4
  5004. bicl2 #0,r4
  5005. cmpl r4,-324(fp)
  5006. bgequ noname.499
  5007. incl -328(fp)
  5008. noname.499:
  5009. movl r4,r3
  5010. movl -328(fp),r2
  5011. bbc #31,r2,noname.500
  5012. incl r7
  5013. noname.500:
  5014. addl2 r2,r2
  5015. bicl2 #0,r2
  5016. bbc #31,r3,noname.501
  5017. incl r2
  5018. noname.501:
  5019. addl2 r3,r3
  5020. bicl2 #0,r3
  5021. addl2 r3,r9
  5022. bicl2 #0,r9
  5023. cmpl r9,r3
  5024. bgequ noname.502
  5025. incl r2
  5026. bicl3 #0,r2,r0
  5027. bneq noname.502
  5028. incl r7
  5029. noname.502:
  5030. addl2 r2,r8
  5031. bicl2 #0,r8
  5032. cmpl r8,r2
  5033. bgequ noname.503
  5034. incl r7
  5035. noname.503:
  5036. movl 8(ap),r0
  5037. movzwl 26(r0),r2
  5038. bicl3 #-65536,12(r0),r3
  5039. movzwl 14(r0),r1
  5040. bicl2 #-65536,r1
  5041. bicl3 #-65536,24(r0),-340(fp)
  5042. bicl3 #-65536,r2,-344(fp)
  5043. mull3 r1,-340(fp),-332(fp)
  5044. mull2 r3,-340(fp)
  5045. mull3 r3,-344(fp),-336(fp)
  5046. mull2 r1,-344(fp)
  5047. addl3 -332(fp),-336(fp),r0
  5048. bicl3 #0,r0,-332(fp)
  5049. cmpl -332(fp),-336(fp)
  5050. bgequ noname.504
  5051. addl2 #65536,-344(fp)
  5052. noname.504:
  5053. movzwl -330(fp),r0
  5054. bicl2 #-65536,r0
  5055. addl2 r0,-344(fp)
  5056. bicl3 #-65536,-332(fp),r0
  5057. ashl #16,r0,-336(fp)
  5058. addl3 -336(fp),-340(fp),r0
  5059. bicl3 #0,r0,-340(fp)
  5060. cmpl -340(fp),-336(fp)
  5061. bgequ noname.505
  5062. incl -344(fp)
  5063. noname.505:
  5064. movl -340(fp),r3
  5065. movl -344(fp),r2
  5066. bbc #31,r2,noname.506
  5067. incl r7
  5068. noname.506:
  5069. addl2 r2,r2
  5070. bicl2 #0,r2
  5071. bbc #31,r3,noname.507
  5072. incl r2
  5073. noname.507:
  5074. addl2 r3,r3
  5075. bicl2 #0,r3
  5076. addl2 r3,r9
  5077. bicl2 #0,r9
  5078. cmpl r9,r3
  5079. bgequ noname.508
  5080. incl r2
  5081. bicl3 #0,r2,r0
  5082. bneq noname.508
  5083. incl r7
  5084. noname.508:
  5085. addl2 r2,r8
  5086. bicl2 #0,r8
  5087. cmpl r8,r2
  5088. bgequ noname.509
  5089. incl r7
  5090. noname.509:
  5091. movl 8(ap),r0
  5092. movzwl 22(r0),r2
  5093. bicl3 #-65536,16(r0),r3
  5094. movzwl 18(r0),r1
  5095. bicl2 #-65536,r1
  5096. bicl3 #-65536,20(r0),-356(fp)
  5097. bicl3 #-65536,r2,-360(fp)
  5098. mull3 r1,-356(fp),-348(fp)
  5099. mull2 r3,-356(fp)
  5100. mull3 r3,-360(fp),-352(fp)
  5101. mull2 r1,-360(fp)
  5102. addl3 -348(fp),-352(fp),r0
  5103. bicl3 #0,r0,-348(fp)
  5104. cmpl -348(fp),-352(fp)
  5105. bgequ noname.510
  5106. addl2 #65536,-360(fp)
  5107. noname.510:
  5108. movzwl -346(fp),r0
  5109. bicl2 #-65536,r0
  5110. addl2 r0,-360(fp)
  5111. bicl3 #-65536,-348(fp),r0
  5112. ashl #16,r0,-352(fp)
  5113. addl3 -352(fp),-356(fp),r0
  5114. bicl3 #0,r0,-356(fp)
  5115. cmpl -356(fp),-352(fp)
  5116. bgequ noname.511
  5117. incl -360(fp)
  5118. noname.511:
  5119. movl -356(fp),r3
  5120. movl -360(fp),r2
  5121. bbc #31,r2,noname.512
  5122. incl r7
  5123. noname.512:
  5124. addl2 r2,r2
  5125. bicl2 #0,r2
  5126. bbc #31,r3,noname.513
  5127. incl r2
  5128. noname.513:
  5129. addl2 r3,r3
  5130. bicl2 #0,r3
  5131. addl2 r3,r9
  5132. bicl2 #0,r9
  5133. cmpl r9,r3
  5134. bgequ noname.514
  5135. incl r2
  5136. bicl3 #0,r2,r0
  5137. bneq noname.514
  5138. incl r7
  5139. noname.514:
  5140. addl2 r2,r8
  5141. bicl2 #0,r8
  5142. cmpl r8,r2
  5143. bgequ noname.515
  5144. incl r7
  5145. noname.515:
  5146. movl 4(ap),r0
  5147. movl r9,36(r0)
  5148. clrl r9
  5149. movl 8(ap),r3
  5150. movl 20(r3),r4
  5151. bicl3 #-65536,r4,-364(fp)
  5152. extzv #16,#16,r4,r0
  5153. bicl3 #-65536,r0,r4
  5154. movl -364(fp),r0
  5155. mull3 r0,r4,-368(fp)
  5156. mull3 r0,r0,-364(fp)
  5157. mull2 r4,r4
  5158. bicl3 #32767,-368(fp),r0
  5159. extzv #15,#17,r0,r0
  5160. addl2 r0,r4
  5161. bicl3 #-65536,-368(fp),r0
  5162. ashl #17,r0,-368(fp)
  5163. addl3 -364(fp),-368(fp),r0
  5164. bicl3 #0,r0,-364(fp)
  5165. cmpl -364(fp),-368(fp)
  5166. bgequ noname.516
  5167. incl r4
  5168. noname.516:
  5169. movl -364(fp),r1
  5170. movl r4,r2
  5171. addl2 r1,r8
  5172. bicl2 #0,r8
  5173. cmpl r8,r1
  5174. bgequ noname.517
  5175. incl r2
  5176. noname.517:
  5177. addl2 r2,r7
  5178. bicl2 #0,r7
  5179. cmpl r7,r2
  5180. bgequ noname.518
  5181. incl r9
  5182. noname.518:
  5183. bicl3 #-65536,24(r3),r4
  5184. movzwl 26(r3),r1
  5185. bicl2 #-65536,r1
  5186. bicl3 #-65536,16(r3),r2
  5187. movzwl 18(r3),r0
  5188. bicl2 #-65536,r0
  5189. movl r4,r6
  5190. movl r1,r5
  5191. mull3 r0,r6,-372(fp)
  5192. mull2 r2,r6
  5193. mull3 r2,r5,-376(fp)
  5194. mull2 r0,r5
  5195. addl3 -372(fp),-376(fp),r0
  5196. bicl3 #0,r0,-372(fp)
  5197. cmpl -372(fp),-376(fp)
  5198. bgequ noname.519
  5199. addl2 #65536,r5
  5200. noname.519:
  5201. movzwl -370(fp),r0
  5202. bicl2 #-65536,r0
  5203. addl2 r0,r5
  5204. bicl3 #-65536,-372(fp),r0
  5205. ashl #16,r0,-376(fp)
  5206. addl2 -376(fp),r6
  5207. bicl2 #0,r6
  5208. cmpl r6,-376(fp)
  5209. bgequ noname.520
  5210. incl r5
  5211. noname.520:
  5212. movl r6,r3
  5213. movl r5,r2
  5214. bbc #31,r2,noname.521
  5215. incl r9
  5216. noname.521:
  5217. addl2 r2,r2
  5218. bicl2 #0,r2
  5219. bbc #31,r3,noname.522
  5220. incl r2
  5221. noname.522:
  5222. addl2 r3,r3
  5223. bicl2 #0,r3
  5224. addl2 r3,r8
  5225. bicl2 #0,r8
  5226. cmpl r8,r3
  5227. bgequ noname.523
  5228. incl r2
  5229. bicl3 #0,r2,r0
  5230. bneq noname.523
  5231. incl r9
  5232. noname.523:
  5233. addl2 r2,r7
  5234. bicl2 #0,r7
  5235. cmpl r7,r2
  5236. bgequ noname.524
  5237. incl r9
  5238. noname.524:
  5239. movl 8(ap),r0
  5240. bicl3 #-65536,28(r0),r3
  5241. movzwl 30(r0),r1
  5242. bicl2 #-65536,r1
  5243. bicl3 #-65536,12(r0),r2
  5244. movzwl 14(r0),r0
  5245. bicl2 #-65536,r0
  5246. movl r3,r5
  5247. movl r1,r4
  5248. mull3 r0,r5,-380(fp)
  5249. mull2 r2,r5
  5250. mull3 r2,r4,-384(fp)
  5251. mull2 r0,r4
  5252. addl3 -380(fp),-384(fp),r0
  5253. bicl3 #0,r0,-380(fp)
  5254. cmpl -380(fp),-384(fp)
  5255. bgequ noname.525
  5256. addl2 #65536,r4
  5257. noname.525:
  5258. movzwl -378(fp),r0
  5259. bicl2 #-65536,r0
  5260. addl2 r0,r4
  5261. bicl3 #-65536,-380(fp),r0
  5262. ashl #16,r0,-384(fp)
  5263. addl2 -384(fp),r5
  5264. bicl2 #0,r5
  5265. cmpl r5,-384(fp)
  5266. bgequ noname.526
  5267. incl r4
  5268. noname.526:
  5269. movl r5,r3
  5270. movl r4,r2
  5271. bbc #31,r2,noname.527
  5272. incl r9
  5273. noname.527:
  5274. addl2 r2,r2
  5275. bicl2 #0,r2
  5276. bbc #31,r3,noname.528
  5277. incl r2
  5278. noname.528:
  5279. addl2 r3,r3
  5280. bicl2 #0,r3
  5281. addl2 r3,r8
  5282. bicl2 #0,r8
  5283. cmpl r8,r3
  5284. bgequ noname.529
  5285. incl r2
  5286. bicl3 #0,r2,r0
  5287. bneq noname.529
  5288. incl r9
  5289. noname.529:
  5290. addl2 r2,r7
  5291. bicl2 #0,r7
  5292. cmpl r7,r2
  5293. bgequ noname.530
  5294. incl r9
  5295. noname.530:
  5296. movl 4(ap),r0
  5297. movl r8,40(r0)
  5298. clrl r8
  5299. movl 8(ap),r0
  5300. bicl3 #-65536,28(r0),r3
  5301. movzwl 30(r0),r1
  5302. bicl2 #-65536,r1
  5303. bicl3 #-65536,16(r0),r2
  5304. movzwl 18(r0),r0
  5305. bicl2 #-65536,r0
  5306. movl r3,r5
  5307. movl r1,r4
  5308. mull3 r0,r5,-388(fp)
  5309. mull2 r2,r5
  5310. mull3 r2,r4,-392(fp)
  5311. mull2 r0,r4
  5312. addl3 -388(fp),-392(fp),r0
  5313. bicl3 #0,r0,-388(fp)
  5314. cmpl -388(fp),-392(fp)
  5315. bgequ noname.531
  5316. addl2 #65536,r4
  5317. noname.531:
  5318. movzwl -386(fp),r0
  5319. bicl2 #-65536,r0
  5320. addl2 r0,r4
  5321. bicl3 #-65536,-388(fp),r0
  5322. ashl #16,r0,-392(fp)
  5323. addl2 -392(fp),r5
  5324. bicl2 #0,r5
  5325. cmpl r5,-392(fp)
  5326. bgequ noname.532
  5327. incl r4
  5328. noname.532:
  5329. movl r5,r3
  5330. movl r4,r2
  5331. bbc #31,r2,noname.533
  5332. incl r8
  5333. noname.533:
  5334. addl2 r2,r2
  5335. bicl2 #0,r2
  5336. bbc #31,r3,noname.534
  5337. incl r2
  5338. noname.534:
  5339. addl2 r3,r3
  5340. bicl2 #0,r3
  5341. addl2 r3,r7
  5342. bicl2 #0,r7
  5343. cmpl r7,r3
  5344. bgequ noname.535
  5345. incl r2
  5346. bicl3 #0,r2,r0
  5347. bneq noname.535
  5348. incl r8
  5349. noname.535:
  5350. addl2 r2,r9
  5351. bicl2 #0,r9
  5352. cmpl r9,r2
  5353. bgequ noname.536
  5354. incl r8
  5355. noname.536:
  5356. movl 8(ap),r0
  5357. bicl3 #-65536,24(r0),r3
  5358. movzwl 26(r0),r1
  5359. bicl2 #-65536,r1
  5360. bicl3 #-65536,20(r0),r2
  5361. movzwl 22(r0),r0
  5362. bicl2 #-65536,r0
  5363. movl r3,r5
  5364. movl r1,r4
  5365. mull3 r0,r5,-396(fp)
  5366. mull2 r2,r5
  5367. mull3 r2,r4,-400(fp)
  5368. mull2 r0,r4
  5369. addl3 -396(fp),-400(fp),r0
  5370. bicl3 #0,r0,-396(fp)
  5371. cmpl -396(fp),-400(fp)
  5372. bgequ noname.537
  5373. addl2 #65536,r4
  5374. noname.537:
  5375. movzwl -394(fp),r0
  5376. bicl2 #-65536,r0
  5377. addl2 r0,r4
  5378. bicl3 #-65536,-396(fp),r0
  5379. ashl #16,r0,-400(fp)
  5380. addl2 -400(fp),r5
  5381. bicl2 #0,r5
  5382. cmpl r5,-400(fp)
  5383. bgequ noname.538
  5384. incl r4
  5385. noname.538:
  5386. movl r5,r3
  5387. movl r4,r2
  5388. bbc #31,r2,noname.539
  5389. incl r8
  5390. noname.539:
  5391. addl2 r2,r2
  5392. bicl2 #0,r2
  5393. bbc #31,r3,noname.540
  5394. incl r2
  5395. noname.540:
  5396. addl2 r3,r3
  5397. bicl2 #0,r3
  5398. addl2 r3,r7
  5399. bicl2 #0,r7
  5400. cmpl r7,r3
  5401. bgequ noname.541
  5402. incl r2
  5403. bicl3 #0,r2,r0
  5404. bneq noname.541
  5405. incl r8
  5406. noname.541:
  5407. addl2 r2,r9
  5408. bicl2 #0,r9
  5409. cmpl r9,r2
  5410. bgequ noname.542
  5411. incl r8
  5412. noname.542:
  5413. movl 4(ap),r0
  5414. movl r7,44(r0)
  5415. clrl r7
  5416. movl 8(ap),r3
  5417. movl 24(r3),r4
  5418. bicl3 #-65536,r4,r5
  5419. extzv #16,#16,r4,r0
  5420. bicl3 #-65536,r0,r4
  5421. mull3 r5,r4,-404(fp)
  5422. mull2 r5,r5
  5423. mull2 r4,r4
  5424. bicl3 #32767,-404(fp),r0
  5425. extzv #15,#17,r0,r0
  5426. addl2 r0,r4
  5427. bicl3 #-65536,-404(fp),r0
  5428. ashl #17,r0,-404(fp)
  5429. addl2 -404(fp),r5
  5430. bicl2 #0,r5
  5431. cmpl r5,-404(fp)
  5432. bgequ noname.543
  5433. incl r4
  5434. noname.543:
  5435. movl r5,r1
  5436. movl r4,r2
  5437. addl2 r1,r9
  5438. bicl2 #0,r9
  5439. cmpl r9,r1
  5440. bgequ noname.544
  5441. incl r2
  5442. noname.544:
  5443. addl2 r2,r8
  5444. bicl2 #0,r8
  5445. cmpl r8,r2
  5446. bgequ noname.545
  5447. incl r7
  5448. noname.545:
  5449. movzwl 30(r3),r2
  5450. bicl3 #-65536,20(r3),r1
  5451. movzwl 22(r3),r0
  5452. bicl2 #-65536,r0
  5453. bicl3 #-65536,28(r3),-416(fp)
  5454. bicl3 #-65536,r2,-420(fp)
  5455. mull3 r0,-416(fp),-408(fp)
  5456. mull2 r1,-416(fp)
  5457. mull3 r1,-420(fp),-412(fp)
  5458. mull2 r0,-420(fp)
  5459. addl3 -408(fp),-412(fp),r0
  5460. bicl3 #0,r0,-408(fp)
  5461. cmpl -408(fp),-412(fp)
  5462. bgequ noname.546
  5463. addl2 #65536,-420(fp)
  5464. noname.546:
  5465. movzwl -406(fp),r0
  5466. bicl2 #-65536,r0
  5467. addl2 r0,-420(fp)
  5468. bicl3 #-65536,-408(fp),r0
  5469. ashl #16,r0,-412(fp)
  5470. addl3 -412(fp),-416(fp),r0
  5471. bicl3 #0,r0,-416(fp)
  5472. cmpl -416(fp),-412(fp)
  5473. bgequ noname.547
  5474. incl -420(fp)
  5475. noname.547:
  5476. movl -416(fp),r3
  5477. movl -420(fp),r2
  5478. bbc #31,r2,noname.548
  5479. incl r7
  5480. noname.548:
  5481. addl2 r2,r2
  5482. bicl2 #0,r2
  5483. bbc #31,r3,noname.549
  5484. incl r2
  5485. noname.549:
  5486. addl2 r3,r3
  5487. bicl2 #0,r3
  5488. addl2 r3,r9
  5489. bicl2 #0,r9
  5490. cmpl r9,r3
  5491. bgequ noname.550
  5492. incl r2
  5493. bicl3 #0,r2,r0
  5494. bneq noname.550
  5495. incl r7
  5496. noname.550:
  5497. addl2 r2,r8
  5498. bicl2 #0,r8
  5499. cmpl r8,r2
  5500. bgequ noname.551
  5501. incl r7
  5502. noname.551:
  5503. movl 4(ap),r0
  5504. movl r9,48(r0)
  5505. clrl r9
  5506. movl 8(ap),r0
  5507. movzwl 30(r0),r2
  5508. bicl3 #-65536,24(r0),r3
  5509. movzwl 26(r0),r1
  5510. bicl2 #-65536,r1
  5511. bicl3 #-65536,28(r0),-432(fp)
  5512. bicl3 #-65536,r2,-436(fp)
  5513. mull3 r1,-432(fp),-424(fp)
  5514. mull2 r3,-432(fp)
  5515. mull3 r3,-436(fp),-428(fp)
  5516. mull2 r1,-436(fp)
  5517. addl3 -424(fp),-428(fp),r0
  5518. bicl3 #0,r0,-424(fp)
  5519. cmpl -424(fp),-428(fp)
  5520. bgequ noname.552
  5521. addl2 #65536,-436(fp)
  5522. noname.552:
  5523. movzwl -422(fp),r0
  5524. bicl2 #-65536,r0
  5525. addl2 r0,-436(fp)
  5526. bicl3 #-65536,-424(fp),r0
  5527. ashl #16,r0,-428(fp)
  5528. addl3 -428(fp),-432(fp),r0
  5529. bicl3 #0,r0,-432(fp)
  5530. cmpl -432(fp),-428(fp)
  5531. bgequ noname.553
  5532. incl -436(fp)
  5533. noname.553:
  5534. movl -432(fp),r3
  5535. movl -436(fp),r2
  5536. bbc #31,r2,noname.554
  5537. incl r9
  5538. noname.554:
  5539. addl2 r2,r2
  5540. bicl2 #0,r2
  5541. bbc #31,r3,noname.555
  5542. incl r2
  5543. noname.555:
  5544. addl2 r3,r3
  5545. bicl2 #0,r3
  5546. addl2 r3,r8
  5547. bicl2 #0,r8
  5548. cmpl r8,r3
  5549. bgequ noname.556
  5550. incl r2
  5551. bicl3 #0,r2,r0
  5552. bneq noname.556
  5553. incl r9
  5554. noname.556:
  5555. addl2 r2,r7
  5556. bicl2 #0,r7
  5557. cmpl r7,r2
  5558. bgequ noname.557
  5559. incl r9
  5560. noname.557:
  5561. movl 4(ap),r4
  5562. movl r8,52(r4)
  5563. clrl r8
  5564. movl 8(ap),r0
  5565. movl 28(r0),r3
  5566. bicl3 #-65536,r3,-440(fp)
  5567. extzv #16,#16,r3,r0
  5568. bicl3 #-65536,r0,r3
  5569. movl -440(fp),r0
  5570. mull3 r0,r3,-444(fp)
  5571. mull3 r0,r0,-440(fp)
  5572. mull2 r3,r3
  5573. bicl3 #32767,-444(fp),r0
  5574. extzv #15,#17,r0,r0
  5575. addl2 r0,r3
  5576. bicl3 #-65536,-444(fp),r0
  5577. ashl #17,r0,-444(fp)
  5578. addl3 -440(fp),-444(fp),r0
  5579. bicl3 #0,r0,-440(fp)
  5580. cmpl -440(fp),-444(fp)
  5581. bgequ noname.558
  5582. incl r3
  5583. noname.558:
  5584. movl -440(fp),r1
  5585. movl r3,r2
  5586. addl2 r1,r7
  5587. bicl2 #0,r7
  5588. cmpl r7,r1
  5589. bgequ noname.559
  5590. incl r2
  5591. noname.559:
  5592. addl2 r2,r9
  5593. bicl2 #0,r9
  5594. cmpl r9,r2
  5595. bgequ noname.560
  5596. incl r8
  5597. noname.560:
  5598. movl r7,56(r4)
  5599. movl r9,60(r4)
  5600. ret
  5601. ;r=4 ;(AP)
  5602. ;a=8 ;(AP)
  5603. ;b=12 ;(AP)
  5604. ;n=16 ;(AP) n by value (input)
  5605. .psect code,nowrt
  5606. .entry BN_SQR_COMBA4,^m<r2,r3,r4,r5,r6,r7,r8,r9,r10>
  5607. subl2 #44,sp
  5608. clrq r8
  5609. clrl r10
  5610. movl 8(ap),r5
  5611. movl (r5),r3
  5612. bicl3 #-65536,r3,r4
  5613. extzv #16,#16,r3,r0
  5614. bicl3 #-65536,r0,r3
  5615. mull3 r4,r3,-4(fp)
  5616. mull2 r4,r4
  5617. mull2 r3,r3
  5618. bicl3 #32767,-4(fp),r0
  5619. extzv #15,#17,r0,r0
  5620. addl2 r0,r3
  5621. bicl3 #-65536,-4(fp),r0
  5622. ashl #17,r0,-4(fp)
  5623. addl2 -4(fp),r4
  5624. bicl2 #0,r4
  5625. cmpl r4,-4(fp)
  5626. bgequ noname.563
  5627. incl r3
  5628. noname.563:
  5629. movl r4,r1
  5630. movl r3,r2
  5631. addl2 r1,r9
  5632. bicl2 #0,r9
  5633. cmpl r9,r1
  5634. bgequ noname.564
  5635. incl r2
  5636. noname.564:
  5637. addl2 r2,r8
  5638. bicl2 #0,r8
  5639. cmpl r8,r2
  5640. bgequ noname.565
  5641. incl r10
  5642. noname.565:
  5643. movl r9,@4(ap)
  5644. clrl r9
  5645. bicl3 #-65536,4(r5),r3
  5646. movzwl 6(r5),r1
  5647. bicl2 #-65536,r1
  5648. bicl3 #-65536,(r5),r2
  5649. movzwl 2(r5),r0
  5650. bicl2 #-65536,r0
  5651. movl r3,r6
  5652. movl r1,r4
  5653. mull3 r0,r6,-8(fp)
  5654. mull2 r2,r6
  5655. mull2 r4,r2
  5656. mull2 r0,r4
  5657. addl3 -8(fp),r2,r0
  5658. bicl3 #0,r0,-8(fp)
  5659. cmpl -8(fp),r2
  5660. bgequ noname.566
  5661. addl2 #65536,r4
  5662. noname.566:
  5663. movzwl -6(fp),r0
  5664. bicl2 #-65536,r0
  5665. addl2 r0,r4
  5666. bicl3 #-65536,-8(fp),r0
  5667. ashl #16,r0,r1
  5668. addl2 r1,r6
  5669. bicl2 #0,r6
  5670. cmpl r6,r1
  5671. bgequ noname.567
  5672. incl r4
  5673. noname.567:
  5674. movl r6,r3
  5675. movl r4,r2
  5676. bbc #31,r2,noname.568
  5677. incl r9
  5678. noname.568:
  5679. addl2 r2,r2
  5680. bicl2 #0,r2
  5681. bbc #31,r3,noname.569
  5682. incl r2
  5683. noname.569:
  5684. addl2 r3,r3
  5685. bicl2 #0,r3
  5686. addl2 r3,r8
  5687. bicl2 #0,r8
  5688. cmpl r8,r3
  5689. bgequ noname.570
  5690. incl r2
  5691. bicl3 #0,r2,r0
  5692. bneq noname.570
  5693. incl r9
  5694. noname.570:
  5695. addl2 r2,r10
  5696. bicl2 #0,r10
  5697. cmpl r10,r2
  5698. bgequ noname.571
  5699. incl r9
  5700. noname.571:
  5701. movl 4(ap),r0
  5702. movl r8,4(r0)
  5703. clrl r8
  5704. movl 8(ap),r4
  5705. movl 4(r4),r3
  5706. bicl3 #-65536,r3,r5
  5707. extzv #16,#16,r3,r0
  5708. bicl3 #-65536,r0,r3
  5709. mull3 r5,r3,r1
  5710. mull2 r5,r5
  5711. mull2 r3,r3
  5712. bicl3 #32767,r1,r0
  5713. extzv #15,#17,r0,r0
  5714. addl2 r0,r3
  5715. bicl2 #-65536,r1
  5716. ashl #17,r1,r1
  5717. addl2 r1,r5
  5718. bicl2 #0,r5
  5719. cmpl r5,r1
  5720. bgequ noname.572
  5721. incl r3
  5722. noname.572:
  5723. movl r5,r1
  5724. movl r3,r2
  5725. addl2 r1,r10
  5726. bicl2 #0,r10
  5727. cmpl r10,r1
  5728. bgequ noname.573
  5729. incl r2
  5730. noname.573:
  5731. addl2 r2,r9
  5732. bicl2 #0,r9
  5733. cmpl r9,r2
  5734. bgequ noname.574
  5735. incl r8
  5736. noname.574:
  5737. bicl3 #-65536,8(r4),r3
  5738. movzwl 10(r4),r1
  5739. bicl2 #-65536,r1
  5740. bicl3 #-65536,(r4),r2
  5741. movzwl 2(r4),r0
  5742. bicl2 #-65536,r0
  5743. movl r3,r6
  5744. movl r1,r5
  5745. mull3 r0,r6,r7
  5746. mull2 r2,r6
  5747. mull2 r5,r2
  5748. mull2 r0,r5
  5749. addl2 r2,r7
  5750. bicl2 #0,r7
  5751. cmpl r7,r2
  5752. bgequ noname.575
  5753. addl2 #65536,r5
  5754. noname.575:
  5755. extzv #16,#16,r7,r0
  5756. bicl2 #-65536,r0
  5757. addl2 r0,r5
  5758. bicl3 #-65536,r7,r0
  5759. ashl #16,r0,r1
  5760. addl2 r1,r6
  5761. bicl2 #0,r6
  5762. cmpl r6,r1
  5763. bgequ noname.576
  5764. incl r5
  5765. noname.576:
  5766. movl r6,r3
  5767. movl r5,r2
  5768. bbc #31,r2,noname.577
  5769. incl r8
  5770. noname.577:
  5771. addl2 r2,r2
  5772. bicl2 #0,r2
  5773. bbc #31,r3,noname.578
  5774. incl r2
  5775. noname.578:
  5776. addl2 r3,r3
  5777. bicl2 #0,r3
  5778. addl2 r3,r10
  5779. bicl2 #0,r10
  5780. cmpl r10,r3
  5781. bgequ noname.579
  5782. incl r2
  5783. bicl3 #0,r2,r0
  5784. bneq noname.579
  5785. incl r8
  5786. noname.579:
  5787. addl2 r2,r9
  5788. bicl2 #0,r9
  5789. cmpl r9,r2
  5790. bgequ noname.580
  5791. incl r8
  5792. noname.580:
  5793. movl 4(ap),r0
  5794. movl r10,8(r0)
  5795. clrl r10
  5796. movl 8(ap),r0
  5797. bicl3 #-65536,12(r0),r3
  5798. movzwl 14(r0),r1
  5799. bicl2 #-65536,r1
  5800. bicl3 #-65536,(r0),r2
  5801. movzwl 2(r0),r0
  5802. bicl2 #-65536,r0
  5803. movl r3,r5
  5804. movl r1,r4
  5805. mull3 r0,r5,r6
  5806. mull2 r2,r5
  5807. mull3 r2,r4,-12(fp)
  5808. mull2 r0,r4
  5809. addl2 -12(fp),r6
  5810. bicl2 #0,r6
  5811. cmpl r6,-12(fp)
  5812. bgequ noname.581
  5813. addl2 #65536,r4
  5814. noname.581:
  5815. extzv #16,#16,r6,r0
  5816. bicl2 #-65536,r0
  5817. addl2 r0,r4
  5818. bicl3 #-65536,r6,r0
  5819. ashl #16,r0,-12(fp)
  5820. addl2 -12(fp),r5
  5821. bicl2 #0,r5
  5822. cmpl r5,-12(fp)
  5823. bgequ noname.582
  5824. incl r4
  5825. noname.582:
  5826. movl r5,r3
  5827. movl r4,r2
  5828. bbc #31,r2,noname.583
  5829. incl r10
  5830. noname.583:
  5831. addl2 r2,r2
  5832. bicl2 #0,r2
  5833. bbc #31,r3,noname.584
  5834. incl r2
  5835. noname.584:
  5836. addl2 r3,r3
  5837. bicl2 #0,r3
  5838. addl2 r3,r9
  5839. bicl2 #0,r9
  5840. cmpl r9,r3
  5841. bgequ noname.585
  5842. incl r2
  5843. bicl3 #0,r2,r0
  5844. bneq noname.585
  5845. incl r10
  5846. noname.585:
  5847. addl2 r2,r8
  5848. bicl2 #0,r8
  5849. cmpl r8,r2
  5850. bgequ noname.586
  5851. incl r10
  5852. noname.586:
  5853. movl 8(ap),r0
  5854. bicl3 #-65536,8(r0),r3
  5855. movzwl 10(r0),r1
  5856. bicl2 #-65536,r1
  5857. bicl3 #-65536,4(r0),r2
  5858. movzwl 6(r0),r0
  5859. bicl2 #-65536,r0
  5860. movl r3,r5
  5861. movl r1,r4
  5862. mull3 r0,r5,-16(fp)
  5863. mull2 r2,r5
  5864. mull3 r2,r4,-20(fp)
  5865. mull2 r0,r4
  5866. addl3 -16(fp),-20(fp),r0
  5867. bicl3 #0,r0,-16(fp)
  5868. cmpl -16(fp),-20(fp)
  5869. bgequ noname.587
  5870. addl2 #65536,r4
  5871. noname.587:
  5872. movzwl -14(fp),r0
  5873. bicl2 #-65536,r0
  5874. addl2 r0,r4
  5875. bicl3 #-65536,-16(fp),r0
  5876. ashl #16,r0,-20(fp)
  5877. addl2 -20(fp),r5
  5878. bicl2 #0,r5
  5879. cmpl r5,-20(fp)
  5880. bgequ noname.588
  5881. incl r4
  5882. noname.588:
  5883. movl r5,r3
  5884. movl r4,r2
  5885. bbc #31,r2,noname.589
  5886. incl r10
  5887. noname.589:
  5888. addl2 r2,r2
  5889. bicl2 #0,r2
  5890. bbc #31,r3,noname.590
  5891. incl r2
  5892. noname.590:
  5893. addl2 r3,r3
  5894. bicl2 #0,r3
  5895. addl2 r3,r9
  5896. bicl2 #0,r9
  5897. cmpl r9,r3
  5898. bgequ noname.591
  5899. incl r2
  5900. bicl3 #0,r2,r0
  5901. bneq noname.591
  5902. incl r10
  5903. noname.591:
  5904. addl2 r2,r8
  5905. bicl2 #0,r8
  5906. cmpl r8,r2
  5907. bgequ noname.592
  5908. incl r10
  5909. noname.592:
  5910. movl 4(ap),r0
  5911. movl r9,12(r0)
  5912. clrl r9
  5913. movl 8(ap),r3
  5914. movl 8(r3),r4
  5915. bicl3 #-65536,r4,r5
  5916. extzv #16,#16,r4,r0
  5917. bicl3 #-65536,r0,r4
  5918. mull3 r5,r4,-24(fp)
  5919. mull2 r5,r5
  5920. mull2 r4,r4
  5921. bicl3 #32767,-24(fp),r0
  5922. extzv #15,#17,r0,r0
  5923. addl2 r0,r4
  5924. bicl3 #-65536,-24(fp),r0
  5925. ashl #17,r0,-24(fp)
  5926. addl2 -24(fp),r5
  5927. bicl2 #0,r5
  5928. cmpl r5,-24(fp)
  5929. bgequ noname.593
  5930. incl r4
  5931. noname.593:
  5932. movl r5,r1
  5933. movl r4,r2
  5934. addl2 r1,r8
  5935. bicl2 #0,r8
  5936. cmpl r8,r1
  5937. bgequ noname.594
  5938. incl r2
  5939. noname.594:
  5940. addl2 r2,r10
  5941. bicl2 #0,r10
  5942. cmpl r10,r2
  5943. bgequ noname.595
  5944. incl r9
  5945. noname.595:
  5946. bicl3 #-65536,12(r3),r4
  5947. movzwl 14(r3),r1
  5948. bicl2 #-65536,r1
  5949. bicl3 #-65536,4(r3),r2
  5950. movzwl 6(r3),r0
  5951. bicl2 #-65536,r0
  5952. movl r4,r6
  5953. movl r1,r5
  5954. mull3 r0,r6,-28(fp)
  5955. mull2 r2,r6
  5956. mull3 r2,r5,-32(fp)
  5957. mull2 r0,r5
  5958. addl3 -28(fp),-32(fp),r0
  5959. bicl3 #0,r0,-28(fp)
  5960. cmpl -28(fp),-32(fp)
  5961. bgequ noname.596
  5962. addl2 #65536,r5
  5963. noname.596:
  5964. movzwl -26(fp),r0
  5965. bicl2 #-65536,r0
  5966. addl2 r0,r5
  5967. bicl3 #-65536,-28(fp),r0
  5968. ashl #16,r0,-32(fp)
  5969. addl2 -32(fp),r6
  5970. bicl2 #0,r6
  5971. cmpl r6,-32(fp)
  5972. bgequ noname.597
  5973. incl r5
  5974. noname.597:
  5975. movl r6,r3
  5976. movl r5,r2
  5977. bbc #31,r2,noname.598
  5978. incl r9
  5979. noname.598:
  5980. addl2 r2,r2
  5981. bicl2 #0,r2
  5982. bbc #31,r3,noname.599
  5983. incl r2
  5984. noname.599:
  5985. addl2 r3,r3
  5986. bicl2 #0,r3
  5987. addl2 r3,r8
  5988. bicl2 #0,r8
  5989. cmpl r8,r3
  5990. bgequ noname.600
  5991. incl r2
  5992. bicl3 #0,r2,r0
  5993. bneq noname.600
  5994. incl r9
  5995. noname.600:
  5996. addl2 r2,r10
  5997. bicl2 #0,r10
  5998. cmpl r10,r2
  5999. bgequ noname.601
  6000. incl r9
  6001. noname.601:
  6002. movl 4(ap),r0
  6003. movl r8,16(r0)
  6004. clrl r8
  6005. movl 8(ap),r0
  6006. bicl3 #-65536,12(r0),r3
  6007. movzwl 14(r0),r1
  6008. bicl2 #-65536,r1
  6009. bicl3 #-65536,8(r0),r2
  6010. movzwl 10(r0),r0
  6011. bicl2 #-65536,r0
  6012. movl r3,r5
  6013. movl r1,r4
  6014. mull3 r0,r5,-36(fp)
  6015. mull2 r2,r5
  6016. mull3 r2,r4,-40(fp)
  6017. mull2 r0,r4
  6018. addl3 -36(fp),-40(fp),r0
  6019. bicl3 #0,r0,-36(fp)
  6020. cmpl -36(fp),-40(fp)
  6021. bgequ noname.602
  6022. addl2 #65536,r4
  6023. noname.602:
  6024. movzwl -34(fp),r0
  6025. bicl2 #-65536,r0
  6026. addl2 r0,r4
  6027. bicl3 #-65536,-36(fp),r0
  6028. ashl #16,r0,-40(fp)
  6029. addl2 -40(fp),r5
  6030. bicl2 #0,r5
  6031. cmpl r5,-40(fp)
  6032. bgequ noname.603
  6033. incl r4
  6034. noname.603:
  6035. movl r5,r3
  6036. movl r4,r2
  6037. bbc #31,r2,noname.604
  6038. incl r8
  6039. noname.604:
  6040. addl2 r2,r2
  6041. bicl2 #0,r2
  6042. bbc #31,r3,noname.605
  6043. incl r2
  6044. noname.605:
  6045. addl2 r3,r3
  6046. bicl2 #0,r3
  6047. addl2 r3,r10
  6048. bicl2 #0,r10
  6049. cmpl r10,r3
  6050. bgequ noname.606
  6051. incl r2
  6052. bicl3 #0,r2,r0
  6053. bneq noname.606
  6054. incl r8
  6055. noname.606:
  6056. addl2 r2,r9
  6057. bicl2 #0,r9
  6058. cmpl r9,r2
  6059. bgequ noname.607
  6060. incl r8
  6061. noname.607:
  6062. movl 4(ap),r4
  6063. movl r10,20(r4)
  6064. clrl r10
  6065. movl 8(ap),r0
  6066. movl 12(r0),r3
  6067. bicl3 #-65536,r3,r5
  6068. extzv #16,#16,r3,r0
  6069. bicl3 #-65536,r0,r3
  6070. mull3 r5,r3,-44(fp)
  6071. mull2 r5,r5
  6072. mull2 r3,r3
  6073. bicl3 #32767,-44(fp),r0
  6074. extzv #15,#17,r0,r0
  6075. addl2 r0,r3
  6076. bicl3 #-65536,-44(fp),r0
  6077. ashl #17,r0,-44(fp)
  6078. addl2 -44(fp),r5
  6079. bicl2 #0,r5
  6080. cmpl r5,-44(fp)
  6081. bgequ noname.608
  6082. incl r3
  6083. noname.608:
  6084. movl r5,r1
  6085. movl r3,r2
  6086. addl2 r1,r9
  6087. bicl2 #0,r9
  6088. cmpl r9,r1
  6089. bgequ noname.609
  6090. incl r2
  6091. noname.609:
  6092. addl2 r2,r8
  6093. bicl2 #0,r8
  6094. cmpl r8,r2
  6095. bgequ noname.610
  6096. incl r10
  6097. noname.610:
  6098. movl r9,24(r4)
  6099. movl r8,28(r4)
  6100. ret
  6101. ; For now, the code below doesn't work, so I end this prematurely.
  6102. .end