|
123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751752753754755756757758759760761762763764765766767768769770771772773774775776777778779780781782783784785786787788789790791792793794795796797798799800801802803804805806807808809810811812813814815816817818819820821822823824825826827828829830831832833834835836837838839840841842843844845846847848849850851852853854855856857858859860861862863864865866867868869870871872873874875876877878879880881882883884885886887888889890891892893894895896897898899900901902903904905906907908909910911912913914915916917918919920921922923924925926927928929930931932933934935936937938939940941942943944945946947948949950951952953954955956957958959960961962963964965966967968969970971972973974975976977978979980981982983984985986987988989990991992993994995996997998999100010011002100310041005100610071008100910101011101210131014101510161017101810191020102110221023102410251026102710281029103010311032103310341035103610371038103910401041104210431044104510461047104810491050105110521053105410551056105710581059106010611062106310641065106610671068106910701071107210731074107510761077107810791080108110821083108410851086108710881089109010911092109310941095109610971098109911001101110211031104110511061107110811091110111111121113111411151116111711181119112011211122112311241125112611271128112911301131113211331134113511361137113811391140114111421143114411451146114711481149115011511152115311541155115611571158115911601161116211631164116511661167116811691170117111721173117411751176117711781179118011811182118311841185118611871188118911901191119211931194119511961197119811991200120112021203120412051206120712081209121012111212121312141215121612171218121912201221122212231224122512261227122812291230123112321233123412351236123712381239124012411242124312441245124612471248124912501251125212531254125512561257125812591260126112621263126412651266126712681269127012711272127312741275127612771278127912801281128212831284128512861287128812891290129112921293129412951296129712981299130013011302130313041305130613071308130913101311131213131314131513161317131813191320132113221323132413251326132713281329133013311332133313341335133613371338133913401341134213431344134513461347134813491350135113521353135413551356135713581359136013611362136313641365136613671368136913701371137213731374137513761377137813791380138113821383138413851386138713881389139013911392139313941395139613971398139914001401140214031404140514061407140814091410141114121413141414151416141714181419142014211422142314241425142614271428142914301431143214331434143514361437143814391440144114421443144414451446144714481449145014511452145314541455145614571458145914601461146214631464146514661467146814691470147114721473147414751476147714781479148014811482148314841485148614871488148914901491149214931494149514961497149814991500150115021503150415051506150715081509151015111512151315141515151615171518151915201521152215231524152515261527152815291530153115321533153415351536153715381539154015411542154315441545154615471548154915501551155215531554155515561557155815591560156115621563156415651566156715681569157015711572157315741575157615771578157915801581158215831584158515861587158815891590159115921593159415951596159715981599160016011602160316041605160616071608160916101611161216131614161516161617161816191620162116221623162416251626162716281629163016311632163316341635163616371638163916401641164216431644164516461647164816491650165116521653165416551656165716581659166016611662166316641665166616671668166916701671167216731674167516761677167816791680168116821683168416851686168716881689169016911692169316941695169616971698169917001701170217031704170517061707170817091710171117121713171417151716171717181719172017211722172317241725172617271728172917301731173217331734173517361737173817391740174117421743174417451746174717481749175017511752175317541755175617571758175917601761176217631764176517661767176817691770177117721773177417751776177717781779178017811782178317841785178617871788178917901791179217931794179517961797179817991800180118021803180418051806180718081809181018111812181318141815181618171818181918201821182218231824182518261827182818291830183118321833183418351836183718381839184018411842184318441845184618471848184918501851185218531854185518561857185818591860186118621863186418651866186718681869187018711872187318741875187618771878187918801881188218831884188518861887188818891890189118921893189418951896189718981899190019011902190319041905190619071908190919101911191219131914191519161917191819191920192119221923192419251926192719281929193019311932193319341935193619371938193919401941194219431944194519461947194819491950195119521953195419551956195719581959196019611962196319641965196619671968196919701971197219731974197519761977197819791980198119821983198419851986198719881989199019911992199319941995199619971998199920002001200220032004200520062007200820092010201120122013201420152016201720182019202020212022202320242025202620272028202920302031203220332034203520362037203820392040204120422043204420452046204720482049205020512052205320542055205620572058205920602061206220632064206520662067206820692070207120722073207420752076207720782079208020812082208320842085208620872088208920902091209220932094209520962097209820992100210121022103210421052106210721082109211021112112211321142115211621172118211921202121212221232124212521262127212821292130213121322133213421352136213721382139214021412142214321442145214621472148214921502151215221532154215521562157215821592160216121622163216421652166216721682169217021712172217321742175217621772178217921802181218221832184218521862187218821892190219121922193219421952196219721982199220022012202220322042205220622072208220922102211221222132214221522162217221822192220222122222223222422252226222722282229223022312232223322342235223622372238223922402241224222432244224522462247224822492250225122522253225422552256225722582259226022612262226322642265226622672268226922702271227222732274227522762277227822792280228122822283228422852286228722882289229022912292229322942295229622972298229923002301230223032304230523062307230823092310231123122313231423152316231723182319232023212322232323242325232623272328232923302331233223332334233523362337233823392340234123422343234423452346234723482349235023512352235323542355235623572358235923602361236223632364236523662367236823692370237123722373237423752376237723782379238023812382238323842385238623872388238923902391239223932394239523962397239823992400240124022403240424052406240724082409241024112412241324142415241624172418241924202421242224232424242524262427242824292430243124322433243424352436243724382439244024412442244324442445244624472448244924502451245224532454245524562457245824592460246124622463246424652466246724682469247024712472247324742475247624772478247924802481248224832484248524862487248824892490249124922493249424952496249724982499250025012502250325042505250625072508250925102511251225132514251525162517251825192520252125222523252425252526252725282529253025312532253325342535253625372538253925402541254225432544254525462547254825492550255125522553255425552556255725582559256025612562256325642565256625672568256925702571257225732574257525762577257825792580258125822583258425852586258725882589259025912592259325942595259625972598259926002601260226032604260526062607260826092610261126122613261426152616261726182619262026212622262326242625262626272628262926302631263226332634263526362637263826392640264126422643264426452646264726482649265026512652265326542655265626572658265926602661266226632664266526662667266826692670267126722673267426752676267726782679268026812682268326842685268626872688268926902691269226932694269526962697269826992700270127022703270427052706270727082709271027112712271327142715271627172718271927202721272227232724272527262727272827292730273127322733273427352736273727382739274027412742274327442745274627472748274927502751275227532754275527562757275827592760276127622763276427652766276727682769277027712772277327742775277627772778277927802781278227832784278527862787278827892790279127922793279427952796279727982799280028012802280328042805280628072808280928102811281228132814281528162817281828192820282128222823282428252826282728282829283028312832283328342835283628372838283928402841284228432844284528462847284828492850285128522853285428552856285728582859286028612862286328642865286628672868286928702871287228732874287528762877287828792880288128822883288428852886288728882889289028912892289328942895289628972898289929002901290229032904290529062907290829092910291129122913291429152916291729182919292029212922292329242925292629272928292929302931293229332934293529362937293829392940294129422943294429452946294729482949295029512952295329542955295629572958295929602961296229632964296529662967296829692970297129722973297429752976297729782979298029812982298329842985298629872988298929902991299229932994299529962997299829993000300130023003300430053006300730083009301030113012301330143015301630173018301930203021302230233024302530263027302830293030303130323033303430353036303730383039304030413042304330443045304630473048304930503051305230533054305530563057305830593060306130623063306430653066306730683069307030713072307330743075307630773078307930803081308230833084308530863087308830893090309130923093309430953096309730983099310031013102310331043105310631073108310931103111311231133114311531163117311831193120312131223123312431253126312731283129313031313132313331343135313631373138313931403141314231433144314531463147314831493150315131523153315431553156315731583159316031613162316331643165316631673168316931703171317231733174317531763177317831793180318131823183318431853186318731883189319031913192319331943195319631973198319932003201320232033204320532063207320832093210321132123213321432153216321732183219322032213222322332243225322632273228322932303231323232333234323532363237323832393240324132423243324432453246324732483249325032513252325332543255325632573258325932603261326232633264326532663267326832693270327132723273327432753276327732783279328032813282328332843285328632873288328932903291329232933294329532963297329832993300330133023303330433053306330733083309331033113312331333143315331633173318331933203321332233233324332533263327332833293330333133323333333433353336333733383339334033413342334333443345334633473348334933503351335233533354335533563357335833593360336133623363336433653366336733683369337033713372337333743375337633773378337933803381338233833384338533863387338833893390339133923393339433953396339733983399340034013402340334043405340634073408340934103411341234133414341534163417341834193420342134223423342434253426342734283429343034313432343334343435343634373438343934403441344234433444344534463447344834493450345134523453345434553456345734583459346034613462346334643465346634673468346934703471347234733474347534763477347834793480348134823483348434853486348734883489349034913492349334943495349634973498349935003501350235033504350535063507350835093510351135123513351435153516351735183519352035213522352335243525352635273528352935303531353235333534353535363537353835393540354135423543354435453546354735483549355035513552355335543555355635573558355935603561356235633564356535663567356835693570357135723573357435753576357735783579358035813582358335843585358635873588358935903591359235933594359535963597359835993600360136023603360436053606360736083609361036113612361336143615361636173618361936203621362236233624362536263627362836293630363136323633363436353636363736383639364036413642364336443645364636473648364936503651365236533654365536563657365836593660366136623663366436653666366736683669367036713672367336743675367636773678367936803681368236833684368536863687368836893690369136923693369436953696369736983699370037013702370337043705370637073708370937103711371237133714371537163717371837193720372137223723372437253726372737283729373037313732373337343735373637373738373937403741374237433744374537463747374837493750375137523753375437553756375737583759376037613762376337643765376637673768376937703771377237733774377537763777377837793780378137823783378437853786378737883789379037913792379337943795379637973798379938003801380238033804380538063807380838093810381138123813381438153816381738183819382038213822382338243825382638273828382938303831383238333834383538363837383838393840384138423843384438453846384738483849385038513852385338543855385638573858385938603861386238633864386538663867386838693870387138723873387438753876387738783879388038813882388338843885388638873888388938903891389238933894389538963897389838993900390139023903390439053906390739083909391039113912391339143915391639173918391939203921392239233924392539263927392839293930393139323933393439353936393739383939394039413942394339443945394639473948394939503951395239533954395539563957395839593960396139623963396439653966396739683969397039713972397339743975397639773978397939803981398239833984398539863987398839893990399139923993399439953996399739983999400040014002400340044005400640074008400940104011401240134014401540164017401840194020402140224023402440254026402740284029403040314032403340344035403640374038403940404041404240434044404540464047404840494050405140524053405440554056405740584059406040614062406340644065406640674068406940704071407240734074407540764077407840794080408140824083408440854086408740884089409040914092409340944095409640974098409941004101410241034104410541064107410841094110411141124113411441154116411741184119412041214122412341244125412641274128412941304131413241334134413541364137413841394140414141424143414441454146414741484149415041514152415341544155415641574158415941604161416241634164416541664167416841694170417141724173417441754176417741784179418041814182418341844185418641874188418941904191419241934194419541964197419841994200420142024203420442054206420742084209421042114212421342144215421642174218421942204221422242234224422542264227422842294230423142324233423442354236423742384239424042414242424342444245424642474248424942504251425242534254425542564257425842594260426142624263426442654266426742684269427042714272427342744275427642774278427942804281428242834284428542864287428842894290429142924293429442954296429742984299430043014302430343044305430643074308430943104311431243134314431543164317431843194320432143224323432443254326432743284329433043314332433343344335433643374338433943404341434243434344434543464347434843494350435143524353435443554356435743584359436043614362436343644365436643674368436943704371437243734374437543764377437843794380438143824383438443854386438743884389439043914392439343944395439643974398439944004401440244034404440544064407440844094410441144124413441444154416441744184419442044214422 |
- /*********************************************************************/
- /* Copyright 2009, 2010 The University of Texas at Austin. */
- /* All rights reserved. */
- /* */
- /* Redistribution and use in source and binary forms, with or */
- /* without modification, are permitted provided that the following */
- /* conditions are met: */
- /* */
- /* 1. Redistributions of source code must retain the above */
- /* copyright notice, this list of conditions and the following */
- /* disclaimer. */
- /* */
- /* 2. Redistributions in binary form must reproduce the above */
- /* copyright notice, this list of conditions and the following */
- /* disclaimer in the documentation and/or other materials */
- /* provided with the distribution. */
- /* */
- /* THIS SOFTWARE IS PROVIDED BY THE UNIVERSITY OF TEXAS AT */
- /* AUSTIN ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, */
- /* INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF */
- /* MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE */
- /* DISCLAIMED. IN NO EVENT SHALL THE UNIVERSITY OF TEXAS AT */
- /* AUSTIN OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, */
- /* INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES */
- /* (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE */
- /* GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR */
- /* BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF */
- /* LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT */
- /* (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT */
- /* OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE */
- /* POSSIBILITY OF SUCH DAMAGE. */
- /* */
- /* The views and conclusions contained in the software and */
- /* documentation are those of the authors and should not be */
- /* interpreted as representing official policies, either expressed */
- /* or implied, of The University of Texas at Austin. */
- /*********************************************************************/
-
- #define ASSEMBLER
- #include "common.h"
- #include "l2param.h"
-
- #if GEMV_UNROLL < 2
- #undef GEMV_UNROLL
- #define GEMV_UNROLL 2
- #endif
-
- #ifndef WINDOWS_ABI
-
- #define STACKSIZE 128
-
- #define OLD_INCX 8 + STACKSIZE(%rsp)
- #define OLD_Y 16 + STACKSIZE(%rsp)
- #define OLD_INCY 24 + STACKSIZE(%rsp)
- #define OLD_BUFFER 32 + STACKSIZE(%rsp)
- #define ALPHA 48 (%rsp)
- #define MMM 64(%rsp)
- #define NN 72(%rsp)
- #define AA 80(%rsp)
- #define LDAX 88(%rsp)
- #define ALPHAR 96(%rsp)
- #define ALPHAI 104(%rsp)
-
- #define M %rdi
- #define N %rsi
- #define A %rcx
- #define LDA %r8
- #define X %r9
- #define INCX %rdx
- #define Y %rbp
- #define INCY %r10
-
- #else
-
- #define STACKSIZE 288
-
- #define OLD_ALPHA_I 40 + STACKSIZE(%rsp)
- #define OLD_A 48 + STACKSIZE(%rsp)
- #define OLD_LDA 56 + STACKSIZE(%rsp)
- #define OLD_X 64 + STACKSIZE(%rsp)
- #define OLD_INCX 72 + STACKSIZE(%rsp)
- #define OLD_Y 80 + STACKSIZE(%rsp)
- #define OLD_INCY 88 + STACKSIZE(%rsp)
- #define OLD_BUFFER 96 + STACKSIZE(%rsp)
- #define ALPHA 224 (%rsp)
-
- #define MMM 232(%rsp)
- #define NN 240(%rsp)
- #define AA 248(%rsp)
- #define LDAX 256(%rsp)
- #define ALPHAR 264(%rsp)
- #define ALPHAI 272(%rsp)
-
- #define M %rcx
- #define N %rdx
- #define A %r8
- #define LDA %r9
- #define X %rdi
- #define INCX %rsi
- #define Y %rbp
- #define INCY %r10
-
- #endif
-
- #define I %rax
- #define A1 %r11
- #define A2 %r12
-
- #define X1 %rbx
- #define Y1 %r13
- #define BUFFER %r14
-
- #ifdef ALIGNED_ACCESS
- #define MM %r15
- #else
- #define MM M
- #endif
-
- #undef SUBPS
-
- #ifndef CONJ
- #define SUBPS addps
- #else
- #define SUBPS subps
- #endif
-
- PROLOGUE
- PROFCODE
-
- subq $STACKSIZE, %rsp
- movq %rbx, 0(%rsp)
- movq %rbp, 8(%rsp)
- movq %r12, 16(%rsp)
- movq %r13, 24(%rsp)
- movq %r14, 32(%rsp)
- movq %r15, 40(%rsp)
-
- #ifdef WINDOWS_ABI
- movq %rdi, 48(%rsp)
- movq %rsi, 56(%rsp)
- movups %xmm6, 64(%rsp)
- movups %xmm7, 80(%rsp)
- movups %xmm8, 96(%rsp)
- movups %xmm9, 112(%rsp)
- movups %xmm10, 128(%rsp)
- movups %xmm11, 144(%rsp)
- movups %xmm12, 160(%rsp)
- movups %xmm13, 176(%rsp)
- movups %xmm14, 192(%rsp)
- movups %xmm15, 208(%rsp)
-
- movq OLD_A, A
- movq OLD_LDA, LDA
- movq OLD_X, X
-
- movaps %xmm3, %xmm0
- movss OLD_ALPHA_I, %xmm1
- #endif
-
- movq A, AA
- movq N, NN
- movq M, MMM
- movq LDA, LDAX
- movss %xmm0,ALPHAR
- movss %xmm1,ALPHAI
-
- .L0t:
- xorq I,I
- addq $1,I
- salq $20,I
- subq I,MMM
- movq I,M
- movss ALPHAR,%xmm0
- movss ALPHAI,%xmm1
- jge .L00t
-
- movq MMM,M
- addq I,M
- jle .L999x
-
- .L00t:
- movq AA, A
- movq NN, N
- movq LDAX, LDA
-
- movq OLD_INCX, INCX
- movq OLD_Y, Y
- movq OLD_INCY, INCY
- movq OLD_BUFFER, BUFFER
-
- salq $ZBASE_SHIFT, LDA
- salq $ZBASE_SHIFT, INCX
- salq $ZBASE_SHIFT, INCY
-
- unpcklps %xmm1, %xmm0
-
- movlps %xmm0, ALPHA
-
- testq M, M
- jle .L999
- testq N, N
- jle .L999
-
- subq $-32 * SIZE, A
-
- movq BUFFER, X1
-
- #ifdef ALIGNED_ACCESS
- movq M, MM
- movq A, %rax
- andq $4 * SIZE - 1, %rax
- cmpq $2 * SIZE, %rax
-
- jl .L0X
-
- movsd (X), %xmm0
- addq INCX, X
- movlps %xmm0, 2 * SIZE(X1)
-
- addq $2 * SIZE, BUFFER
- addq $4 * SIZE, X1
- decq MM
-
- .L0X:
- #endif
-
- movq MM, I
- sarq $3, I
- jle .L05
- ALIGN_4
-
- .L02:
- movsd (X), %xmm0
- addq INCX, X
- movhps (X), %xmm0
- addq INCX, X
-
- movsd (X), %xmm1
- addq INCX, X
- movhps (X), %xmm1
- addq INCX, X
-
- movsd (X), %xmm2
- addq INCX, X
- movhps (X), %xmm2
- addq INCX, X
-
- movsd (X), %xmm3
- addq INCX, X
- movhps (X), %xmm3
- addq INCX, X
-
- movaps %xmm0, 0 * SIZE(X1)
- movaps %xmm1, 4 * SIZE(X1)
- movaps %xmm2, 8 * SIZE(X1)
- movaps %xmm3, 12 * SIZE(X1)
-
- addq $16 * SIZE, X1
- decq I
- jg .L02
- ALIGN_4
-
- .L05:
- movq MM, I
- andq $7, I
- jle .L10
- ALIGN_2
-
- .L06:
- movsd (X), %xmm0
- addq INCX, X
- movlps %xmm0, 0 * SIZE(X1)
- addq $2 * SIZE, X1
- decq I
- jg .L06
- ALIGN_4
-
- .L10:
- movq Y, Y1
-
- #ifdef ALIGNED_ACCESS
- testq $SIZE, A
- jne .L200
-
- testq $2 * SIZE, LDA
- jne .L100
- #endif
-
- #if GEMV_UNROLL >= 4
- cmpq $4, N
- jl .L20
- ALIGN_3
-
- .L11:
- subq $4, N
-
- leaq 32 * SIZE(BUFFER), X1
-
- movq A, A1
- leaq (A1, LDA, 2), A2
- leaq (A1, LDA, 4), A
-
- xorps %xmm0, %xmm0
- xorps %xmm1, %xmm1
- xorps %xmm2, %xmm2
- xorps %xmm3, %xmm3
- xorps %xmm4, %xmm4
- xorps %xmm5, %xmm5
- xorps %xmm6, %xmm6
- xorps %xmm7, %xmm7
-
- #ifdef ALIGNED_ACCESS
- cmpq M, MM
- je .L1X
-
- #ifdef movsd
- xorps %xmm8, %xmm8
- #endif
- movsd -32 * SIZE(A1), %xmm8
- #ifdef movsd
- xorps %xmm9, %xmm9
- #endif
- movsd -32 * SIZE(A1, LDA), %xmm9
- #ifdef movsd
- xorps %xmm10, %xmm10
- #endif
- movsd -32 * SIZE(A2), %xmm10
- #ifdef movsd
- xorps %xmm11, %xmm11
- #endif
- movsd -32 * SIZE(A2, LDA), %xmm11
-
- #ifdef movsd
- xorps %xmm12, %xmm12
- #endif
- movsd -32 * SIZE(X1), %xmm12
-
- pshufd $0xb1, %xmm8, %xmm14
- mulps %xmm12, %xmm8
- addps %xmm8, %xmm0
- pshufd $0xb1, %xmm9, %xmm15
- mulps %xmm12, %xmm9
- addps %xmm9, %xmm2
-
- mulps %xmm12, %xmm14
- SUBPS %xmm14, %xmm1
- mulps %xmm12, %xmm15
- SUBPS %xmm15, %xmm3
-
- pshufd $0xb1, %xmm10, %xmm14
- mulps %xmm12, %xmm10
- addps %xmm10, %xmm4
- pshufd $0xb1, %xmm11, %xmm15
- mulps %xmm12, %xmm11
- addps %xmm11, %xmm6
-
- mulps %xmm12, %xmm14
- SUBPS %xmm14, %xmm5
- mulps %xmm12, %xmm15
- SUBPS %xmm15, %xmm7
-
- addq $2 * SIZE, A1
- addq $2 * SIZE, A2
- addq $2 * SIZE, X1
- ALIGN_3
- .L1X:
- #endif
-
- movaps -32 * SIZE(X1), %xmm12
- movaps -28 * SIZE(X1), %xmm13
-
- #ifdef PREFETCHW
- PREFETCHW 7 * SIZE(Y1)
- #endif
-
- movq MM, I
- sarq $3, I
- jle .L15
-
- MOVUPS_A1(-32 * SIZE, A1, %xmm8)
- MOVUPS_A2(-32 * SIZE, A1, LDA, 1, %xmm9)
- MOVUPS_A1(-32 * SIZE, A2, %xmm10)
- MOVUPS_A2(-32 * SIZE, A2, LDA, 1, %xmm11)
-
- decq I
- jle .L14
- ALIGN_3
-
- .L13:
- #ifdef PREFETCH
- PREFETCH (PREFETCHSIZE) - 128 + PREOFFSET(A1)
- #endif
-
- pshufd $0xb1, %xmm8, %xmm14
- mulps %xmm12, %xmm8
- addps %xmm8, %xmm0
- MOVUPS_A1(-28 * SIZE, A1, %xmm8)
- pshufd $0xb1, %xmm9, %xmm15
- mulps %xmm12, %xmm9
- addps %xmm9, %xmm2
- MOVUPS_A2(-28 * SIZE, A1, LDA, 1, %xmm9)
-
- mulps %xmm12, %xmm14
- SUBPS %xmm14, %xmm1
- mulps %xmm12, %xmm15
- SUBPS %xmm15, %xmm3
-
- pshufd $0xb1, %xmm10, %xmm14
- mulps %xmm12, %xmm10
- addps %xmm10, %xmm4
- MOVUPS_A1(-28 * SIZE, A2, %xmm10)
- pshufd $0xb1, %xmm11, %xmm15
- mulps %xmm12, %xmm11
- addps %xmm11, %xmm6
- MOVUPS_A2(-28 * SIZE, A2, LDA, 1, %xmm11)
-
- mulps %xmm12, %xmm14
- SUBPS %xmm14, %xmm5
- mulps %xmm12, %xmm15
- movaps -24 * SIZE(X1), %xmm12
- SUBPS %xmm15, %xmm7
-
- #ifdef PREFETCH
- PREFETCH (PREFETCHSIZE) - 128 + PREOFFSET(A1, LDA)
- #endif
-
- pshufd $0xb1, %xmm8, %xmm14
- mulps %xmm13, %xmm8
- addps %xmm8, %xmm0
- MOVUPS_A1(-24 * SIZE, A1, %xmm8)
- pshufd $0xb1, %xmm9, %xmm15
- mulps %xmm13, %xmm9
- addps %xmm9, %xmm2
- MOVUPS_A2(-24 * SIZE, A1, LDA, 1, %xmm9)
-
- mulps %xmm13, %xmm14
- SUBPS %xmm14, %xmm1
- mulps %xmm13, %xmm15
- SUBPS %xmm15, %xmm3
-
- pshufd $0xb1, %xmm10, %xmm14
- mulps %xmm13, %xmm10
- addps %xmm10, %xmm4
- MOVUPS_A1(-24 * SIZE, A2, %xmm10)
- pshufd $0xb1, %xmm11, %xmm15
- mulps %xmm13, %xmm11
- addps %xmm11, %xmm6
- MOVUPS_A2(-24 * SIZE, A2, LDA, 1, %xmm11)
-
- mulps %xmm13, %xmm14
- SUBPS %xmm14, %xmm5
- mulps %xmm13, %xmm15
- movaps -20 * SIZE(X1), %xmm13
- SUBPS %xmm15, %xmm7
-
- #ifdef PREFETCH
- PREFETCH (PREFETCHSIZE) - 128 + PREOFFSET(A2)
- #endif
-
- pshufd $0xb1, %xmm8, %xmm14
- mulps %xmm12, %xmm8
- addps %xmm8, %xmm0
- MOVUPS_A1(-20 * SIZE, A1, %xmm8)
- pshufd $0xb1, %xmm9, %xmm15
- mulps %xmm12, %xmm9
- addps %xmm9, %xmm2
- MOVUPS_A2(-20 * SIZE, A1, LDA, 1, %xmm9)
-
- mulps %xmm12, %xmm14
- SUBPS %xmm14, %xmm1
- mulps %xmm12, %xmm15
- SUBPS %xmm15, %xmm3
-
- pshufd $0xb1, %xmm10, %xmm14
- mulps %xmm12, %xmm10
- addps %xmm10, %xmm4
- MOVUPS_A1(-20 * SIZE, A2, %xmm10)
- pshufd $0xb1, %xmm11, %xmm15
- mulps %xmm12, %xmm11
- addps %xmm11, %xmm6
- MOVUPS_A2(-20 * SIZE, A2, LDA, 1, %xmm11)
-
- mulps %xmm12, %xmm14
- SUBPS %xmm14, %xmm5
- mulps %xmm12, %xmm15
- movaps -16 * SIZE(X1), %xmm12
- SUBPS %xmm15, %xmm7
-
- #ifdef PREFETCH
- PREFETCH (PREFETCHSIZE) - 128 + PREOFFSET(A2, LDA)
- #endif
-
- pshufd $0xb1, %xmm8, %xmm14
- mulps %xmm13, %xmm8
- addps %xmm8, %xmm0
- MOVUPS_A1(-16 * SIZE, A1, %xmm8)
- pshufd $0xb1, %xmm9, %xmm15
- mulps %xmm13, %xmm9
- addps %xmm9, %xmm2
- MOVUPS_A2(-16 * SIZE, A1, LDA, 1, %xmm9)
-
- mulps %xmm13, %xmm14
- SUBPS %xmm14, %xmm1
- mulps %xmm13, %xmm15
- SUBPS %xmm15, %xmm3
-
- #ifdef PREFETCHW
- PREFETCH (PREFETCHSIZE) - 128 + PREOFFSET(X1)
- #endif
-
- pshufd $0xb1, %xmm10, %xmm14
- mulps %xmm13, %xmm10
- addps %xmm10, %xmm4
- MOVUPS_A1(-16 * SIZE, A2, %xmm10)
- pshufd $0xb1, %xmm11, %xmm15
- mulps %xmm13, %xmm11
- addps %xmm11, %xmm6
- MOVUPS_A2(-16 * SIZE, A2, LDA, 1, %xmm11)
-
- mulps %xmm13, %xmm14
- SUBPS %xmm14, %xmm5
- mulps %xmm13, %xmm15
- movaps -12 * SIZE(X1), %xmm13
- SUBPS %xmm15, %xmm7
-
- subq $-16 * SIZE, A1
- subq $-16 * SIZE, A2
- subq $-16 * SIZE, X1
-
- subq $1, I
- BRANCH
- jg .L13
- ALIGN_3
-
- .L14:
- pshufd $0xb1, %xmm8, %xmm14
- mulps %xmm12, %xmm8
- addps %xmm8, %xmm0
- MOVUPS_A1(-28 * SIZE, A1, %xmm8)
- pshufd $0xb1, %xmm9, %xmm15
- mulps %xmm12, %xmm9
- addps %xmm9, %xmm2
- MOVUPS_A2(-28 * SIZE, A1, LDA, 1, %xmm9)
-
- mulps %xmm12, %xmm14
- SUBPS %xmm14, %xmm1
- mulps %xmm12, %xmm15
- SUBPS %xmm15, %xmm3
-
- pshufd $0xb1, %xmm10, %xmm14
- mulps %xmm12, %xmm10
- addps %xmm10, %xmm4
- MOVUPS_A1(-28 * SIZE, A2, %xmm10)
- pshufd $0xb1, %xmm11, %xmm15
- mulps %xmm12, %xmm11
- addps %xmm11, %xmm6
- MOVUPS_A2(-28 * SIZE, A2, LDA, 1, %xmm11)
-
- mulps %xmm12, %xmm14
- SUBPS %xmm14, %xmm5
- mulps %xmm12, %xmm15
- movaps -24 * SIZE(X1), %xmm12
- SUBPS %xmm15, %xmm7
-
- pshufd $0xb1, %xmm8, %xmm14
- mulps %xmm13, %xmm8
- addps %xmm8, %xmm0
- MOVUPS_A1(-24 * SIZE, A1, %xmm8)
- pshufd $0xb1, %xmm9, %xmm15
- mulps %xmm13, %xmm9
- addps %xmm9, %xmm2
- MOVUPS_A2(-24 * SIZE, A1, LDA, 1, %xmm9)
-
- mulps %xmm13, %xmm14
- SUBPS %xmm14, %xmm1
- mulps %xmm13, %xmm15
- SUBPS %xmm15, %xmm3
-
- pshufd $0xb1, %xmm10, %xmm14
- mulps %xmm13, %xmm10
- addps %xmm10, %xmm4
- MOVUPS_A1(-24 * SIZE, A2, %xmm10)
- pshufd $0xb1, %xmm11, %xmm15
- mulps %xmm13, %xmm11
- addps %xmm11, %xmm6
- MOVUPS_A2(-24 * SIZE, A2, LDA, 1, %xmm11)
-
- mulps %xmm13, %xmm14
- SUBPS %xmm14, %xmm5
- mulps %xmm13, %xmm15
- movaps -20 * SIZE(X1), %xmm13
- SUBPS %xmm15, %xmm7
-
- pshufd $0xb1, %xmm8, %xmm14
- mulps %xmm12, %xmm8
- addps %xmm8, %xmm0
- MOVUPS_A1(-20 * SIZE, A1, %xmm8)
- pshufd $0xb1, %xmm9, %xmm15
- mulps %xmm12, %xmm9
- addps %xmm9, %xmm2
- MOVUPS_A2(-20 * SIZE, A1, LDA, 1, %xmm9)
-
- mulps %xmm12, %xmm14
- SUBPS %xmm14, %xmm1
- mulps %xmm12, %xmm15
- SUBPS %xmm15, %xmm3
-
- pshufd $0xb1, %xmm10, %xmm14
- mulps %xmm12, %xmm10
- addps %xmm10, %xmm4
- MOVUPS_A1(-20 * SIZE, A2, %xmm10)
- pshufd $0xb1, %xmm11, %xmm15
- mulps %xmm12, %xmm11
- addps %xmm11, %xmm6
- MOVUPS_A2(-20 * SIZE, A2, LDA, 1, %xmm11)
-
- mulps %xmm12, %xmm14
- SUBPS %xmm14, %xmm5
- mulps %xmm12, %xmm15
- movaps -16 * SIZE(X1), %xmm12
- SUBPS %xmm15, %xmm7
-
- pshufd $0xb1, %xmm8, %xmm14
- mulps %xmm13, %xmm8
- addps %xmm8, %xmm0
- pshufd $0xb1, %xmm9, %xmm15
- mulps %xmm13, %xmm9
- addps %xmm9, %xmm2
-
- mulps %xmm13, %xmm14
- SUBPS %xmm14, %xmm1
- mulps %xmm13, %xmm15
- SUBPS %xmm15, %xmm3
-
- pshufd $0xb1, %xmm10, %xmm14
- mulps %xmm13, %xmm10
- addps %xmm10, %xmm4
- pshufd $0xb1, %xmm11, %xmm15
- mulps %xmm13, %xmm11
- addps %xmm11, %xmm6
-
- mulps %xmm13, %xmm14
- SUBPS %xmm14, %xmm5
- mulps %xmm13, %xmm15
- movaps -12 * SIZE(X1), %xmm13
- SUBPS %xmm15, %xmm7
-
- subq $-16 * SIZE, A1
- subq $-16 * SIZE, A2
- subq $-16 * SIZE, X1
- ALIGN_3
-
- .L15:
- testq $4, MM
- je .L17
-
- MOVUPS_A1(-32 * SIZE, A1, %xmm8)
- MOVUPS_A2(-32 * SIZE, A1, LDA, 1, %xmm9)
- MOVUPS_A1(-32 * SIZE, A2, %xmm10)
- MOVUPS_A2(-32 * SIZE, A2, LDA, 1, %xmm11)
-
- pshufd $0xb1, %xmm8, %xmm14
- mulps %xmm12, %xmm8
- addps %xmm8, %xmm0
- MOVUPS_A1(-28 * SIZE, A1, %xmm8)
- pshufd $0xb1, %xmm9, %xmm15
- mulps %xmm12, %xmm9
- addps %xmm9, %xmm2
- MOVUPS_A2(-28 * SIZE, A1, LDA, 1, %xmm9)
-
- mulps %xmm12, %xmm14
- SUBPS %xmm14, %xmm1
- mulps %xmm12, %xmm15
- SUBPS %xmm15, %xmm3
-
- pshufd $0xb1, %xmm10, %xmm14
- mulps %xmm12, %xmm10
- addps %xmm10, %xmm4
- MOVUPS_A1(-28 * SIZE, A2, %xmm10)
- pshufd $0xb1, %xmm11, %xmm15
- mulps %xmm12, %xmm11
- addps %xmm11, %xmm6
- MOVUPS_A2(-28 * SIZE, A2, LDA, 1, %xmm11)
-
- mulps %xmm12, %xmm14
- SUBPS %xmm14, %xmm5
- mulps %xmm12, %xmm15
- movaps -24 * SIZE(X1), %xmm12
- SUBPS %xmm15, %xmm7
-
- pshufd $0xb1, %xmm8, %xmm14
- mulps %xmm13, %xmm8
- addps %xmm8, %xmm0
- pshufd $0xb1, %xmm9, %xmm15
- mulps %xmm13, %xmm9
- addps %xmm9, %xmm2
-
- mulps %xmm13, %xmm14
- SUBPS %xmm14, %xmm1
- mulps %xmm13, %xmm15
- SUBPS %xmm15, %xmm3
-
- pshufd $0xb1, %xmm10, %xmm14
- mulps %xmm13, %xmm10
- addps %xmm10, %xmm4
- pshufd $0xb1, %xmm11, %xmm15
- mulps %xmm13, %xmm11
- addps %xmm11, %xmm6
-
- mulps %xmm13, %xmm14
- SUBPS %xmm14, %xmm5
- mulps %xmm13, %xmm15
- movaps -20 * SIZE(X1), %xmm13
- SUBPS %xmm15, %xmm7
-
- addq $8 * SIZE, A1
- addq $8 * SIZE, A2
- addq $8 * SIZE, X1
- ALIGN_3
-
- .L17:
- testq $2, MM
- je .L18
-
- MOVUPS_A1(-32 * SIZE, A1, %xmm8)
- MOVUPS_A2(-32 * SIZE, A1, LDA, 1, %xmm9)
- MOVUPS_A1(-32 * SIZE, A2, %xmm10)
- MOVUPS_A2(-32 * SIZE, A2, LDA, 1, %xmm11)
-
- pshufd $0xb1, %xmm8, %xmm14
- mulps %xmm12, %xmm8
- addps %xmm8, %xmm0
- pshufd $0xb1, %xmm9, %xmm15
- mulps %xmm12, %xmm9
- addps %xmm9, %xmm2
-
- mulps %xmm12, %xmm14
- SUBPS %xmm14, %xmm1
- mulps %xmm12, %xmm15
- SUBPS %xmm15, %xmm3
-
- pshufd $0xb1, %xmm10, %xmm14
- mulps %xmm12, %xmm10
- addps %xmm10, %xmm4
- pshufd $0xb1, %xmm11, %xmm15
- mulps %xmm12, %xmm11
- addps %xmm11, %xmm6
-
- mulps %xmm12, %xmm14
- SUBPS %xmm14, %xmm5
- mulps %xmm12, %xmm15
- SUBPS %xmm15, %xmm7
-
- movaps %xmm13, %xmm12
-
- addq $4 * SIZE, A1
- addq $4 * SIZE, A2
- ALIGN_3
-
- .L18:
- testq $1, MM
- je .L19
-
- #ifdef movsd
- xorps %xmm8, %xmm8
- #endif
- movsd -32 * SIZE(A1), %xmm8
- #ifdef movsd
- xorps %xmm9, %xmm9
- #endif
- movsd -32 * SIZE(A1, LDA), %xmm9
- #ifdef movsd
- xorps %xmm10, %xmm10
- #endif
- movsd -32 * SIZE(A2), %xmm10
- #ifdef movsd
- xorps %xmm11, %xmm11
- #endif
- movsd -32 * SIZE(A2, LDA), %xmm11
-
- pshufd $0xb1, %xmm8, %xmm14
- mulps %xmm12, %xmm8
- addps %xmm8, %xmm0
- pshufd $0xb1, %xmm9, %xmm15
- mulps %xmm12, %xmm9
- addps %xmm9, %xmm2
-
- mulps %xmm12, %xmm14
- SUBPS %xmm14, %xmm1
- mulps %xmm12, %xmm15
- SUBPS %xmm15, %xmm3
-
- pshufd $0xb1, %xmm10, %xmm14
- mulps %xmm12, %xmm10
- addps %xmm10, %xmm4
- pshufd $0xb1, %xmm11, %xmm15
- mulps %xmm12, %xmm11
- addps %xmm11, %xmm6
-
- mulps %xmm12, %xmm14
- SUBPS %xmm14, %xmm5
- mulps %xmm12, %xmm15
- SUBPS %xmm15, %xmm7
- ALIGN_3
-
- .L19:
- pcmpeqb %xmm11, %xmm11
- psllq $63, %xmm11
-
- #if (!defined(CONJ) && !defined(XCONJ)) || (defined(CONJ) && defined(XCONJ))
- xorps %xmm11, %xmm0
- xorps %xmm11, %xmm2
- xorps %xmm11, %xmm4
- xorps %xmm11, %xmm6
- #else
- xorps %xmm11, %xmm1
- xorps %xmm11, %xmm3
- xorps %xmm11, %xmm5
- xorps %xmm11, %xmm7
- #endif
-
- #ifdef HAVE_SSE3
- haddps %xmm1, %xmm0
- haddps %xmm3, %xmm2
- haddps %xmm2, %xmm0
-
- haddps %xmm5, %xmm4
- haddps %xmm7, %xmm6
- haddps %xmm6, %xmm4
- #else
-
- movaps %xmm0, %xmm8
- unpcklps %xmm1, %xmm0
- unpckhps %xmm1, %xmm8
-
- movaps %xmm2, %xmm9
- unpcklps %xmm3, %xmm2
- unpckhps %xmm3, %xmm9
-
- movaps %xmm4, %xmm10
- unpcklps %xmm5, %xmm4
- unpckhps %xmm5, %xmm10
-
- movaps %xmm6, %xmm12
- unpcklps %xmm7, %xmm6
- unpckhps %xmm7, %xmm12
-
- addps %xmm8, %xmm0
- addps %xmm9, %xmm2
- addps %xmm10, %xmm4
- addps %xmm12, %xmm6
-
- movhlps %xmm0, %xmm1
- movhlps %xmm2, %xmm3
- movhlps %xmm4, %xmm5
- movhlps %xmm6, %xmm7
-
- addps %xmm1, %xmm0
- addps %xmm3, %xmm2
- addps %xmm5, %xmm4
- addps %xmm7, %xmm6
-
- movlhps %xmm2, %xmm0
- movlhps %xmm6, %xmm4
- #endif
-
- pshufd $0xb1, %xmm0, %xmm1
- pshufd $0xb1, %xmm4, %xmm5
-
- #ifdef HAVE_SSE3
- movddup ALPHA, %xmm15
- #else
- movsd ALPHA, %xmm15
- pshufd $0x44, %xmm15, %xmm15
- #endif
-
- mulps %xmm15, %xmm0
- mulps %xmm15, %xmm1
- mulps %xmm15, %xmm4
- mulps %xmm15, %xmm5
-
- xorps %xmm11, %xmm0
- xorps %xmm11, %xmm4
-
- #ifdef HAVE_SSE3
- haddps %xmm1, %xmm0
- haddps %xmm5, %xmm4
- #else
- movaps %xmm0, %xmm2
- shufps $0x88, %xmm1, %xmm0
- shufps $0xdd, %xmm1, %xmm2
-
- movaps %xmm4, %xmm6
- shufps $0x88, %xmm5, %xmm4
- shufps $0xdd, %xmm5, %xmm6
-
- addps %xmm2, %xmm0
- addps %xmm6, %xmm4
- #endif
-
- movsd (Y), %xmm2
- addq INCY, Y
- movhps (Y), %xmm2
- addq INCY, Y
- movsd (Y), %xmm6
- addq INCY, Y
- movhps (Y), %xmm6
- addq INCY, Y
-
- shufps $0xd8, %xmm0, %xmm0
- shufps $0xd8, %xmm4, %xmm4
-
- addps %xmm2, %xmm0
- addps %xmm6, %xmm4
-
- movlps %xmm0, (Y1)
- addq INCY, Y1
- movhps %xmm0, (Y1)
- addq INCY, Y1
- movlps %xmm4, (Y1)
- addq INCY, Y1
- movhps %xmm4, (Y1)
- addq INCY, Y1
-
- cmpq $4, N
- jge .L11
- ALIGN_3
-
- .L20:
- #endif
-
- cmpq $2, N
- jl .L30
- #if GEMV_UNROLL == 2
- ALIGN_3
-
- .L21:
- #endif
- subq $2, N
-
- leaq 32 * SIZE(BUFFER), X1
-
- movq A, A1
- leaq (A1, LDA), A2
- leaq (A1, LDA, 2), A
-
- xorps %xmm0, %xmm0
- xorps %xmm1, %xmm1
- xorps %xmm2, %xmm2
- xorps %xmm3, %xmm3
-
- #ifdef ALIGNED_ACCESS
- cmpq M, MM
- je .L2X
-
- #ifdef movsd
- xorps %xmm8, %xmm8
- #endif
- movsd -32 * SIZE(A1), %xmm8
- #ifdef movsd
- xorps %xmm9, %xmm9
- #endif
- movsd -32 * SIZE(A2), %xmm9
-
- #ifdef movsd
- xorps %xmm12, %xmm12
- #endif
- movsd -32 * SIZE(X1), %xmm12
-
- pshufd $0xb1, %xmm8, %xmm4
- mulps %xmm12, %xmm8
- addps %xmm8, %xmm0
- mulps %xmm12, %xmm4
- SUBPS %xmm4, %xmm1
-
- pshufd $0xb1, %xmm9, %xmm5
- mulps %xmm12, %xmm9
- addps %xmm9, %xmm2
- mulps %xmm12, %xmm5
- SUBPS %xmm5, %xmm3
-
- addq $2 * SIZE, A1
- addq $2 * SIZE, A2
- addq $2 * SIZE, X1
- ALIGN_3
- .L2X:
- #endif
-
- movaps -32 * SIZE(X1), %xmm12
- movaps -28 * SIZE(X1), %xmm13
-
- #if (GEMV_UNROLL == 2) && defined(PREFETCHW)
- PREFETCHW 3 * SIZE(Y1)
- #endif
-
- movq MM, I
- sarq $3, I
- jle .L25
-
- MOVUPS_A1(-32 * SIZE, A1, %xmm8)
- MOVUPS_A1(-32 * SIZE, A2, %xmm9)
- MOVUPS_A1(-28 * SIZE, A1, %xmm10)
- MOVUPS_A1(-28 * SIZE, A2, %xmm11)
-
- decq I
- jle .L24
- ALIGN_3
-
- .L23:
- #ifdef PREFETCH
- PREFETCH (PREFETCHSIZE) * 2 - 128 + PREOFFSET(A1)
- #endif
-
- pshufd $0xb1, %xmm8, %xmm4
- mulps %xmm12, %xmm8
- addps %xmm8, %xmm0
- MOVUPS_A1(-24 * SIZE, A1, %xmm8)
- mulps %xmm12, %xmm4
- SUBPS %xmm4, %xmm1
-
- pshufd $0xb1, %xmm9, %xmm5
- mulps %xmm12, %xmm9
- addps %xmm9, %xmm2
- MOVUPS_A1(-24 * SIZE, A2, %xmm9)
- mulps %xmm12, %xmm5
- SUBPS %xmm5, %xmm3
-
- movaps -24 * SIZE(X1), %xmm12
-
- pshufd $0xb1, %xmm10, %xmm6
- mulps %xmm13, %xmm10
- addps %xmm10, %xmm0
- MOVUPS_A1(-20 * SIZE, A1, %xmm10)
- mulps %xmm13, %xmm6
- SUBPS %xmm6, %xmm1
-
- pshufd $0xb1, %xmm11, %xmm7
- mulps %xmm13, %xmm11
- addps %xmm11, %xmm2
- MOVUPS_A1(-20 * SIZE, A2, %xmm11)
- mulps %xmm13, %xmm7
- SUBPS %xmm7, %xmm3
-
- movaps -20 * SIZE(X1), %xmm13
-
- #ifdef PREFETCH
- PREFETCH (PREFETCHSIZE) * 2 - 128 + PREOFFSET(A2)
- #endif
-
- pshufd $0xb1, %xmm8, %xmm4
- mulps %xmm12, %xmm8
- addps %xmm8, %xmm0
- MOVUPS_A1(-16 * SIZE, A1, %xmm8)
- mulps %xmm12, %xmm4
- SUBPS %xmm4, %xmm1
-
- pshufd $0xb1, %xmm9, %xmm5
- mulps %xmm12, %xmm9
- addps %xmm9, %xmm2
- MOVUPS_A1(-16 * SIZE, A2, %xmm9)
- mulps %xmm12, %xmm5
- SUBPS %xmm5, %xmm3
-
- movaps -16 * SIZE(X1), %xmm12
-
- #ifdef PREFETCHW
- PREFETCH (PREFETCHSIZE) * 2 - 128 + PREOFFSET(X1)
- #endif
-
- pshufd $0xb1, %xmm10, %xmm6
- mulps %xmm13, %xmm10
- addps %xmm10, %xmm0
- MOVUPS_A1(-12 * SIZE, A1, %xmm10)
- mulps %xmm13, %xmm6
- SUBPS %xmm6, %xmm1
-
- pshufd $0xb1, %xmm11, %xmm7
- mulps %xmm13, %xmm11
- addps %xmm11, %xmm2
- MOVUPS_A1(-12 * SIZE, A2, %xmm11)
- mulps %xmm13, %xmm7
- SUBPS %xmm7, %xmm3
-
- movaps -12 * SIZE(X1), %xmm13
-
- subq $-16 * SIZE, A1
- subq $-16 * SIZE, A2
- subq $-16 * SIZE, X1
-
- subq $1, I
- BRANCH
- jg .L23
- ALIGN_3
-
- .L24:
- pshufd $0xb1, %xmm8, %xmm4
- mulps %xmm12, %xmm8
- addps %xmm8, %xmm0
- MOVUPS_A1(-24 * SIZE, A1, %xmm8)
- mulps %xmm12, %xmm4
- SUBPS %xmm4, %xmm1
-
- pshufd $0xb1, %xmm9, %xmm5
- mulps %xmm12, %xmm9
- addps %xmm9, %xmm2
- MOVUPS_A1(-24 * SIZE, A2, %xmm9)
- mulps %xmm12, %xmm5
- SUBPS %xmm5, %xmm3
-
- movaps -24 * SIZE(X1), %xmm12
-
- pshufd $0xb1, %xmm10, %xmm6
- mulps %xmm13, %xmm10
- addps %xmm10, %xmm0
- MOVUPS_A1(-20 * SIZE, A1, %xmm10)
- mulps %xmm13, %xmm6
- SUBPS %xmm6, %xmm1
-
- pshufd $0xb1, %xmm11, %xmm7
- mulps %xmm13, %xmm11
- addps %xmm11, %xmm2
- MOVUPS_A1(-20 * SIZE, A2, %xmm11)
- mulps %xmm13, %xmm7
- SUBPS %xmm7, %xmm3
-
- movaps -20 * SIZE(X1), %xmm13
-
- pshufd $0xb1, %xmm8, %xmm4
- mulps %xmm12, %xmm8
- addps %xmm8, %xmm0
- mulps %xmm12, %xmm4
- SUBPS %xmm4, %xmm1
-
- pshufd $0xb1, %xmm9, %xmm5
- mulps %xmm12, %xmm9
- addps %xmm9, %xmm2
- mulps %xmm12, %xmm5
- SUBPS %xmm5, %xmm3
-
- movaps -16 * SIZE(X1), %xmm12
-
- pshufd $0xb1, %xmm10, %xmm6
- mulps %xmm13, %xmm10
- addps %xmm10, %xmm0
- mulps %xmm13, %xmm6
- SUBPS %xmm6, %xmm1
-
- pshufd $0xb1, %xmm11, %xmm7
- mulps %xmm13, %xmm11
- addps %xmm11, %xmm2
- mulps %xmm13, %xmm7
- SUBPS %xmm7, %xmm3
-
- movaps -12 * SIZE(X1), %xmm13
-
- subq $-16 * SIZE, A1
- subq $-16 * SIZE, A2
- subq $-16 * SIZE, X1
- ALIGN_3
-
- .L25:
- testq $4, MM
- je .L27
-
- MOVUPS_A1(-32 * SIZE, A1, %xmm8)
- MOVUPS_A1(-32 * SIZE, A2, %xmm9)
- MOVUPS_A1(-28 * SIZE, A1, %xmm10)
- MOVUPS_A1(-28 * SIZE, A2, %xmm11)
-
- pshufd $0xb1, %xmm8, %xmm4
- mulps %xmm12, %xmm8
- addps %xmm8, %xmm0
- mulps %xmm12, %xmm4
- SUBPS %xmm4, %xmm1
-
- pshufd $0xb1, %xmm9, %xmm5
- mulps %xmm12, %xmm9
- addps %xmm9, %xmm2
- mulps %xmm12, %xmm5
- SUBPS %xmm5, %xmm3
-
- movaps -24 * SIZE(X1), %xmm12
-
- pshufd $0xb1, %xmm10, %xmm6
- mulps %xmm13, %xmm10
- addps %xmm10, %xmm0
- mulps %xmm13, %xmm6
- SUBPS %xmm6, %xmm1
-
- pshufd $0xb1, %xmm11, %xmm7
- mulps %xmm13, %xmm11
- addps %xmm11, %xmm2
- mulps %xmm13, %xmm7
- SUBPS %xmm7, %xmm3
-
- movaps -20 * SIZE(X1), %xmm13
-
- addq $8 * SIZE, A1
- addq $8 * SIZE, A2
- ALIGN_3
-
- .L27:
- testq $2, MM
- je .L28
-
- MOVUPS_A1(-32 * SIZE, A1, %xmm8)
- MOVUPS_A1(-32 * SIZE, A2, %xmm9)
-
- pshufd $0xb1, %xmm8, %xmm4
- mulps %xmm12, %xmm8
- addps %xmm8, %xmm0
- mulps %xmm12, %xmm4
- SUBPS %xmm4, %xmm1
-
- pshufd $0xb1, %xmm9, %xmm5
- mulps %xmm12, %xmm9
- addps %xmm9, %xmm2
- mulps %xmm12, %xmm5
- SUBPS %xmm5, %xmm3
-
- movaps %xmm13, %xmm12
-
- addq $4 * SIZE, A1
- addq $4 * SIZE, A2
- ALIGN_3
-
- .L28:
- testq $1, MM
- je .L29
-
- #ifdef movsd
- xorps %xmm8, %xmm8
- #endif
- movsd -32 * SIZE(A1), %xmm8
- #ifdef movsd
- xorps %xmm9, %xmm9
- #endif
- movsd -32 * SIZE(A2), %xmm9
-
- pshufd $0xb1, %xmm8, %xmm4
- mulps %xmm12, %xmm8
- addps %xmm8, %xmm0
- mulps %xmm12, %xmm4
- SUBPS %xmm4, %xmm1
-
- pshufd $0xb1, %xmm9, %xmm5
- mulps %xmm12, %xmm9
- addps %xmm9, %xmm2
- mulps %xmm12, %xmm5
- SUBPS %xmm5, %xmm3
- ALIGN_3
-
- .L29:
- pcmpeqb %xmm5, %xmm5
- psllq $63, %xmm5
-
- #if (!defined(CONJ) && !defined(XCONJ)) || (defined(CONJ) && defined(XCONJ))
- xorps %xmm5, %xmm0
- xorps %xmm5, %xmm2
- #else
- xorps %xmm5, %xmm1
- xorps %xmm5, %xmm3
- #endif
-
- #ifdef HAVE_SSE3
- haddps %xmm1, %xmm0
- haddps %xmm3, %xmm2
- haddps %xmm2, %xmm0
- #else
- movaps %xmm0, %xmm8
- unpcklps %xmm1, %xmm0
- unpckhps %xmm1, %xmm8
-
- movaps %xmm2, %xmm4
- unpcklps %xmm3, %xmm2
- unpckhps %xmm3, %xmm4
-
- addps %xmm8, %xmm0
- addps %xmm4, %xmm2
-
- movhlps %xmm0, %xmm1
- movhlps %xmm2, %xmm3
-
- addps %xmm1, %xmm0
- addps %xmm3, %xmm2
- movlhps %xmm2, %xmm0
- #endif
-
- pshufd $0xb1, %xmm0, %xmm1
-
- #ifdef HAVE_SSE3
- movddup ALPHA, %xmm15
- #else
- movsd ALPHA, %xmm15
- pshufd $0x44, %xmm15, %xmm15
- #endif
-
- mulps %xmm15, %xmm0
- mulps %xmm15, %xmm1
-
- xorps %xmm5, %xmm0
-
- #ifdef HAVE_SSE3
- haddps %xmm1, %xmm0
- #else
- movaps %xmm0, %xmm2
- shufps $0x88, %xmm1, %xmm0
- shufps $0xdd, %xmm1, %xmm2
-
- addps %xmm2, %xmm0
- #endif
-
- movsd (Y), %xmm12
- addq INCY, Y
- movhps (Y), %xmm12
- addq INCY, Y
-
- shufps $0xd8, %xmm0, %xmm0
-
- addps %xmm12, %xmm0
-
- movlps %xmm0, (Y1)
- addq INCY, Y1
- movhps %xmm0, (Y1)
- addq INCY, Y1
-
- #if GEMV_UNROLL == 2
- cmpq $2, N
- jge .L21
- #endif
- ALIGN_3
-
- .L30:
- cmpq $1, N
- jl .L999
-
- leaq 32 * SIZE(BUFFER), X1
-
- movq A, A1
-
- xorps %xmm0, %xmm0
- xorps %xmm1, %xmm1
-
- #ifdef ALIGNED_ACCESS
- cmpq M, MM
- je .L3X
-
- #ifdef movsd
- xorps %xmm8, %xmm8
- #endif
- movsd -32 * SIZE(A1), %xmm8
- #ifdef movsd
- xorps %xmm12, %xmm12
- #endif
- movsd -32 * SIZE(X1), %xmm12
-
- pshufd $0xb1, %xmm8, %xmm4
- mulps %xmm12, %xmm8
- addps %xmm8, %xmm0
- mulps %xmm12, %xmm4
- SUBPS %xmm4, %xmm1
-
- addq $2 * SIZE, A1
- addq $2 * SIZE, X1
- ALIGN_3
- .L3X:
- #endif
-
- movaps -32 * SIZE(X1), %xmm12
- movaps -28 * SIZE(X1), %xmm13
-
- movq MM, I
- sarq $3, I
- jle .L35
-
- MOVUPS_A1(-32 * SIZE, A1, %xmm8)
- MOVUPS_A1(-28 * SIZE, A1, %xmm10)
-
- decq I
- jle .L34
- ALIGN_3
-
- .L33:
- #ifdef PREFETCH
- PREFETCH (PREFETCHSIZE) * 4 - 128 + PREOFFSET(A1)
- #endif
-
- pshufd $0xb1, %xmm8, %xmm4
- mulps %xmm12, %xmm8
- addps %xmm8, %xmm0
- MOVUPS_A1(-24 * SIZE, A1, %xmm8)
- mulps %xmm12, %xmm4
- SUBPS %xmm4, %xmm1
-
- movaps -24 * SIZE(X1), %xmm12
-
- pshufd $0xb1, %xmm10, %xmm6
- mulps %xmm13, %xmm10
- addps %xmm10, %xmm0
- MOVUPS_A1(-20 * SIZE, A1, %xmm10)
- mulps %xmm13, %xmm6
- SUBPS %xmm6, %xmm1
-
- movaps -20 * SIZE(X1), %xmm13
-
- pshufd $0xb1, %xmm8, %xmm4
- mulps %xmm12, %xmm8
- addps %xmm8, %xmm0
- MOVUPS_A1(-16 * SIZE, A1, %xmm8)
- mulps %xmm12, %xmm4
- SUBPS %xmm4, %xmm1
-
- movaps -16 * SIZE(X1), %xmm12
-
- #ifdef PREFETCHW
- PREFETCH (PREFETCHSIZE) * 4 - 128 + PREOFFSET(X1)
- #endif
-
- pshufd $0xb1, %xmm10, %xmm6
- mulps %xmm13, %xmm10
- addps %xmm10, %xmm0
- MOVUPS_A1(-12 * SIZE, A1, %xmm10)
- mulps %xmm13, %xmm6
- SUBPS %xmm6, %xmm1
-
- movaps -12 * SIZE(X1), %xmm13
-
- subq $-16 * SIZE, A1
- subq $-16 * SIZE, X1
-
- subq $1, I
- BRANCH
- jg .L33
- ALIGN_3
-
- .L34:
- pshufd $0xb1, %xmm8, %xmm4
- mulps %xmm12, %xmm8
- addps %xmm8, %xmm0
- MOVUPS_A1(-24 * SIZE, A1, %xmm8)
- mulps %xmm12, %xmm4
- SUBPS %xmm4, %xmm1
-
- movaps -24 * SIZE(X1), %xmm12
-
- pshufd $0xb1, %xmm10, %xmm6
- mulps %xmm13, %xmm10
- addps %xmm10, %xmm0
- MOVUPS_A1(-20 * SIZE, A1, %xmm10)
- mulps %xmm13, %xmm6
- SUBPS %xmm6, %xmm1
-
- movaps -20 * SIZE(X1), %xmm13
-
- pshufd $0xb1, %xmm8, %xmm4
- mulps %xmm12, %xmm8
- addps %xmm8, %xmm0
- mulps %xmm12, %xmm4
- SUBPS %xmm4, %xmm1
-
- movaps -16 * SIZE(X1), %xmm12
-
- pshufd $0xb1, %xmm10, %xmm6
- mulps %xmm13, %xmm10
- addps %xmm10, %xmm0
- mulps %xmm13, %xmm6
- SUBPS %xmm6, %xmm1
-
- movaps -12 * SIZE(X1), %xmm13
-
- subq $-16 * SIZE, A1
- subq $-16 * SIZE, X1
- ALIGN_3
-
- .L35:
- testq $4, MM
- je .L37
-
- MOVUPS_A1(-32 * SIZE, A1, %xmm8)
- MOVUPS_A1(-28 * SIZE, A1, %xmm10)
-
- pshufd $0xb1, %xmm8, %xmm4
- mulps %xmm12, %xmm8
- addps %xmm8, %xmm0
- mulps %xmm12, %xmm4
- SUBPS %xmm4, %xmm1
-
- movaps -24 * SIZE(X1), %xmm12
-
- pshufd $0xb1, %xmm10, %xmm6
- mulps %xmm13, %xmm10
- addps %xmm10, %xmm0
- mulps %xmm13, %xmm6
- SUBPS %xmm6, %xmm1
-
- movaps -20 * SIZE(X1), %xmm13
-
- addq $8 * SIZE, A1
- ALIGN_3
-
- .L37:
- testq $2, MM
- je .L38
-
- MOVUPS_A1(-32 * SIZE, A1, %xmm8)
-
- pshufd $0xb1, %xmm8, %xmm4
- mulps %xmm12, %xmm8
- addps %xmm8, %xmm0
- mulps %xmm12, %xmm4
- SUBPS %xmm4, %xmm1
-
- movaps %xmm13, %xmm12
-
- addq $4 * SIZE, A1
- ALIGN_3
-
- .L38:
- testq $1, MM
- je .L39
-
- #ifdef movsd
- xorps %xmm8, %xmm8
- #endif
- movsd -32 * SIZE(A1), %xmm8
-
- pshufd $0xb1, %xmm8, %xmm4
- mulps %xmm12, %xmm8
- addps %xmm8, %xmm0
- mulps %xmm12, %xmm4
- SUBPS %xmm4, %xmm1
- ALIGN_3
-
- .L39:
- pcmpeqb %xmm5, %xmm5
- psllq $63, %xmm5
-
- #if (!defined(CONJ) && !defined(XCONJ)) || (defined(CONJ) && defined(XCONJ))
- xorps %xmm5, %xmm0
- #else
- xorps %xmm5, %xmm1
- #endif
-
- #ifdef HAVE_SSE3
- haddps %xmm1, %xmm0
- haddps %xmm0, %xmm0
- #else
- movaps %xmm0, %xmm8
- unpcklps %xmm1, %xmm0
- unpckhps %xmm1, %xmm8
-
- addps %xmm8, %xmm0
-
- movhlps %xmm0, %xmm1
-
- addps %xmm1, %xmm0
- #endif
-
- pshufd $0xb1, %xmm0, %xmm1
-
- #ifdef HAVE_SSE3
- movddup ALPHA, %xmm15
- #else
- movsd ALPHA, %xmm15
- pshufd $0x44, %xmm15, %xmm15
- #endif
-
- mulps %xmm15, %xmm0
- mulps %xmm15, %xmm1
-
- xorps %xmm5, %xmm0
-
- #ifdef HAVE_SSE3
- haddps %xmm1, %xmm0
- #else
- movaps %xmm0, %xmm2
- shufps $0x88, %xmm1, %xmm0
- shufps $0xdd, %xmm1, %xmm2
-
- addps %xmm2, %xmm0
- #endif
-
- movsd (Y), %xmm12
- addq INCY, Y
-
- shufps $0xd8, %xmm0, %xmm0
-
- addps %xmm12, %xmm0
-
- movlps %xmm0, (Y1)
- addq INCY, Y1
- #ifdef ALIGNED_ACCESS
- jmp .L999
- ALIGN_3
-
- .L100:
-
- #if GEMV_UNROLL >= 4
- cmpq $4, N
- jl .L110
- ALIGN_3
-
- .L101:
- subq $4, N
-
- leaq 32 * SIZE(BUFFER), X1
-
- movq A, A1
- leaq (A1, LDA, 2), A2
- leaq (A1, LDA, 4), A
-
- xorps %xmm0, %xmm0
- xorps %xmm1, %xmm1
- xorps %xmm2, %xmm2
- xorps %xmm3, %xmm3
- xorps %xmm4, %xmm4
- xorps %xmm5, %xmm5
- xorps %xmm6, %xmm6
- xorps %xmm7, %xmm7
-
- #ifdef ALIGNED_ACCESS
- cmpq M, MM
- je .L10X
-
- #ifdef movsd
- xorps %xmm8, %xmm8
- #endif
- movsd -32 * SIZE(A1), %xmm8
- #ifdef movsd
- xorps %xmm9, %xmm9
- #endif
- movsd -32 * SIZE(A1, LDA), %xmm9
- #ifdef movsd
- xorps %xmm10, %xmm10
- #endif
- movsd -32 * SIZE(A2), %xmm10
- #ifdef movsd
- xorps %xmm11, %xmm11
- #endif
- movsd -32 * SIZE(A2, LDA), %xmm11
-
- #ifdef movsd
- xorps %xmm12, %xmm12
- #endif
- movsd -32 * SIZE(X1), %xmm12
-
- pshufd $0xb1, %xmm8, %xmm14
- mulps %xmm12, %xmm8
- addps %xmm8, %xmm0
- pshufd $0xb1, %xmm9, %xmm15
- mulps %xmm12, %xmm9
- addps %xmm9, %xmm2
-
- mulps %xmm12, %xmm14
- SUBPS %xmm14, %xmm1
- mulps %xmm12, %xmm15
- SUBPS %xmm15, %xmm3
-
- pshufd $0xb1, %xmm10, %xmm14
- mulps %xmm12, %xmm10
- addps %xmm10, %xmm4
- pshufd $0xb1, %xmm11, %xmm15
- mulps %xmm12, %xmm11
- addps %xmm11, %xmm6
-
- mulps %xmm12, %xmm14
- SUBPS %xmm14, %xmm5
- mulps %xmm12, %xmm15
- SUBPS %xmm15, %xmm7
-
- addq $2 * SIZE, A1
- addq $2 * SIZE, A2
- addq $2 * SIZE, X1
- ALIGN_3
- .L10X:
- #endif
-
- movaps -32 * SIZE(X1), %xmm12
- movaps -28 * SIZE(X1), %xmm13
-
- #ifdef PREFETCHW
- PREFETCHW 7 * SIZE(Y1)
- #endif
-
- movq MM, I
- sarq $3, I
- jle .L105
-
- movaps -32 * SIZE(A1), %xmm8
- movsd -32 * SIZE(A1, LDA), %xmm9
- movhps -30 * SIZE(A1, LDA), %xmm9
-
- movaps -32 * SIZE(A2), %xmm10
- movsd -32 * SIZE(A2, LDA), %xmm11
- movhps -30 * SIZE(A2, LDA), %xmm11
-
- decq I
- jle .L104
- ALIGN_3
-
- .L103:
- #ifdef PREFETCH
- PREFETCH (PREFETCHSIZE) - 128 + PREOFFSET(A1)
- #endif
-
- pshufd $0xb1, %xmm8, %xmm14
- mulps %xmm12, %xmm8
- addps %xmm8, %xmm0
- movaps -28 * SIZE(A1), %xmm8
- pshufd $0xb1, %xmm9, %xmm15
- mulps %xmm12, %xmm9
- addps %xmm9, %xmm2
- movsd -28 * SIZE(A1, LDA), %xmm9
- movhps -26 * SIZE(A1, LDA), %xmm9
-
- mulps %xmm12, %xmm14
- SUBPS %xmm14, %xmm1
- mulps %xmm12, %xmm15
- SUBPS %xmm15, %xmm3
-
- pshufd $0xb1, %xmm10, %xmm14
- mulps %xmm12, %xmm10
- addps %xmm10, %xmm4
- movaps -28 * SIZE(A2), %xmm10
- pshufd $0xb1, %xmm11, %xmm15
- mulps %xmm12, %xmm11
- addps %xmm11, %xmm6
- movsd -28 * SIZE(A2, LDA), %xmm11
- movhps -26 * SIZE(A2, LDA), %xmm11
-
- mulps %xmm12, %xmm14
- SUBPS %xmm14, %xmm5
- mulps %xmm12, %xmm15
- movaps -24 * SIZE(X1), %xmm12
- SUBPS %xmm15, %xmm7
-
- #ifdef PREFETCH
- PREFETCH (PREFETCHSIZE) - 128 + PREOFFSET(A1, LDA)
- #endif
-
- pshufd $0xb1, %xmm8, %xmm14
- mulps %xmm13, %xmm8
- addps %xmm8, %xmm0
- movaps -24 * SIZE(A1), %xmm8
- pshufd $0xb1, %xmm9, %xmm15
- mulps %xmm13, %xmm9
- addps %xmm9, %xmm2
- movsd -24 * SIZE(A1, LDA), %xmm9
- movhps -22 * SIZE(A1, LDA), %xmm9
-
- mulps %xmm13, %xmm14
- SUBPS %xmm14, %xmm1
- mulps %xmm13, %xmm15
- SUBPS %xmm15, %xmm3
-
- pshufd $0xb1, %xmm10, %xmm14
- mulps %xmm13, %xmm10
- addps %xmm10, %xmm4
- movaps -24 * SIZE(A2), %xmm10
- pshufd $0xb1, %xmm11, %xmm15
- mulps %xmm13, %xmm11
- addps %xmm11, %xmm6
- movsd -24 * SIZE(A2, LDA), %xmm11
- movhps -22 * SIZE(A2, LDA), %xmm11
-
- mulps %xmm13, %xmm14
- SUBPS %xmm14, %xmm5
- mulps %xmm13, %xmm15
- movaps -20 * SIZE(X1), %xmm13
- SUBPS %xmm15, %xmm7
-
- #ifdef PREFETCH
- PREFETCH (PREFETCHSIZE) - 128 + PREOFFSET(A2)
- #endif
-
- pshufd $0xb1, %xmm8, %xmm14
- mulps %xmm12, %xmm8
- addps %xmm8, %xmm0
- movaps -20 * SIZE(A1), %xmm8
- pshufd $0xb1, %xmm9, %xmm15
- mulps %xmm12, %xmm9
- addps %xmm9, %xmm2
- movsd -20 * SIZE(A1, LDA), %xmm9
- movhps -18 * SIZE(A1, LDA), %xmm9
-
- mulps %xmm12, %xmm14
- SUBPS %xmm14, %xmm1
- mulps %xmm12, %xmm15
- SUBPS %xmm15, %xmm3
-
- pshufd $0xb1, %xmm10, %xmm14
- mulps %xmm12, %xmm10
- addps %xmm10, %xmm4
- movaps -20 * SIZE(A2), %xmm10
- pshufd $0xb1, %xmm11, %xmm15
- mulps %xmm12, %xmm11
- addps %xmm11, %xmm6
- movsd -20 * SIZE(A2, LDA), %xmm11
- movhps -18 * SIZE(A2, LDA), %xmm11
-
- mulps %xmm12, %xmm14
- SUBPS %xmm14, %xmm5
- mulps %xmm12, %xmm15
- movaps -16 * SIZE(X1), %xmm12
- SUBPS %xmm15, %xmm7
-
- #ifdef PREFETCH
- PREFETCH (PREFETCHSIZE) - 128 + PREOFFSET(A2, LDA)
- #endif
-
- pshufd $0xb1, %xmm8, %xmm14
- mulps %xmm13, %xmm8
- addps %xmm8, %xmm0
- movaps -16 * SIZE(A1), %xmm8
- pshufd $0xb1, %xmm9, %xmm15
- mulps %xmm13, %xmm9
- addps %xmm9, %xmm2
- movsd -16 * SIZE(A1, LDA), %xmm9
- movhps -14 * SIZE(A1, LDA), %xmm9
-
- mulps %xmm13, %xmm14
- SUBPS %xmm14, %xmm1
- mulps %xmm13, %xmm15
- SUBPS %xmm15, %xmm3
-
- #ifdef PREFETCHW
- PREFETCH (PREFETCHSIZE) - 128 + PREOFFSET(X1)
- #endif
-
- pshufd $0xb1, %xmm10, %xmm14
- mulps %xmm13, %xmm10
- addps %xmm10, %xmm4
- movaps -16 * SIZE(A2), %xmm10
- pshufd $0xb1, %xmm11, %xmm15
- mulps %xmm13, %xmm11
- addps %xmm11, %xmm6
- movsd -16 * SIZE(A2, LDA), %xmm11
- movhps -14 * SIZE(A2, LDA), %xmm11
-
- mulps %xmm13, %xmm14
- SUBPS %xmm14, %xmm5
- mulps %xmm13, %xmm15
- movaps -12 * SIZE(X1), %xmm13
- SUBPS %xmm15, %xmm7
-
- subq $-16 * SIZE, A1
- subq $-16 * SIZE, A2
- subq $-16 * SIZE, X1
-
- subq $1, I
- BRANCH
- jg .L103
- ALIGN_3
-
- .L104:
- pshufd $0xb1, %xmm8, %xmm14
- mulps %xmm12, %xmm8
- addps %xmm8, %xmm0
- movaps -28 * SIZE(A1), %xmm8
- pshufd $0xb1, %xmm9, %xmm15
- mulps %xmm12, %xmm9
- addps %xmm9, %xmm2
- movsd -28 * SIZE(A1, LDA), %xmm9
- movhps -26 * SIZE(A1, LDA), %xmm9
-
- mulps %xmm12, %xmm14
- SUBPS %xmm14, %xmm1
- mulps %xmm12, %xmm15
- SUBPS %xmm15, %xmm3
-
- pshufd $0xb1, %xmm10, %xmm14
- mulps %xmm12, %xmm10
- addps %xmm10, %xmm4
- movaps -28 * SIZE(A2), %xmm10
- pshufd $0xb1, %xmm11, %xmm15
- mulps %xmm12, %xmm11
- addps %xmm11, %xmm6
- movsd -28 * SIZE(A2, LDA), %xmm11
- movhps -26 * SIZE(A2, LDA), %xmm11
-
- mulps %xmm12, %xmm14
- SUBPS %xmm14, %xmm5
- mulps %xmm12, %xmm15
- movaps -24 * SIZE(X1), %xmm12
- SUBPS %xmm15, %xmm7
-
- pshufd $0xb1, %xmm8, %xmm14
- mulps %xmm13, %xmm8
- addps %xmm8, %xmm0
- movaps -24 * SIZE(A1), %xmm8
- pshufd $0xb1, %xmm9, %xmm15
- mulps %xmm13, %xmm9
- addps %xmm9, %xmm2
- movsd -24 * SIZE(A1, LDA), %xmm9
- movhps -22 * SIZE(A1, LDA), %xmm9
-
- mulps %xmm13, %xmm14
- SUBPS %xmm14, %xmm1
- mulps %xmm13, %xmm15
- SUBPS %xmm15, %xmm3
-
- pshufd $0xb1, %xmm10, %xmm14
- mulps %xmm13, %xmm10
- addps %xmm10, %xmm4
- movaps -24 * SIZE(A2), %xmm10
- pshufd $0xb1, %xmm11, %xmm15
- mulps %xmm13, %xmm11
- addps %xmm11, %xmm6
- movsd -24 * SIZE(A2, LDA), %xmm11
- movhps -22 * SIZE(A2, LDA), %xmm11
-
- mulps %xmm13, %xmm14
- SUBPS %xmm14, %xmm5
- mulps %xmm13, %xmm15
- movaps -20 * SIZE(X1), %xmm13
- SUBPS %xmm15, %xmm7
-
- pshufd $0xb1, %xmm8, %xmm14
- mulps %xmm12, %xmm8
- addps %xmm8, %xmm0
- movaps -20 * SIZE(A1), %xmm8
- pshufd $0xb1, %xmm9, %xmm15
- mulps %xmm12, %xmm9
- addps %xmm9, %xmm2
- movsd -20 * SIZE(A1, LDA), %xmm9
- movhps -18 * SIZE(A1, LDA), %xmm9
-
- mulps %xmm12, %xmm14
- SUBPS %xmm14, %xmm1
- mulps %xmm12, %xmm15
- SUBPS %xmm15, %xmm3
-
- pshufd $0xb1, %xmm10, %xmm14
- mulps %xmm12, %xmm10
- addps %xmm10, %xmm4
- movaps -20 * SIZE(A2), %xmm10
- pshufd $0xb1, %xmm11, %xmm15
- mulps %xmm12, %xmm11
- addps %xmm11, %xmm6
- movsd -20 * SIZE(A2, LDA), %xmm11
- movhps -18 * SIZE(A2, LDA), %xmm11
-
- mulps %xmm12, %xmm14
- SUBPS %xmm14, %xmm5
- mulps %xmm12, %xmm15
- movaps -16 * SIZE(X1), %xmm12
- SUBPS %xmm15, %xmm7
-
- pshufd $0xb1, %xmm8, %xmm14
- mulps %xmm13, %xmm8
- addps %xmm8, %xmm0
- pshufd $0xb1, %xmm9, %xmm15
- mulps %xmm13, %xmm9
- addps %xmm9, %xmm2
-
- mulps %xmm13, %xmm14
- SUBPS %xmm14, %xmm1
- mulps %xmm13, %xmm15
- SUBPS %xmm15, %xmm3
-
- pshufd $0xb1, %xmm10, %xmm14
- mulps %xmm13, %xmm10
- addps %xmm10, %xmm4
- pshufd $0xb1, %xmm11, %xmm15
- mulps %xmm13, %xmm11
- addps %xmm11, %xmm6
-
- mulps %xmm13, %xmm14
- SUBPS %xmm14, %xmm5
- mulps %xmm13, %xmm15
- movaps -12 * SIZE(X1), %xmm13
- SUBPS %xmm15, %xmm7
-
- subq $-16 * SIZE, A1
- subq $-16 * SIZE, A2
- subq $-16 * SIZE, X1
- ALIGN_3
-
- .L105:
- testq $4, MM
- je .L107
-
- movaps -32 * SIZE(A1), %xmm8
- movsd -32 * SIZE(A1, LDA), %xmm9
- movhps -30 * SIZE(A1, LDA), %xmm9
-
- movaps -32 * SIZE(A2), %xmm10
- movsd -32 * SIZE(A2, LDA), %xmm11
- movhps -30 * SIZE(A2, LDA), %xmm11
-
- pshufd $0xb1, %xmm8, %xmm14
- mulps %xmm12, %xmm8
- addps %xmm8, %xmm0
- movaps -28 * SIZE(A1), %xmm8
- pshufd $0xb1, %xmm9, %xmm15
- mulps %xmm12, %xmm9
- addps %xmm9, %xmm2
- movsd -28 * SIZE(A1, LDA), %xmm9
- movhps -26 * SIZE(A1, LDA), %xmm9
-
- mulps %xmm12, %xmm14
- SUBPS %xmm14, %xmm1
- mulps %xmm12, %xmm15
- SUBPS %xmm15, %xmm3
-
- pshufd $0xb1, %xmm10, %xmm14
- mulps %xmm12, %xmm10
- addps %xmm10, %xmm4
- movaps -28 * SIZE(A2), %xmm10
- pshufd $0xb1, %xmm11, %xmm15
- mulps %xmm12, %xmm11
- addps %xmm11, %xmm6
- movsd -28 * SIZE(A2, LDA), %xmm11
- movhps -26 * SIZE(A2, LDA), %xmm11
-
- mulps %xmm12, %xmm14
- SUBPS %xmm14, %xmm5
- mulps %xmm12, %xmm15
- movaps -24 * SIZE(X1), %xmm12
- SUBPS %xmm15, %xmm7
-
- pshufd $0xb1, %xmm8, %xmm14
- mulps %xmm13, %xmm8
- addps %xmm8, %xmm0
- pshufd $0xb1, %xmm9, %xmm15
- mulps %xmm13, %xmm9
- addps %xmm9, %xmm2
-
- mulps %xmm13, %xmm14
- SUBPS %xmm14, %xmm1
- mulps %xmm13, %xmm15
- SUBPS %xmm15, %xmm3
-
- pshufd $0xb1, %xmm10, %xmm14
- mulps %xmm13, %xmm10
- addps %xmm10, %xmm4
- pshufd $0xb1, %xmm11, %xmm15
- mulps %xmm13, %xmm11
- addps %xmm11, %xmm6
-
- mulps %xmm13, %xmm14
- SUBPS %xmm14, %xmm5
- mulps %xmm13, %xmm15
- movaps -20 * SIZE(X1), %xmm13
- SUBPS %xmm15, %xmm7
-
- addq $8 * SIZE, A1
- addq $8 * SIZE, A2
- addq $8 * SIZE, X1
- ALIGN_3
-
- .L107:
- testq $2, MM
- je .L108
-
- movaps -32 * SIZE(A1), %xmm8
- movsd -32 * SIZE(A1, LDA), %xmm9
- movhps -30 * SIZE(A1, LDA), %xmm9
-
- movaps -32 * SIZE(A2), %xmm10
- movsd -32 * SIZE(A2, LDA), %xmm11
- movhps -30 * SIZE(A2, LDA), %xmm11
-
- pshufd $0xb1, %xmm8, %xmm14
- mulps %xmm12, %xmm8
- addps %xmm8, %xmm0
- pshufd $0xb1, %xmm9, %xmm15
- mulps %xmm12, %xmm9
- addps %xmm9, %xmm2
-
- mulps %xmm12, %xmm14
- SUBPS %xmm14, %xmm1
- mulps %xmm12, %xmm15
- SUBPS %xmm15, %xmm3
-
- pshufd $0xb1, %xmm10, %xmm14
- mulps %xmm12, %xmm10
- addps %xmm10, %xmm4
- pshufd $0xb1, %xmm11, %xmm15
- mulps %xmm12, %xmm11
- addps %xmm11, %xmm6
-
- mulps %xmm12, %xmm14
- SUBPS %xmm14, %xmm5
- mulps %xmm12, %xmm15
- SUBPS %xmm15, %xmm7
-
- movaps %xmm13, %xmm12
-
- addq $4 * SIZE, A1
- addq $4 * SIZE, A2
- ALIGN_3
-
- .L108:
- testq $1, MM
- je .L109
-
- #ifdef movsd
- xorps %xmm8, %xmm8
- #endif
- movsd -32 * SIZE(A1), %xmm8
- #ifdef movsd
- xorps %xmm9, %xmm9
- #endif
- movsd -32 * SIZE(A1, LDA), %xmm9
- #ifdef movsd
- xorps %xmm10, %xmm10
- #endif
- movsd -32 * SIZE(A2), %xmm10
- #ifdef movsd
- xorps %xmm11, %xmm11
- #endif
- movsd -32 * SIZE(A2, LDA), %xmm11
-
- pshufd $0xb1, %xmm8, %xmm14
- mulps %xmm12, %xmm8
- addps %xmm8, %xmm0
- pshufd $0xb1, %xmm9, %xmm15
- mulps %xmm12, %xmm9
- addps %xmm9, %xmm2
-
- mulps %xmm12, %xmm14
- SUBPS %xmm14, %xmm1
- mulps %xmm12, %xmm15
- SUBPS %xmm15, %xmm3
-
- pshufd $0xb1, %xmm10, %xmm14
- mulps %xmm12, %xmm10
- addps %xmm10, %xmm4
- pshufd $0xb1, %xmm11, %xmm15
- mulps %xmm12, %xmm11
- addps %xmm11, %xmm6
-
- mulps %xmm12, %xmm14
- SUBPS %xmm14, %xmm5
- mulps %xmm12, %xmm15
- SUBPS %xmm15, %xmm7
- ALIGN_3
-
- .L109:
- pcmpeqb %xmm11, %xmm11
- psllq $63, %xmm11
-
- #if (!defined(CONJ) && !defined(XCONJ)) || (defined(CONJ) && defined(XCONJ))
- xorps %xmm11, %xmm0
- xorps %xmm11, %xmm2
- xorps %xmm11, %xmm4
- xorps %xmm11, %xmm6
- #else
- xorps %xmm11, %xmm1
- xorps %xmm11, %xmm3
- xorps %xmm11, %xmm5
- xorps %xmm11, %xmm7
- #endif
-
- #ifdef HAVE_SSE3
- haddps %xmm1, %xmm0
- haddps %xmm3, %xmm2
- haddps %xmm2, %xmm0
-
- haddps %xmm5, %xmm4
- haddps %xmm7, %xmm6
- haddps %xmm6, %xmm4
- #else
-
- movaps %xmm0, %xmm8
- unpcklps %xmm1, %xmm0
- unpckhps %xmm1, %xmm8
-
- movaps %xmm2, %xmm9
- unpcklps %xmm3, %xmm2
- unpckhps %xmm3, %xmm9
-
- movaps %xmm4, %xmm10
- unpcklps %xmm5, %xmm4
- unpckhps %xmm5, %xmm10
-
- movaps %xmm6, %xmm11
- unpcklps %xmm7, %xmm6
- unpckhps %xmm7, %xmm11
-
- addps %xmm8, %xmm0
- addps %xmm9, %xmm2
- addps %xmm10, %xmm4
- addps %xmm11, %xmm6
-
- movhlps %xmm0, %xmm1
- movhlps %xmm2, %xmm3
- movhlps %xmm4, %xmm5
- movhlps %xmm6, %xmm7
-
- addps %xmm1, %xmm0
- addps %xmm3, %xmm2
- addps %xmm5, %xmm4
- addps %xmm7, %xmm6
-
- movlhps %xmm2, %xmm0
- movlhps %xmm6, %xmm4
- #endif
-
- pshufd $0xb1, %xmm0, %xmm1
- pshufd $0xb1, %xmm4, %xmm5
-
- #ifdef HAVE_SSE3
- movddup ALPHA, %xmm15
- #else
- movsd ALPHA, %xmm15
- pshufd $0x44, %xmm15, %xmm15
- #endif
-
- mulps %xmm15, %xmm0
- mulps %xmm15, %xmm1
- mulps %xmm15, %xmm4
- mulps %xmm15, %xmm5
-
- xorps %xmm11, %xmm0
- xorps %xmm11, %xmm4
-
- #ifdef HAVE_SSE3
- haddps %xmm1, %xmm0
- haddps %xmm5, %xmm4
- #else
- movaps %xmm0, %xmm2
- shufps $0x88, %xmm1, %xmm0
- shufps $0xdd, %xmm1, %xmm2
-
- movaps %xmm4, %xmm6
- shufps $0x88, %xmm5, %xmm4
- shufps $0xdd, %xmm5, %xmm6
-
- addps %xmm2, %xmm0
- addps %xmm6, %xmm4
- #endif
-
- movsd (Y), %xmm2
- addq INCY, Y
- movhps (Y), %xmm2
- addq INCY, Y
- movsd (Y), %xmm6
- addq INCY, Y
- movhps (Y), %xmm6
- addq INCY, Y
-
- shufps $0xd8, %xmm0, %xmm0
- shufps $0xd8, %xmm4, %xmm4
-
- addps %xmm2, %xmm0
- addps %xmm6, %xmm4
-
- movlps %xmm0, (Y1)
- addq INCY, Y1
- movhps %xmm0, (Y1)
- addq INCY, Y1
- movlps %xmm4, (Y1)
- addq INCY, Y1
- movhps %xmm4, (Y1)
- addq INCY, Y1
-
- cmpq $4, N
- jge .L101
- ALIGN_3
-
- .L110:
- #endif
-
- cmpq $2, N
- jl .L120
- #if GEMV_UNROLL == 2
- ALIGN_3
-
- .L111:
- #endif
- subq $2, N
-
- leaq 32 * SIZE(BUFFER), X1
-
- movq A, A1
- leaq (A1, LDA), A2
- leaq (A1, LDA, 2), A
-
- xorps %xmm0, %xmm0
- xorps %xmm1, %xmm1
- xorps %xmm2, %xmm2
- xorps %xmm3, %xmm3
-
- #ifdef ALIGNED_ACCESS
- cmpq M, MM
- je .L11X
-
- #ifdef movsd
- xorps %xmm8, %xmm8
- #endif
- movsd -32 * SIZE(A1), %xmm8
- #ifdef movsd
- xorps %xmm9, %xmm9
- #endif
- movsd -32 * SIZE(A2), %xmm9
-
- #ifdef movsd
- xorps %xmm12, %xmm12
- #endif
- movsd -32 * SIZE(X1), %xmm12
-
- pshufd $0xb1, %xmm8, %xmm4
- mulps %xmm12, %xmm8
- addps %xmm8, %xmm0
- mulps %xmm12, %xmm4
- SUBPS %xmm4, %xmm1
-
- pshufd $0xb1, %xmm9, %xmm5
- mulps %xmm12, %xmm9
- addps %xmm9, %xmm2
- mulps %xmm12, %xmm5
- SUBPS %xmm5, %xmm3
-
- addq $2 * SIZE, A1
- addq $2 * SIZE, A2
- addq $2 * SIZE, X1
- ALIGN_3
- .L11X:
- #endif
-
- movaps -32 * SIZE(X1), %xmm12
- movaps -28 * SIZE(X1), %xmm13
-
- #if (GEMV_UNROLL == 2) && defined(PREFETCHW)
- PREFETCHW 3 * SIZE(Y1)
- #endif
-
- movq MM, I
- sarq $3, I
- jle .L115
-
- movaps -32 * SIZE(A1), %xmm8
- movsd -32 * SIZE(A2), %xmm9
- movhps -30 * SIZE(A2), %xmm9
-
- movaps -28 * SIZE(A1), %xmm10
- movsd -28 * SIZE(A2), %xmm11
- movhps -26 * SIZE(A2), %xmm11
-
- decq I
- jle .L114
- ALIGN_3
-
- .L113:
- #ifdef PREFETCH
- PREFETCH (PREFETCHSIZE) * 2 - 128 + PREOFFSET(A1)
- #endif
-
- pshufd $0xb1, %xmm8, %xmm4
- mulps %xmm12, %xmm8
- addps %xmm8, %xmm0
- movaps -24 * SIZE(A1), %xmm8
- mulps %xmm12, %xmm4
- SUBPS %xmm4, %xmm1
-
- pshufd $0xb1, %xmm9, %xmm5
- mulps %xmm12, %xmm9
- addps %xmm9, %xmm2
- movsd -24 * SIZE(A2), %xmm9
- movhps -22 * SIZE(A2), %xmm9
- mulps %xmm12, %xmm5
- SUBPS %xmm5, %xmm3
-
- movaps -24 * SIZE(X1), %xmm12
-
- pshufd $0xb1, %xmm10, %xmm6
- mulps %xmm13, %xmm10
- addps %xmm10, %xmm0
- movaps -20 * SIZE(A1), %xmm10
- mulps %xmm13, %xmm6
- SUBPS %xmm6, %xmm1
-
- pshufd $0xb1, %xmm11, %xmm7
- mulps %xmm13, %xmm11
- addps %xmm11, %xmm2
- movsd -20 * SIZE(A2), %xmm11
- movhps -18 * SIZE(A2), %xmm11
- mulps %xmm13, %xmm7
- SUBPS %xmm7, %xmm3
-
- movaps -20 * SIZE(X1), %xmm13
-
- #ifdef PREFETCH
- PREFETCH (PREFETCHSIZE) * 2 - 128 + PREOFFSET(A2)
- #endif
-
- pshufd $0xb1, %xmm8, %xmm4
- mulps %xmm12, %xmm8
- addps %xmm8, %xmm0
- movaps -16 * SIZE(A1), %xmm8
- mulps %xmm12, %xmm4
- SUBPS %xmm4, %xmm1
-
- pshufd $0xb1, %xmm9, %xmm5
- mulps %xmm12, %xmm9
- addps %xmm9, %xmm2
- movsd -16 * SIZE(A2), %xmm9
- movhps -14 * SIZE(A2), %xmm9
- mulps %xmm12, %xmm5
- SUBPS %xmm5, %xmm3
-
- movaps -16 * SIZE(X1), %xmm12
-
- #ifdef PREFETCHW
- PREFETCH (PREFETCHSIZE) * 2 - 128 + PREOFFSET(X1)
- #endif
-
- pshufd $0xb1, %xmm10, %xmm6
- mulps %xmm13, %xmm10
- addps %xmm10, %xmm0
- movaps -12 * SIZE(A1), %xmm10
- mulps %xmm13, %xmm6
- SUBPS %xmm6, %xmm1
-
- pshufd $0xb1, %xmm11, %xmm7
- mulps %xmm13, %xmm11
- addps %xmm11, %xmm2
- movsd -12 * SIZE(A2), %xmm11
- movhps -10 * SIZE(A2), %xmm11
- mulps %xmm13, %xmm7
- SUBPS %xmm7, %xmm3
-
- movaps -12 * SIZE(X1), %xmm13
-
- subq $-16 * SIZE, A1
- subq $-16 * SIZE, A2
- subq $-16 * SIZE, X1
-
- subq $1, I
- BRANCH
- jg .L113
- ALIGN_3
-
- .L114:
- pshufd $0xb1, %xmm8, %xmm4
- mulps %xmm12, %xmm8
- addps %xmm8, %xmm0
- movaps -24 * SIZE(A1), %xmm8
- mulps %xmm12, %xmm4
- SUBPS %xmm4, %xmm1
-
- pshufd $0xb1, %xmm9, %xmm5
- mulps %xmm12, %xmm9
- addps %xmm9, %xmm2
- movsd -24 * SIZE(A2), %xmm9
- movhps -22 * SIZE(A2), %xmm9
- mulps %xmm12, %xmm5
- SUBPS %xmm5, %xmm3
-
- movaps -24 * SIZE(X1), %xmm12
-
- pshufd $0xb1, %xmm10, %xmm6
- mulps %xmm13, %xmm10
- addps %xmm10, %xmm0
- movaps -20 * SIZE(A1), %xmm10
- mulps %xmm13, %xmm6
- SUBPS %xmm6, %xmm1
-
- pshufd $0xb1, %xmm11, %xmm7
- mulps %xmm13, %xmm11
- addps %xmm11, %xmm2
- movsd -20 * SIZE(A2), %xmm11
- movhps -18 * SIZE(A2), %xmm11
- mulps %xmm13, %xmm7
- SUBPS %xmm7, %xmm3
-
- movaps -20 * SIZE(X1), %xmm13
-
- pshufd $0xb1, %xmm8, %xmm4
- mulps %xmm12, %xmm8
- addps %xmm8, %xmm0
- mulps %xmm12, %xmm4
- SUBPS %xmm4, %xmm1
-
- pshufd $0xb1, %xmm9, %xmm5
- mulps %xmm12, %xmm9
- addps %xmm9, %xmm2
- mulps %xmm12, %xmm5
- SUBPS %xmm5, %xmm3
-
- movaps -16 * SIZE(X1), %xmm12
-
- pshufd $0xb1, %xmm10, %xmm6
- mulps %xmm13, %xmm10
- addps %xmm10, %xmm0
- mulps %xmm13, %xmm6
- SUBPS %xmm6, %xmm1
-
- pshufd $0xb1, %xmm11, %xmm7
- mulps %xmm13, %xmm11
- addps %xmm11, %xmm2
- mulps %xmm13, %xmm7
- SUBPS %xmm7, %xmm3
-
- movaps -12 * SIZE(X1), %xmm13
-
- subq $-16 * SIZE, A1
- subq $-16 * SIZE, A2
- subq $-16 * SIZE, X1
- ALIGN_3
-
- .L115:
- testq $4, MM
- je .L117
-
- movaps -32 * SIZE(A1), %xmm8
- movsd -32 * SIZE(A2), %xmm9
- movhps -30 * SIZE(A2), %xmm9
-
- movaps -28 * SIZE(A1), %xmm10
- movsd -28 * SIZE(A2), %xmm11
- movhps -26 * SIZE(A2), %xmm11
-
- pshufd $0xb1, %xmm8, %xmm4
- mulps %xmm12, %xmm8
- addps %xmm8, %xmm0
- mulps %xmm12, %xmm4
- SUBPS %xmm4, %xmm1
-
- pshufd $0xb1, %xmm9, %xmm5
- mulps %xmm12, %xmm9
- addps %xmm9, %xmm2
- mulps %xmm12, %xmm5
- SUBPS %xmm5, %xmm3
-
- movaps -24 * SIZE(X1), %xmm12
-
- pshufd $0xb1, %xmm10, %xmm6
- mulps %xmm13, %xmm10
- addps %xmm10, %xmm0
- mulps %xmm13, %xmm6
- SUBPS %xmm6, %xmm1
-
- pshufd $0xb1, %xmm11, %xmm7
- mulps %xmm13, %xmm11
- addps %xmm11, %xmm2
- mulps %xmm13, %xmm7
- SUBPS %xmm7, %xmm3
-
- movaps -20 * SIZE(X1), %xmm13
-
- addq $8 * SIZE, A1
- addq $8 * SIZE, A2
- ALIGN_3
-
- .L117:
- testq $2, MM
- je .L118
-
- movaps -32 * SIZE(A1), %xmm8
- movsd -32 * SIZE(A2), %xmm9
- movhps -30 * SIZE(A2), %xmm9
-
- pshufd $0xb1, %xmm8, %xmm4
- mulps %xmm12, %xmm8
- addps %xmm8, %xmm0
- mulps %xmm12, %xmm4
- SUBPS %xmm4, %xmm1
-
- pshufd $0xb1, %xmm9, %xmm5
- mulps %xmm12, %xmm9
- addps %xmm9, %xmm2
- mulps %xmm12, %xmm5
- SUBPS %xmm5, %xmm3
-
- movaps %xmm13, %xmm12
-
- addq $4 * SIZE, A1
- addq $4 * SIZE, A2
- ALIGN_3
-
- .L118:
- testq $1, MM
- je .L119
-
- #ifdef movsd
- xorps %xmm8, %xmm8
- #endif
- movsd -32 * SIZE(A1), %xmm8
- #ifdef movsd
- xorps %xmm9, %xmm9
- #endif
- movsd -32 * SIZE(A2), %xmm9
-
- pshufd $0xb1, %xmm8, %xmm4
- mulps %xmm12, %xmm8
- addps %xmm8, %xmm0
- mulps %xmm12, %xmm4
- SUBPS %xmm4, %xmm1
-
- pshufd $0xb1, %xmm9, %xmm5
- mulps %xmm12, %xmm9
- addps %xmm9, %xmm2
- mulps %xmm12, %xmm5
- SUBPS %xmm5, %xmm3
- ALIGN_3
-
- .L119:
- pcmpeqb %xmm5, %xmm5
- psllq $63, %xmm5
-
- #if (!defined(CONJ) && !defined(XCONJ)) || (defined(CONJ) && defined(XCONJ))
- xorps %xmm5, %xmm0
- xorps %xmm5, %xmm2
- #else
- xorps %xmm5, %xmm1
- xorps %xmm5, %xmm3
- #endif
-
- #ifdef HAVE_SSE3
- haddps %xmm1, %xmm0
- haddps %xmm3, %xmm2
- haddps %xmm2, %xmm0
- #else
- movaps %xmm0, %xmm8
- unpcklps %xmm1, %xmm0
- unpckhps %xmm1, %xmm8
-
- movaps %xmm2, %xmm4
- unpcklps %xmm3, %xmm2
- unpckhps %xmm3, %xmm4
-
- addps %xmm8, %xmm0
- addps %xmm4, %xmm2
-
- movhlps %xmm0, %xmm1
- movhlps %xmm2, %xmm3
-
- addps %xmm1, %xmm0
- addps %xmm3, %xmm2
- movlhps %xmm2, %xmm0
- #endif
-
- pshufd $0xb1, %xmm0, %xmm1
-
- #ifdef HAVE_SSE3
- movddup ALPHA, %xmm15
- #else
- movsd ALPHA, %xmm15
- pshufd $0x44, %xmm15, %xmm15
- #endif
-
- mulps %xmm15, %xmm0
- mulps %xmm15, %xmm1
-
- xorps %xmm5, %xmm0
-
- #ifdef HAVE_SSE3
- haddps %xmm1, %xmm0
- #else
- movaps %xmm0, %xmm2
- shufps $0x88, %xmm1, %xmm0
- shufps $0xdd, %xmm1, %xmm2
-
- addps %xmm2, %xmm0
- #endif
-
- movsd (Y), %xmm12
- addq INCY, Y
- movhps (Y), %xmm12
- addq INCY, Y
-
- shufps $0xd8, %xmm0, %xmm0
-
- addps %xmm12, %xmm0
-
- movlps %xmm0, (Y1)
- addq INCY, Y1
- movhps %xmm0, (Y1)
- addq INCY, Y1
-
- #if GEMV_UNROLL == 2
- cmpq $2, N
- jge .L111
- #endif
- ALIGN_3
-
- .L120:
- cmpq $1, N
- jl .L999
-
- leaq 32 * SIZE(BUFFER), X1
-
- movq A, A1
-
- xorps %xmm0, %xmm0
- xorps %xmm1, %xmm1
-
- #ifdef ALIGNED_ACCESS
- cmpq M, MM
- je .L12X
-
- #ifdef movsd
- xorps %xmm8, %xmm8
- #endif
- movsd -32 * SIZE(A1), %xmm8
- #ifdef movsd
- xorps %xmm12, %xmm12
- #endif
- movsd -32 * SIZE(X1), %xmm12
-
- pshufd $0xb1, %xmm8, %xmm4
- mulps %xmm12, %xmm8
- addps %xmm8, %xmm0
- mulps %xmm12, %xmm4
- SUBPS %xmm4, %xmm1
-
- addq $2 * SIZE, A1
- addq $2 * SIZE, X1
- ALIGN_3
- .L12X:
- #endif
-
- movaps -32 * SIZE(X1), %xmm12
- movaps -28 * SIZE(X1), %xmm13
-
- movq MM, I
- sarq $3, I
- jle .L125
-
- MOVUPS_A1(-32 * SIZE, A1, %xmm8)
- MOVUPS_A1(-28 * SIZE, A1, %xmm10)
-
- decq I
- jle .L124
- ALIGN_3
-
- .L123:
- #ifdef PREFETCH
- PREFETCH (PREFETCHSIZE) * 4 - 128 + PREOFFSET(A1)
- #endif
-
- pshufd $0xb1, %xmm8, %xmm4
- mulps %xmm12, %xmm8
- addps %xmm8, %xmm0
- MOVUPS_A1(-24 * SIZE, A1, %xmm8)
- mulps %xmm12, %xmm4
- SUBPS %xmm4, %xmm1
-
- movaps -24 * SIZE(X1), %xmm12
-
- pshufd $0xb1, %xmm10, %xmm6
- mulps %xmm13, %xmm10
- addps %xmm10, %xmm0
- MOVUPS_A1(-20 * SIZE, A1, %xmm10)
- mulps %xmm13, %xmm6
- SUBPS %xmm6, %xmm1
-
- movaps -20 * SIZE(X1), %xmm13
-
- pshufd $0xb1, %xmm8, %xmm4
- mulps %xmm12, %xmm8
- addps %xmm8, %xmm0
- MOVUPS_A1(-16 * SIZE, A1, %xmm8)
- mulps %xmm12, %xmm4
- SUBPS %xmm4, %xmm1
-
- movaps -16 * SIZE(X1), %xmm12
-
- #ifdef PREFETCHW
- PREFETCH (PREFETCHSIZE) * 4 - 128 + PREOFFSET(X1)
- #endif
-
- pshufd $0xb1, %xmm10, %xmm6
- mulps %xmm13, %xmm10
- addps %xmm10, %xmm0
- MOVUPS_A1(-12 * SIZE, A1, %xmm10)
- mulps %xmm13, %xmm6
- SUBPS %xmm6, %xmm1
-
- movaps -12 * SIZE(X1), %xmm13
-
- subq $-16 * SIZE, A1
- subq $-16 * SIZE, X1
-
- subq $1, I
- BRANCH
- jg .L123
- ALIGN_3
-
- .L124:
- pshufd $0xb1, %xmm8, %xmm4
- mulps %xmm12, %xmm8
- addps %xmm8, %xmm0
- MOVUPS_A1(-24 * SIZE, A1, %xmm8)
- mulps %xmm12, %xmm4
- SUBPS %xmm4, %xmm1
-
- movaps -24 * SIZE(X1), %xmm12
-
- pshufd $0xb1, %xmm10, %xmm6
- mulps %xmm13, %xmm10
- addps %xmm10, %xmm0
- MOVUPS_A1(-20 * SIZE, A1, %xmm10)
- mulps %xmm13, %xmm6
- SUBPS %xmm6, %xmm1
-
- movaps -20 * SIZE(X1), %xmm13
-
- pshufd $0xb1, %xmm8, %xmm4
- mulps %xmm12, %xmm8
- addps %xmm8, %xmm0
- mulps %xmm12, %xmm4
- SUBPS %xmm4, %xmm1
-
- movaps -16 * SIZE(X1), %xmm12
-
- pshufd $0xb1, %xmm10, %xmm6
- mulps %xmm13, %xmm10
- addps %xmm10, %xmm0
- mulps %xmm13, %xmm6
- SUBPS %xmm6, %xmm1
-
- movaps -12 * SIZE(X1), %xmm13
-
- subq $-16 * SIZE, A1
- subq $-16 * SIZE, X1
- ALIGN_3
-
- .L125:
- testq $4, MM
- je .L127
-
- MOVUPS_A1(-32 * SIZE, A1, %xmm8)
- MOVUPS_A1(-28 * SIZE, A1, %xmm10)
-
- pshufd $0xb1, %xmm8, %xmm4
- mulps %xmm12, %xmm8
- addps %xmm8, %xmm0
- mulps %xmm12, %xmm4
- SUBPS %xmm4, %xmm1
-
- movaps -24 * SIZE(X1), %xmm12
-
- pshufd $0xb1, %xmm10, %xmm6
- mulps %xmm13, %xmm10
- addps %xmm10, %xmm0
- mulps %xmm13, %xmm6
- SUBPS %xmm6, %xmm1
-
- movaps -20 * SIZE(X1), %xmm13
-
- addq $8 * SIZE, A1
- ALIGN_3
-
- .L127:
- testq $2, MM
- je .L128
-
- MOVUPS_A1(-32 * SIZE, A1, %xmm8)
-
- pshufd $0xb1, %xmm8, %xmm4
- mulps %xmm12, %xmm8
- addps %xmm8, %xmm0
- mulps %xmm12, %xmm4
- SUBPS %xmm4, %xmm1
-
- movaps %xmm13, %xmm12
-
- addq $4 * SIZE, A1
- ALIGN_3
-
- .L128:
- testq $1, MM
- je .L129
-
- #ifdef movsd
- xorps %xmm8, %xmm8
- #endif
- movsd -32 * SIZE(A1), %xmm8
-
- pshufd $0xb1, %xmm8, %xmm4
- mulps %xmm12, %xmm8
- addps %xmm8, %xmm0
- mulps %xmm12, %xmm4
- SUBPS %xmm4, %xmm1
- ALIGN_3
-
- .L129:
- pcmpeqb %xmm5, %xmm5
- psllq $63, %xmm5
-
- #if (!defined(CONJ) && !defined(XCONJ)) || (defined(CONJ) && defined(XCONJ))
- xorps %xmm5, %xmm0
- #else
- xorps %xmm5, %xmm1
- #endif
-
- #ifdef HAVE_SSE3
- haddps %xmm1, %xmm0
- haddps %xmm0, %xmm0
- #else
- movaps %xmm0, %xmm8
- unpcklps %xmm1, %xmm0
- unpckhps %xmm1, %xmm8
-
- addps %xmm8, %xmm0
-
- movhlps %xmm0, %xmm1
-
- addps %xmm1, %xmm0
- #endif
-
- pshufd $0xb1, %xmm0, %xmm1
-
- #ifdef HAVE_SSE3
- movddup ALPHA, %xmm15
- #else
- movsd ALPHA, %xmm15
- pshufd $0x44, %xmm15, %xmm15
- #endif
-
- mulps %xmm15, %xmm0
- mulps %xmm15, %xmm1
-
- xorps %xmm5, %xmm0
-
- #ifdef HAVE_SSE3
- haddps %xmm1, %xmm0
- #else
- movaps %xmm0, %xmm2
- shufps $0x88, %xmm1, %xmm0
- shufps $0xdd, %xmm1, %xmm2
-
- addps %xmm2, %xmm0
- #endif
-
- movsd (Y), %xmm12
- addq INCY, Y
-
- shufps $0xd8, %xmm0, %xmm0
-
- addps %xmm12, %xmm0
-
- movlps %xmm0, (Y1)
- addq INCY, Y1
- jmp .L999
- ALIGN_3
-
-
- .L200:
- testq $2 * SIZE, LDA
- jne .L300
-
- cmpq $2, N
- jl .L210
- ALIGN_3
-
- .L201:
- subq $2, N
-
- leaq 32 * SIZE(BUFFER), X1
-
- movq A, A1
- leaq (A1, LDA), A2
- leaq (A1, LDA, 2), A
-
- xorps %xmm0, %xmm0
- xorps %xmm1, %xmm1
- xorps %xmm2, %xmm2
- xorps %xmm3, %xmm3
-
- #ifdef ALIGNED_ACCESS
- cmpq M, MM
- je .L20X
-
- #ifdef movsd
- xorps %xmm8, %xmm8
- #endif
- movsd -32 * SIZE(A1), %xmm8
- #ifdef movsd
- xorps %xmm9, %xmm9
- #endif
- movsd -32 * SIZE(A2), %xmm9
-
- #ifdef movsd
- xorps %xmm12, %xmm12
- #endif
- movsd -32 * SIZE(X1), %xmm12
-
- pshufd $0xb1, %xmm8, %xmm4
- mulps %xmm12, %xmm8
- addps %xmm8, %xmm0
- mulps %xmm12, %xmm4
- SUBPS %xmm4, %xmm1
-
- pshufd $0xb1, %xmm9, %xmm5
- mulps %xmm12, %xmm9
- addps %xmm9, %xmm2
- mulps %xmm12, %xmm5
- SUBPS %xmm5, %xmm3
-
- addq $2 * SIZE, A1
- addq $2 * SIZE, A2
- addq $2 * SIZE, X1
- ALIGN_3
- .L20X:
- #endif
-
- movaps -33 * SIZE(A1), %xmm4
- movaps -33 * SIZE(A2), %xmm5
-
- movaps -32 * SIZE(X1), %xmm12
- movaps -28 * SIZE(X1), %xmm13
-
- #ifdef PREFETCHW
- PREFETCHW 3 * SIZE(Y1)
- #endif
-
- movq MM, I
- sarq $3, I
- jle .L205
-
- movaps -29 * SIZE(A1), %xmm6
- movaps -29 * SIZE(A2), %xmm7
-
- decq I
- jle .L204
- ALIGN_3
-
- .L203:
- #ifdef PREFETCH
- PREFETCH (PREFETCHSIZE) * 2 - 128 + PREOFFSET(A1)
- #endif
-
- movss %xmm6, %xmm4
- shufps $0x39, %xmm4, %xmm4
- pshufd $0xb1, %xmm4, %xmm14
- mulps %xmm12, %xmm4
- addps %xmm4, %xmm0
- movaps -25 * SIZE(A1), %xmm4
- mulps %xmm12, %xmm14
- SUBPS %xmm14, %xmm1
-
- movss %xmm7, %xmm5
- shufps $0x39, %xmm5, %xmm5
- pshufd $0xb1, %xmm5, %xmm14
- mulps %xmm12, %xmm5
- addps %xmm5, %xmm2
- movaps -25 * SIZE(A2), %xmm5
- mulps %xmm12, %xmm14
- movaps -24 * SIZE(X1), %xmm12
- SUBPS %xmm14, %xmm3
-
- movss %xmm4, %xmm6
- shufps $0x39, %xmm6, %xmm6
- pshufd $0xb1, %xmm6, %xmm14
- mulps %xmm13, %xmm6
- addps %xmm6, %xmm0
- movaps -21 * SIZE(A1), %xmm6
- mulps %xmm13, %xmm14
- SUBPS %xmm14, %xmm1
-
- movss %xmm5, %xmm7
- shufps $0x39, %xmm7, %xmm7
- pshufd $0xb1, %xmm7, %xmm14
- mulps %xmm13, %xmm7
- addps %xmm7, %xmm2
- movaps -21 * SIZE(A2), %xmm7
- mulps %xmm13, %xmm14
- movaps -20 * SIZE(X1), %xmm13
- SUBPS %xmm14, %xmm3
-
- #ifdef PREFETCH
- PREFETCH (PREFETCHSIZE) * 2 - 128 + PREOFFSET(A2)
- #endif
-
- movss %xmm6, %xmm4
- shufps $0x39, %xmm4, %xmm4
- pshufd $0xb1, %xmm4, %xmm14
- mulps %xmm12, %xmm4
- addps %xmm4, %xmm0
- movaps -17 * SIZE(A1), %xmm4
- mulps %xmm12, %xmm14
- SUBPS %xmm14, %xmm1
-
- movss %xmm7, %xmm5
- shufps $0x39, %xmm5, %xmm5
- pshufd $0xb1, %xmm5, %xmm14
- mulps %xmm12, %xmm5
- addps %xmm5, %xmm2
- movaps -17 * SIZE(A2), %xmm5
- mulps %xmm12, %xmm14
- movaps -16 * SIZE(X1), %xmm12
- SUBPS %xmm14, %xmm3
-
- #ifdef PREFETCHW
- PREFETCH (PREFETCHSIZE) * 2 - 128 + PREOFFSET(X1)
- #endif
-
- movss %xmm4, %xmm6
- shufps $0x39, %xmm6, %xmm6
- pshufd $0xb1, %xmm6, %xmm14
- mulps %xmm13, %xmm6
- addps %xmm6, %xmm0
- movaps -13 * SIZE(A1), %xmm6
- mulps %xmm13, %xmm14
- SUBPS %xmm14, %xmm1
-
- movss %xmm5, %xmm7
- shufps $0x39, %xmm7, %xmm7
- pshufd $0xb1, %xmm7, %xmm14
- mulps %xmm13, %xmm7
- addps %xmm7, %xmm2
- movaps -13 * SIZE(A2), %xmm7
- mulps %xmm13, %xmm14
- movaps -12 * SIZE(X1), %xmm13
- SUBPS %xmm14, %xmm3
-
- subq $-16 * SIZE, A1
- subq $-16 * SIZE, A2
- subq $-16 * SIZE, X1
-
- subq $1, I
- BRANCH
- jg .L203
- ALIGN_3
-
- .L204:
- movss %xmm6, %xmm4
- shufps $0x39, %xmm4, %xmm4
- pshufd $0xb1, %xmm4, %xmm14
- mulps %xmm12, %xmm4
- addps %xmm4, %xmm0
- movaps -25 * SIZE(A1), %xmm4
- mulps %xmm12, %xmm14
- SUBPS %xmm14, %xmm1
-
- movss %xmm7, %xmm5
- shufps $0x39, %xmm5, %xmm5
- pshufd $0xb1, %xmm5, %xmm14
- mulps %xmm12, %xmm5
- addps %xmm5, %xmm2
- movaps -25 * SIZE(A2), %xmm5
- mulps %xmm12, %xmm14
- movaps -24 * SIZE(X1), %xmm12
- SUBPS %xmm14, %xmm3
-
- movss %xmm4, %xmm6
- shufps $0x39, %xmm6, %xmm6
- pshufd $0xb1, %xmm6, %xmm14
- mulps %xmm13, %xmm6
- addps %xmm6, %xmm0
- movaps -21 * SIZE(A1), %xmm6
- mulps %xmm13, %xmm14
- SUBPS %xmm14, %xmm1
-
- movss %xmm5, %xmm7
- shufps $0x39, %xmm7, %xmm7
- pshufd $0xb1, %xmm7, %xmm14
- mulps %xmm13, %xmm7
- addps %xmm7, %xmm2
- movaps -21 * SIZE(A2), %xmm7
- mulps %xmm13, %xmm14
- movaps -20 * SIZE(X1), %xmm13
- SUBPS %xmm14, %xmm3
-
- movss %xmm6, %xmm4
- shufps $0x39, %xmm4, %xmm4
- pshufd $0xb1, %xmm4, %xmm14
- mulps %xmm12, %xmm4
- addps %xmm4, %xmm0
- movaps -17 * SIZE(A1), %xmm4
- mulps %xmm12, %xmm14
- SUBPS %xmm14, %xmm1
-
- movss %xmm7, %xmm5
- shufps $0x39, %xmm5, %xmm5
- pshufd $0xb1, %xmm5, %xmm14
- mulps %xmm12, %xmm5
- addps %xmm5, %xmm2
- movaps -17 * SIZE(A2), %xmm5
- mulps %xmm12, %xmm14
- movaps -16 * SIZE(X1), %xmm12
- SUBPS %xmm14, %xmm3
-
- movss %xmm4, %xmm6
- shufps $0x39, %xmm6, %xmm6
- pshufd $0xb1, %xmm6, %xmm14
- mulps %xmm13, %xmm6
- addps %xmm6, %xmm0
- mulps %xmm13, %xmm14
- SUBPS %xmm14, %xmm1
-
- movss %xmm5, %xmm7
- shufps $0x39, %xmm7, %xmm7
- pshufd $0xb1, %xmm7, %xmm14
- mulps %xmm13, %xmm7
- addps %xmm7, %xmm2
- mulps %xmm13, %xmm14
- movaps -12 * SIZE(X1), %xmm13
- SUBPS %xmm14, %xmm3
-
- subq $-16 * SIZE, A1
- subq $-16 * SIZE, A2
- subq $-16 * SIZE, X1
- ALIGN_3
-
- .L205:
- testq $4, MM
- je .L207
-
- movaps -29 * SIZE(A1), %xmm6
-
- movss %xmm6, %xmm4
- shufps $0x39, %xmm4, %xmm4
- pshufd $0xb1, %xmm4, %xmm14
- mulps %xmm12, %xmm4
- addps %xmm4, %xmm0
- mulps %xmm12, %xmm14
- SUBPS %xmm14, %xmm1
-
- movaps -29 * SIZE(A2), %xmm7
-
- movss %xmm7, %xmm5
- shufps $0x39, %xmm5, %xmm5
- pshufd $0xb1, %xmm5, %xmm14
- mulps %xmm12, %xmm5
- addps %xmm5, %xmm2
- mulps %xmm12, %xmm14
- SUBPS %xmm14, %xmm3
-
- movaps -25 * SIZE(A1), %xmm8
-
- movss %xmm8, %xmm6
- shufps $0x39, %xmm6, %xmm6
- pshufd $0xb1, %xmm6, %xmm14
- mulps %xmm13, %xmm6
- addps %xmm6, %xmm0
- mulps %xmm13, %xmm14
- SUBPS %xmm14, %xmm1
-
- movaps -25 * SIZE(A2), %xmm9
-
- movss %xmm9, %xmm7
- shufps $0x39, %xmm7, %xmm7
- pshufd $0xb1, %xmm7, %xmm14
- mulps %xmm13, %xmm7
- addps %xmm7, %xmm2
- mulps %xmm13, %xmm14
- SUBPS %xmm14, %xmm3
-
- movaps %xmm8, %xmm4
- movaps %xmm9, %xmm5
-
- movaps -24 * SIZE(X1), %xmm12
- movaps -20 * SIZE(X1), %xmm13
-
- addq $8 * SIZE, A1
- addq $8 * SIZE, A2
- ALIGN_3
-
- .L207:
- testq $2, MM
- je .L208
-
- movaps -29 * SIZE(A1), %xmm6
- movaps -29 * SIZE(A2), %xmm7
-
- movss %xmm6, %xmm4
- shufps $0x39, %xmm4, %xmm4
- pshufd $0xb1, %xmm4, %xmm14
- mulps %xmm12, %xmm4
- addps %xmm4, %xmm0
- mulps %xmm12, %xmm14
- SUBPS %xmm14, %xmm1
-
- movss %xmm7, %xmm5
- shufps $0x39, %xmm5, %xmm5
- pshufd $0xb1, %xmm5, %xmm14
- mulps %xmm12, %xmm5
- addps %xmm5, %xmm2
- mulps %xmm12, %xmm14
- SUBPS %xmm14, %xmm3
-
- movaps %xmm6, %xmm4
- movaps %xmm7, %xmm5
- movaps %xmm13, %xmm12
-
- addq $4 * SIZE, A1
- addq $4 * SIZE, A2
- ALIGN_3
-
- .L208:
- testq $1, MM
- je .L209
-
- #ifdef movsd
- xorps %xmm8, %xmm8
- #endif
- movsd -32 * SIZE(A1), %xmm8
- #ifdef movsd
- xorps %xmm9, %xmm9
- #endif
- movsd -32 * SIZE(A2), %xmm9
-
- pshufd $0xb1, %xmm8, %xmm4
- mulps %xmm12, %xmm8
- addps %xmm8, %xmm0
- mulps %xmm12, %xmm4
- SUBPS %xmm4, %xmm1
-
- pshufd $0xb1, %xmm9, %xmm5
- mulps %xmm12, %xmm9
- addps %xmm9, %xmm2
- mulps %xmm12, %xmm5
- SUBPS %xmm5, %xmm3
- ALIGN_3
-
- .L209:
- pcmpeqb %xmm5, %xmm5
- psllq $63, %xmm5
-
- #if (!defined(CONJ) && !defined(XCONJ)) || (defined(CONJ) && defined(XCONJ))
- xorps %xmm5, %xmm0
- xorps %xmm5, %xmm2
- #else
- xorps %xmm5, %xmm1
- xorps %xmm5, %xmm3
- #endif
-
- #ifdef HAVE_SSE3
- haddps %xmm1, %xmm0
- haddps %xmm3, %xmm2
- haddps %xmm2, %xmm0
- #else
- movaps %xmm0, %xmm8
- unpcklps %xmm1, %xmm0
- unpckhps %xmm1, %xmm8
-
- movaps %xmm2, %xmm4
- unpcklps %xmm3, %xmm2
- unpckhps %xmm3, %xmm4
-
- addps %xmm8, %xmm0
- addps %xmm4, %xmm2
-
- movhlps %xmm0, %xmm1
- movhlps %xmm2, %xmm3
-
- addps %xmm1, %xmm0
- addps %xmm3, %xmm2
- movlhps %xmm2, %xmm0
- #endif
-
- pshufd $0xb1, %xmm0, %xmm1
-
- #ifdef HAVE_SSE3
- movddup ALPHA, %xmm15
- #else
- movsd ALPHA, %xmm15
- pshufd $0x44, %xmm15, %xmm15
- #endif
-
- mulps %xmm15, %xmm0
- mulps %xmm15, %xmm1
-
- xorps %xmm5, %xmm0
-
- #ifdef HAVE_SSE3
- haddps %xmm1, %xmm0
- #else
- movaps %xmm0, %xmm2
- shufps $0x88, %xmm1, %xmm0
- shufps $0xdd, %xmm1, %xmm2
-
- addps %xmm2, %xmm0
- #endif
-
- movsd (Y), %xmm12
- addq INCY, Y
- movhps (Y), %xmm12
- addq INCY, Y
-
- shufps $0xd8, %xmm0, %xmm0
-
- addps %xmm12, %xmm0
-
- movlps %xmm0, (Y1)
- addq INCY, Y1
- movhps %xmm0, (Y1)
- addq INCY, Y1
-
- cmpq $2, N
- jge .L201
- ALIGN_3
-
- .L210:
- cmpq $1, N
- jl .L999
-
- leaq 32 * SIZE(BUFFER), X1
-
- movq A, A1
-
- xorps %xmm0, %xmm0
- xorps %xmm1, %xmm1
-
- #ifdef ALIGNED_ACCESS
- cmpq M, MM
- je .L21X
-
- #ifdef movsd
- xorps %xmm8, %xmm8
- #endif
- movsd -32 * SIZE(A1), %xmm8
- #ifdef movsd
- xorps %xmm12, %xmm12
- #endif
- movsd -32 * SIZE(X1), %xmm12
-
- pshufd $0xb1, %xmm8, %xmm4
- mulps %xmm12, %xmm8
- addps %xmm8, %xmm0
- mulps %xmm12, %xmm4
- SUBPS %xmm4, %xmm1
-
- addq $2 * SIZE, A1
- addq $2 * SIZE, X1
- ALIGN_3
- .L21X:
- #endif
-
- movaps -33 * SIZE(A1), %xmm4
-
- movaps -32 * SIZE(X1), %xmm12
- movaps -28 * SIZE(X1), %xmm13
-
- movq MM, I
- sarq $3, I
- jle .L215
-
- movaps -29 * SIZE(A1), %xmm5
- movaps -25 * SIZE(A1), %xmm6
- movaps -21 * SIZE(A1), %xmm7
-
- decq I
- jle .L214
- ALIGN_3
-
- .L213:
- #ifdef PREFETCH
- PREFETCH (PREFETCHSIZE) * 4 - 128 + PREOFFSET(A1)
- #endif
-
- movss %xmm5, %xmm4
- shufps $0x39, %xmm4, %xmm4
- pshufd $0xb1, %xmm4, %xmm14
- mulps %xmm12, %xmm4
- addps %xmm4, %xmm0
- movaps -17 * SIZE(A1), %xmm4
- mulps %xmm12, %xmm14
- movaps -24 * SIZE(X1), %xmm12
- SUBPS %xmm14, %xmm1
-
- movss %xmm6, %xmm5
- shufps $0x39, %xmm5, %xmm5
- pshufd $0xb1, %xmm5, %xmm15
- mulps %xmm13, %xmm5
- addps %xmm5, %xmm0
- movaps -13 * SIZE(A1), %xmm5
- mulps %xmm13, %xmm15
- movaps -20 * SIZE(X1), %xmm13
- SUBPS %xmm15, %xmm1
-
- #ifdef PREFETCHW
- PREFETCH (PREFETCHSIZE) * 4 - 128 + PREOFFSET(X1)
- #endif
-
- movss %xmm7, %xmm6
- shufps $0x39, %xmm6, %xmm6
- pshufd $0xb1, %xmm6, %xmm14
- mulps %xmm12, %xmm6
- addps %xmm6, %xmm0
- movaps -9 * SIZE(A1), %xmm6
- mulps %xmm12, %xmm14
- movaps -16 * SIZE(X1), %xmm12
- SUBPS %xmm14, %xmm1
-
- movss %xmm4, %xmm7
- shufps $0x39, %xmm7, %xmm7
- pshufd $0xb1, %xmm7, %xmm15
- mulps %xmm13, %xmm7
- addps %xmm7, %xmm0
- movaps -5 * SIZE(A1), %xmm7
- mulps %xmm13, %xmm15
- movaps -12 * SIZE(X1), %xmm13
- SUBPS %xmm15, %xmm1
-
- subq $-16 * SIZE, A1
- subq $-16 * SIZE, X1
-
- subq $1, I
- BRANCH
- jg .L213
- ALIGN_3
-
- .L214:
- movss %xmm5, %xmm4
- shufps $0x39, %xmm4, %xmm4
- pshufd $0xb1, %xmm4, %xmm14
- mulps %xmm12, %xmm4
- addps %xmm4, %xmm0
- movaps -17 * SIZE(A1), %xmm4
- mulps %xmm12, %xmm14
- movaps -24 * SIZE(X1), %xmm12
- SUBPS %xmm14, %xmm1
-
- movss %xmm6, %xmm5
- shufps $0x39, %xmm5, %xmm5
- pshufd $0xb1, %xmm5, %xmm15
- mulps %xmm13, %xmm5
- addps %xmm5, %xmm0
- mulps %xmm13, %xmm15
- movaps -20 * SIZE(X1), %xmm13
- SUBPS %xmm15, %xmm1
-
- movss %xmm7, %xmm6
- shufps $0x39, %xmm6, %xmm6
- pshufd $0xb1, %xmm6, %xmm14
- mulps %xmm12, %xmm6
- addps %xmm6, %xmm0
- mulps %xmm12, %xmm14
- movaps -16 * SIZE(X1), %xmm12
- SUBPS %xmm14, %xmm1
-
- movss %xmm4, %xmm7
- shufps $0x39, %xmm7, %xmm7
- pshufd $0xb1, %xmm7, %xmm15
- mulps %xmm13, %xmm7
- addps %xmm7, %xmm0
- mulps %xmm13, %xmm15
- movaps -12 * SIZE(X1), %xmm13
- SUBPS %xmm15, %xmm1
-
- subq $-16 * SIZE, A1
- subq $-16 * SIZE, X1
- ALIGN_3
-
- .L215:
- testq $4, MM
- je .L217
-
- movaps -29 * SIZE(A1), %xmm5
- movaps -25 * SIZE(A1), %xmm6
-
- movss %xmm5, %xmm4
- shufps $0x39, %xmm4, %xmm4
- pshufd $0xb1, %xmm4, %xmm14
- mulps %xmm12, %xmm4
- addps %xmm4, %xmm0
- mulps %xmm12, %xmm14
- SUBPS %xmm14, %xmm1
-
- movss %xmm6, %xmm5
- shufps $0x39, %xmm5, %xmm5
- pshufd $0xb1, %xmm5, %xmm15
- mulps %xmm13, %xmm5
- addps %xmm5, %xmm0
- mulps %xmm13, %xmm15
- SUBPS %xmm15, %xmm1
-
- movaps -24 * SIZE(X1), %xmm12
- movaps -20 * SIZE(X1), %xmm13
- movaps %xmm6, %xmm4
-
- addq $8 * SIZE, A1
- ALIGN_3
-
- .L217:
- testq $2, MM
- je .L218
-
- movaps -29 * SIZE(A1), %xmm5
-
- movss %xmm5, %xmm4
- shufps $0x39, %xmm4, %xmm4
-
- pshufd $0xb1, %xmm4, %xmm14
- mulps %xmm12, %xmm4
- addps %xmm4, %xmm0
- mulps %xmm12, %xmm14
- SUBPS %xmm14, %xmm1
-
- movaps %xmm13, %xmm12
-
- addq $4 * SIZE, A1
- ALIGN_3
-
- .L218:
- testq $1, MM
- je .L219
-
- #ifdef movsd
- xorps %xmm8, %xmm8
- #endif
- movsd -32 * SIZE(A1), %xmm8
-
- pshufd $0xb1, %xmm8, %xmm4
- mulps %xmm12, %xmm8
- addps %xmm8, %xmm0
- mulps %xmm12, %xmm4
- SUBPS %xmm4, %xmm1
- ALIGN_3
-
- .L219:
- pcmpeqb %xmm5, %xmm5
- psllq $63, %xmm5
-
- #if (!defined(CONJ) && !defined(XCONJ)) || (defined(CONJ) && defined(XCONJ))
- xorps %xmm5, %xmm0
- #else
- xorps %xmm5, %xmm1
- #endif
-
- #ifdef HAVE_SSE3
- haddps %xmm1, %xmm0
- haddps %xmm0, %xmm0
- #else
- movaps %xmm0, %xmm8
- unpcklps %xmm1, %xmm0
- unpckhps %xmm1, %xmm8
-
- addps %xmm8, %xmm0
-
- movhlps %xmm0, %xmm1
-
- addps %xmm1, %xmm0
- #endif
-
- pshufd $0xb1, %xmm0, %xmm1
-
- #ifdef HAVE_SSE3
- movddup ALPHA, %xmm15
- #else
- movsd ALPHA, %xmm15
- pshufd $0x44, %xmm15, %xmm15
- #endif
-
- mulps %xmm15, %xmm0
- mulps %xmm15, %xmm1
-
- xorps %xmm5, %xmm0
-
- #ifdef HAVE_SSE3
- haddps %xmm1, %xmm0
- #else
- movaps %xmm0, %xmm2
- shufps $0x88, %xmm1, %xmm0
- shufps $0xdd, %xmm1, %xmm2
-
- addps %xmm2, %xmm0
- #endif
-
- movsd (Y), %xmm12
- addq INCY, Y
-
- shufps $0xd8, %xmm0, %xmm0
-
- addps %xmm12, %xmm0
-
- movlps %xmm0, (Y1)
- addq INCY, Y1
- jmp .L999
-
- .L300:
- cmpq $2, N
- jl .L310
- ALIGN_3
-
- .L301:
- subq $2, N
-
- leaq 32 * SIZE(BUFFER), X1
-
- movq A, A1
- leaq (A1, LDA), A2
- leaq (A1, LDA, 2), A
-
- xorps %xmm0, %xmm0
- xorps %xmm1, %xmm1
- xorps %xmm2, %xmm2
- xorps %xmm3, %xmm3
-
- #ifdef ALIGNED_ACCESS
- cmpq M, MM
- je .L30X
-
- #ifdef movsd
- xorps %xmm8, %xmm8
- #endif
- movsd -32 * SIZE(A1), %xmm8
- #ifdef movsd
- xorps %xmm9, %xmm9
- #endif
- movsd -32 * SIZE(A2), %xmm9
-
- #ifdef movsd
- xorps %xmm12, %xmm12
- #endif
- movsd -32 * SIZE(X1), %xmm12
-
- pshufd $0xb1, %xmm8, %xmm4
- mulps %xmm12, %xmm8
- addps %xmm8, %xmm0
- mulps %xmm12, %xmm4
- SUBPS %xmm4, %xmm1
-
- pshufd $0xb1, %xmm9, %xmm5
- mulps %xmm12, %xmm9
- addps %xmm9, %xmm2
- mulps %xmm12, %xmm5
- SUBPS %xmm5, %xmm3
-
- addq $2 * SIZE, A1
- addq $2 * SIZE, A2
- addq $2 * SIZE, X1
- ALIGN_3
- .L30X:
- #endif
-
- movaps -33 * SIZE(A1), %xmm4
- movaps -35 * SIZE(A2), %xmm5
-
- movaps -32 * SIZE(X1), %xmm12
- movaps -28 * SIZE(X1), %xmm13
-
- #ifdef PREFETCHW
- PREFETCHW 3 * SIZE(Y1)
- #endif
-
- movq MM, I
- sarq $3, I
- jle .L305
-
- movaps -29 * SIZE(A1), %xmm6
- movaps -31 * SIZE(A2), %xmm7
-
- decq I
- jle .L304
- ALIGN_3
-
- .L303:
- #ifdef PREFETCH
- PREFETCH (PREFETCHSIZE) * 2 - 128 + PREOFFSET(A1)
- #endif
-
- movss %xmm6, %xmm4
- shufps $0x39, %xmm4, %xmm4
- pshufd $0xb1, %xmm4, %xmm14
- mulps %xmm12, %xmm4
- addps %xmm4, %xmm0
- movaps -25 * SIZE(A1), %xmm4
- mulps %xmm12, %xmm14
- SUBPS %xmm14, %xmm1
-
- movss %xmm7, %xmm5
- shufps $0x93, %xmm7, %xmm5
- pshufd $0xb1, %xmm5, %xmm14
- mulps %xmm12, %xmm5
- addps %xmm5, %xmm2
- movaps -27 * SIZE(A2), %xmm5
- mulps %xmm12, %xmm14
- movaps -24 * SIZE(X1), %xmm12
- SUBPS %xmm14, %xmm3
-
- movss %xmm4, %xmm6
- shufps $0x39, %xmm6, %xmm6
- pshufd $0xb1, %xmm6, %xmm14
- mulps %xmm13, %xmm6
- addps %xmm6, %xmm0
- movaps -21 * SIZE(A1), %xmm6
- mulps %xmm13, %xmm14
- SUBPS %xmm14, %xmm1
-
- movss %xmm5, %xmm7
- shufps $0x93, %xmm5, %xmm7
- pshufd $0xb1, %xmm7, %xmm14
- mulps %xmm13, %xmm7
- addps %xmm7, %xmm2
- movaps -23 * SIZE(A2), %xmm7
- mulps %xmm13, %xmm14
- movaps -20 * SIZE(X1), %xmm13
- SUBPS %xmm14, %xmm3
-
- #ifdef PREFETCH
- PREFETCH (PREFETCHSIZE) * 2 - 128 + PREOFFSET(A2)
- #endif
-
- movss %xmm6, %xmm4
- shufps $0x39, %xmm4, %xmm4
- pshufd $0xb1, %xmm4, %xmm14
- mulps %xmm12, %xmm4
- addps %xmm4, %xmm0
- movaps -17 * SIZE(A1), %xmm4
- mulps %xmm12, %xmm14
- SUBPS %xmm14, %xmm1
-
- movss %xmm7, %xmm5
- shufps $0x93, %xmm7, %xmm5
- pshufd $0xb1, %xmm5, %xmm14
- mulps %xmm12, %xmm5
- addps %xmm5, %xmm2
- movaps -19 * SIZE(A2), %xmm5
- mulps %xmm12, %xmm14
- movaps -16 * SIZE(X1), %xmm12
- SUBPS %xmm14, %xmm3
-
- #ifdef PREFETCHW
- PREFETCH (PREFETCHSIZE) * 2 - 128 + PREOFFSET(X1)
- #endif
-
- movss %xmm4, %xmm6
- shufps $0x39, %xmm6, %xmm6
- pshufd $0xb1, %xmm6, %xmm14
- mulps %xmm13, %xmm6
- addps %xmm6, %xmm0
- movaps -13 * SIZE(A1), %xmm6
- mulps %xmm13, %xmm14
- SUBPS %xmm14, %xmm1
-
- movss %xmm5, %xmm7
- shufps $0x93, %xmm5, %xmm7
- pshufd $0xb1, %xmm7, %xmm14
- mulps %xmm13, %xmm7
- addps %xmm7, %xmm2
- movaps -15 * SIZE(A2), %xmm7
- mulps %xmm13, %xmm14
- movaps -12 * SIZE(X1), %xmm13
- SUBPS %xmm14, %xmm3
-
- subq $-16 * SIZE, A1
- subq $-16 * SIZE, A2
- subq $-16 * SIZE, X1
-
- subq $1, I
- BRANCH
- jg .L303
- ALIGN_3
-
- .L304:
- movss %xmm6, %xmm4
- shufps $0x39, %xmm4, %xmm4
- pshufd $0xb1, %xmm4, %xmm14
- mulps %xmm12, %xmm4
- addps %xmm4, %xmm0
- movaps -25 * SIZE(A1), %xmm4
- mulps %xmm12, %xmm14
- SUBPS %xmm14, %xmm1
-
- movss %xmm7, %xmm5
- shufps $0x93, %xmm7, %xmm5
- pshufd $0xb1, %xmm5, %xmm14
- mulps %xmm12, %xmm5
- addps %xmm5, %xmm2
- movaps -27 * SIZE(A2), %xmm5
- mulps %xmm12, %xmm14
- movaps -24 * SIZE(X1), %xmm12
- SUBPS %xmm14, %xmm3
-
- movss %xmm4, %xmm6
- shufps $0x39, %xmm6, %xmm6
- pshufd $0xb1, %xmm6, %xmm14
- mulps %xmm13, %xmm6
- addps %xmm6, %xmm0
- movaps -21 * SIZE(A1), %xmm6
- mulps %xmm13, %xmm14
- SUBPS %xmm14, %xmm1
-
- movss %xmm5, %xmm7
- shufps $0x93, %xmm5, %xmm7
- pshufd $0xb1, %xmm7, %xmm14
- mulps %xmm13, %xmm7
- addps %xmm7, %xmm2
- movaps -23 * SIZE(A2), %xmm7
- mulps %xmm13, %xmm14
- movaps -20 * SIZE(X1), %xmm13
- SUBPS %xmm14, %xmm3
-
- movss %xmm6, %xmm4
- shufps $0x39, %xmm4, %xmm4
- pshufd $0xb1, %xmm4, %xmm14
- mulps %xmm12, %xmm4
- addps %xmm4, %xmm0
- movaps -17 * SIZE(A1), %xmm4
- mulps %xmm12, %xmm14
- SUBPS %xmm14, %xmm1
-
- movss %xmm7, %xmm5
- shufps $0x93, %xmm7, %xmm5
- pshufd $0xb1, %xmm5, %xmm14
- mulps %xmm12, %xmm5
- addps %xmm5, %xmm2
- movaps -19 * SIZE(A2), %xmm5
- mulps %xmm12, %xmm14
- movaps -16 * SIZE(X1), %xmm12
- SUBPS %xmm14, %xmm3
-
- movss %xmm4, %xmm6
- shufps $0x39, %xmm6, %xmm6
- pshufd $0xb1, %xmm6, %xmm14
- mulps %xmm13, %xmm6
- addps %xmm6, %xmm0
- mulps %xmm13, %xmm14
- SUBPS %xmm14, %xmm1
-
- movss %xmm5, %xmm7
- shufps $0x93, %xmm5, %xmm7
- pshufd $0xb1, %xmm7, %xmm14
- mulps %xmm13, %xmm7
- addps %xmm7, %xmm2
- mulps %xmm13, %xmm14
- movaps -12 * SIZE(X1), %xmm13
- SUBPS %xmm14, %xmm3
-
- subq $-16 * SIZE, A1
- subq $-16 * SIZE, A2
- subq $-16 * SIZE, X1
- ALIGN_3
-
- .L305:
- testq $4, MM
- je .L307
-
- movaps -29 * SIZE(A1), %xmm6
-
- movss %xmm6, %xmm4
- shufps $0x39, %xmm4, %xmm4
- pshufd $0xb1, %xmm4, %xmm14
- mulps %xmm12, %xmm4
- addps %xmm4, %xmm0
- mulps %xmm12, %xmm14
- SUBPS %xmm14, %xmm1
-
- movaps -31 * SIZE(A2), %xmm7
-
- movss %xmm7, %xmm5
- shufps $0x93, %xmm7, %xmm5
- pshufd $0xb1, %xmm5, %xmm14
- mulps %xmm12, %xmm5
- addps %xmm5, %xmm2
- mulps %xmm12, %xmm14
- SUBPS %xmm14, %xmm3
-
- movaps -25 * SIZE(A1), %xmm8
-
- movss %xmm8, %xmm6
- shufps $0x39, %xmm6, %xmm6
- pshufd $0xb1, %xmm6, %xmm14
- mulps %xmm13, %xmm6
- addps %xmm6, %xmm0
- mulps %xmm13, %xmm14
- SUBPS %xmm14, %xmm1
-
- movaps -27 * SIZE(A2), %xmm9
-
- movss %xmm9, %xmm7
- shufps $0x93, %xmm9, %xmm7
- pshufd $0xb1, %xmm7, %xmm14
- mulps %xmm13, %xmm7
- addps %xmm7, %xmm2
- mulps %xmm13, %xmm14
- SUBPS %xmm14, %xmm3
-
- movaps %xmm8, %xmm4
- movaps %xmm9, %xmm5
-
- movaps -24 * SIZE(X1), %xmm12
- movaps -20 * SIZE(X1), %xmm13
-
- addq $8 * SIZE, A1
- addq $8 * SIZE, A2
- ALIGN_3
-
- .L307:
- testq $2, MM
- je .L308
-
- movaps -29 * SIZE(A1), %xmm6
- movaps -31 * SIZE(A2), %xmm7
-
- movss %xmm6, %xmm4
- shufps $0x39, %xmm4, %xmm4
- pshufd $0xb1, %xmm4, %xmm14
- mulps %xmm12, %xmm4
- addps %xmm4, %xmm0
- mulps %xmm12, %xmm14
- SUBPS %xmm14, %xmm1
-
- movss %xmm7, %xmm5
- shufps $0x93, %xmm7, %xmm5
- pshufd $0xb1, %xmm5, %xmm14
- mulps %xmm12, %xmm5
- addps %xmm5, %xmm2
- mulps %xmm12, %xmm14
- SUBPS %xmm14, %xmm3
-
- movaps %xmm6, %xmm4
- movaps %xmm7, %xmm5
- movaps %xmm13, %xmm12
-
- addq $4 * SIZE, A1
- addq $4 * SIZE, A2
- ALIGN_3
-
- .L308:
- testq $1, MM
- je .L309
-
- #ifdef movsd
- xorps %xmm8, %xmm8
- #endif
- movsd -32 * SIZE(A1), %xmm8
- #ifdef movsd
- xorps %xmm9, %xmm9
- #endif
- movsd -32 * SIZE(A2), %xmm9
-
- pshufd $0xb1, %xmm8, %xmm4
- mulps %xmm12, %xmm8
- addps %xmm8, %xmm0
- mulps %xmm12, %xmm4
- SUBPS %xmm4, %xmm1
-
- pshufd $0xb1, %xmm9, %xmm5
- mulps %xmm12, %xmm9
- addps %xmm9, %xmm2
- mulps %xmm12, %xmm5
- SUBPS %xmm5, %xmm3
- ALIGN_3
-
- .L309:
- pcmpeqb %xmm5, %xmm5
- psllq $63, %xmm5
-
- #if (!defined(CONJ) && !defined(XCONJ)) || (defined(CONJ) && defined(XCONJ))
- xorps %xmm5, %xmm0
- xorps %xmm5, %xmm2
- #else
- xorps %xmm5, %xmm1
- xorps %xmm5, %xmm3
- #endif
-
- #ifdef HAVE_SSE3
- haddps %xmm1, %xmm0
- haddps %xmm3, %xmm2
- haddps %xmm2, %xmm0
- #else
- movaps %xmm0, %xmm8
- unpcklps %xmm1, %xmm0
- unpckhps %xmm1, %xmm8
-
- movaps %xmm2, %xmm4
- unpcklps %xmm3, %xmm2
- unpckhps %xmm3, %xmm4
-
- addps %xmm8, %xmm0
- addps %xmm4, %xmm2
-
- movhlps %xmm0, %xmm1
- movhlps %xmm2, %xmm3
-
- addps %xmm1, %xmm0
- addps %xmm3, %xmm2
- movlhps %xmm2, %xmm0
- #endif
-
- pshufd $0xb1, %xmm0, %xmm1
-
- #ifdef HAVE_SSE3
- movddup ALPHA, %xmm15
- #else
- movsd ALPHA, %xmm15
- pshufd $0x44, %xmm15, %xmm15
- #endif
-
- mulps %xmm15, %xmm0
- mulps %xmm15, %xmm1
-
- xorps %xmm5, %xmm0
-
- #ifdef HAVE_SSE3
- haddps %xmm1, %xmm0
- #else
- movaps %xmm0, %xmm2
- shufps $0x88, %xmm1, %xmm0
- shufps $0xdd, %xmm1, %xmm2
-
- addps %xmm2, %xmm0
- #endif
-
- movsd (Y), %xmm12
- addq INCY, Y
- movhps (Y), %xmm12
- addq INCY, Y
-
- shufps $0xd8, %xmm0, %xmm0
-
- addps %xmm12, %xmm0
-
- movlps %xmm0, (Y1)
- addq INCY, Y1
- movhps %xmm0, (Y1)
- addq INCY, Y1
-
- cmpq $2, N
- jge .L301
- ALIGN_3
-
- .L310:
- cmpq $1, N
- jl .L999
-
- leaq 32 * SIZE(BUFFER), X1
-
- movq A, A1
-
- xorps %xmm0, %xmm0
- xorps %xmm1, %xmm1
-
- #ifdef ALIGNED_ACCESS
- cmpq M, MM
- je .L31X
-
- #ifdef movsd
- xorps %xmm8, %xmm8
- #endif
- movsd -32 * SIZE(A1), %xmm8
- #ifdef movsd
- xorps %xmm12, %xmm12
- #endif
- movsd -32 * SIZE(X1), %xmm12
-
- pshufd $0xb1, %xmm8, %xmm4
- mulps %xmm12, %xmm8
- addps %xmm8, %xmm0
- mulps %xmm12, %xmm4
- SUBPS %xmm4, %xmm1
-
- addq $2 * SIZE, A1
- addq $2 * SIZE, X1
- ALIGN_3
- .L31X:
- #endif
-
- movaps -33 * SIZE(A1), %xmm4
-
- movaps -32 * SIZE(X1), %xmm12
- movaps -28 * SIZE(X1), %xmm13
-
- movq MM, I
- sarq $3, I
- jle .L315
-
- movaps -29 * SIZE(A1), %xmm5
- movaps -25 * SIZE(A1), %xmm6
- movaps -21 * SIZE(A1), %xmm7
-
- decq I
- jle .L314
- ALIGN_3
-
- .L313:
- #ifdef PREFETCH
- PREFETCH (PREFETCHSIZE) * 4 - 128 + PREOFFSET(A1)
- #endif
-
- movss %xmm5, %xmm4
- shufps $0x39, %xmm4, %xmm4
- pshufd $0xb1, %xmm4, %xmm14
- mulps %xmm12, %xmm4
- addps %xmm4, %xmm0
- movaps -17 * SIZE(A1), %xmm4
- mulps %xmm12, %xmm14
- movaps -24 * SIZE(X1), %xmm12
- SUBPS %xmm14, %xmm1
-
- movss %xmm6, %xmm5
- shufps $0x39, %xmm5, %xmm5
- pshufd $0xb1, %xmm5, %xmm15
- mulps %xmm13, %xmm5
- addps %xmm5, %xmm0
- movaps -13 * SIZE(A1), %xmm5
- mulps %xmm13, %xmm15
- movaps -20 * SIZE(X1), %xmm13
- SUBPS %xmm15, %xmm1
-
- #ifdef PREFETCHW
- PREFETCH (PREFETCHSIZE) * 4 - 128 + PREOFFSET(X1)
- #endif
-
- movss %xmm7, %xmm6
- shufps $0x39, %xmm6, %xmm6
- pshufd $0xb1, %xmm6, %xmm14
- mulps %xmm12, %xmm6
- addps %xmm6, %xmm0
- movaps -9 * SIZE(A1), %xmm6
- mulps %xmm12, %xmm14
- movaps -16 * SIZE(X1), %xmm12
- SUBPS %xmm14, %xmm1
-
- movss %xmm4, %xmm7
- shufps $0x39, %xmm7, %xmm7
- pshufd $0xb1, %xmm7, %xmm15
- mulps %xmm13, %xmm7
- addps %xmm7, %xmm0
- movaps -5 * SIZE(A1), %xmm7
- mulps %xmm13, %xmm15
- movaps -12 * SIZE(X1), %xmm13
- SUBPS %xmm15, %xmm1
-
- subq $-16 * SIZE, A1
- subq $-16 * SIZE, X1
-
- subq $1, I
- BRANCH
- jg .L313
- ALIGN_3
-
- .L314:
- movss %xmm5, %xmm4
- shufps $0x39, %xmm4, %xmm4
- pshufd $0xb1, %xmm4, %xmm14
- mulps %xmm12, %xmm4
- addps %xmm4, %xmm0
- movaps -17 * SIZE(A1), %xmm4
- mulps %xmm12, %xmm14
- movaps -24 * SIZE(X1), %xmm12
- SUBPS %xmm14, %xmm1
-
- movss %xmm6, %xmm5
- shufps $0x39, %xmm5, %xmm5
- pshufd $0xb1, %xmm5, %xmm15
- mulps %xmm13, %xmm5
- addps %xmm5, %xmm0
- mulps %xmm13, %xmm15
- movaps -20 * SIZE(X1), %xmm13
- SUBPS %xmm15, %xmm1
-
- movss %xmm7, %xmm6
- shufps $0x39, %xmm6, %xmm6
- pshufd $0xb1, %xmm6, %xmm14
- mulps %xmm12, %xmm6
- addps %xmm6, %xmm0
- mulps %xmm12, %xmm14
- movaps -16 * SIZE(X1), %xmm12
- SUBPS %xmm14, %xmm1
-
- movss %xmm4, %xmm7
- shufps $0x39, %xmm7, %xmm7
- pshufd $0xb1, %xmm7, %xmm15
- mulps %xmm13, %xmm7
- addps %xmm7, %xmm0
- mulps %xmm13, %xmm15
- movaps -12 * SIZE(X1), %xmm13
- SUBPS %xmm15, %xmm1
-
- subq $-16 * SIZE, A1
- subq $-16 * SIZE, X1
- ALIGN_3
-
- .L315:
- testq $4, MM
- je .L317
-
- movaps -29 * SIZE(A1), %xmm5
- movaps -25 * SIZE(A1), %xmm6
-
- movss %xmm5, %xmm4
- shufps $0x39, %xmm4, %xmm4
- pshufd $0xb1, %xmm4, %xmm14
- mulps %xmm12, %xmm4
- addps %xmm4, %xmm0
- mulps %xmm12, %xmm14
- SUBPS %xmm14, %xmm1
-
- movss %xmm6, %xmm5
- shufps $0x39, %xmm5, %xmm5
- pshufd $0xb1, %xmm5, %xmm15
- mulps %xmm13, %xmm5
- addps %xmm5, %xmm0
- mulps %xmm13, %xmm15
- SUBPS %xmm15, %xmm1
-
- movaps -24 * SIZE(X1), %xmm12
- movaps -20 * SIZE(X1), %xmm13
- movaps %xmm6, %xmm4
-
- addq $8 * SIZE, A1
- ALIGN_3
-
- .L317:
- testq $2, MM
- je .L318
-
- movaps -29 * SIZE(A1), %xmm5
-
- movss %xmm5, %xmm4
- shufps $0x39, %xmm4, %xmm4
-
- pshufd $0xb1, %xmm4, %xmm14
- mulps %xmm12, %xmm4
- addps %xmm4, %xmm0
- mulps %xmm12, %xmm14
- SUBPS %xmm14, %xmm1
-
- movaps %xmm13, %xmm12
-
- addq $4 * SIZE, A1
- ALIGN_3
-
- .L318:
- testq $1, MM
- je .L319
-
- #ifdef movsd
- xorps %xmm8, %xmm8
- #endif
- movsd -32 * SIZE(A1), %xmm8
-
- pshufd $0xb1, %xmm8, %xmm4
- mulps %xmm12, %xmm8
- addps %xmm8, %xmm0
- mulps %xmm12, %xmm4
- SUBPS %xmm4, %xmm1
- ALIGN_3
-
- .L319:
- pcmpeqb %xmm5, %xmm5
- psllq $63, %xmm5
-
- #if (!defined(CONJ) && !defined(XCONJ)) || (defined(CONJ) && defined(XCONJ))
- xorps %xmm5, %xmm0
- #else
- xorps %xmm5, %xmm1
- #endif
-
- #ifdef HAVE_SSE3
- haddps %xmm1, %xmm0
- haddps %xmm0, %xmm0
- #else
- movaps %xmm0, %xmm8
- unpcklps %xmm1, %xmm0
- unpckhps %xmm1, %xmm8
-
- addps %xmm8, %xmm0
-
- movhlps %xmm0, %xmm1
-
- addps %xmm1, %xmm0
- #endif
-
- pshufd $0xb1, %xmm0, %xmm1
-
- #ifdef HAVE_SSE3
- movddup ALPHA, %xmm15
- #else
- movsd ALPHA, %xmm15
- pshufd $0x44, %xmm15, %xmm15
- #endif
-
- mulps %xmm15, %xmm0
- mulps %xmm15, %xmm1
-
- xorps %xmm5, %xmm0
-
- #ifdef HAVE_SSE3
- haddps %xmm1, %xmm0
- #else
- movaps %xmm0, %xmm2
- shufps $0x88, %xmm1, %xmm0
- shufps $0xdd, %xmm1, %xmm2
-
- addps %xmm2, %xmm0
- #endif
-
- movsd (Y), %xmm12
- addq INCY, Y
-
- shufps $0xd8, %xmm0, %xmm0
-
- addps %xmm12, %xmm0
-
- movlps %xmm0, (Y1)
- addq INCY, Y1
- #endif
- ALIGN_3
-
- .L999:
- movq M, I
- salq $ZBASE_SHIFT,I
- addq I,AA
- jmp .L0t
- .L999x:
- movq 0(%rsp), %rbx
- movq 8(%rsp), %rbp
- movq 16(%rsp), %r12
- movq 24(%rsp), %r13
- movq 32(%rsp), %r14
- movq 40(%rsp), %r15
-
- #ifdef WINDOWS_ABI
- movq 48(%rsp), %rdi
- movq 56(%rsp), %rsi
- movups 64(%rsp), %xmm6
- movups 80(%rsp), %xmm7
- movups 96(%rsp), %xmm8
- movups 112(%rsp), %xmm9
- movups 128(%rsp), %xmm10
- movups 144(%rsp), %xmm11
- movups 160(%rsp), %xmm12
- movups 176(%rsp), %xmm13
- movups 192(%rsp), %xmm14
- movups 208(%rsp), %xmm15
- #endif
-
- addq $STACKSIZE, %rsp
- ret
-
- EPILOGUE
|