vms.mar 107 KB

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