commit
84908d60d2
|
@ -34,9 +34,9 @@ caxpy_k:
|
||||||
lfs 0,4(10)
|
lfs 0,4(10)
|
||||||
fmuls 10,2,10
|
fmuls 10,2,10
|
||||||
#ifdef CONJ
|
#ifdef CONJ
|
||||||
fmsubs 11,11,1,10
|
|
||||||
#else
|
|
||||||
fmadds 11,11,1,10
|
fmadds 11,11,1,10
|
||||||
|
#else
|
||||||
|
fmsubs 11,11,1,10
|
||||||
#endif
|
#endif
|
||||||
fadds 12,12,11
|
fadds 12,12,11
|
||||||
stfs 12,0(10)
|
stfs 12,0(10)
|
||||||
|
@ -241,8 +241,13 @@ caxpy_k:
|
||||||
lfsx 12,8,5
|
lfsx 12,8,5
|
||||||
lfsx 0,10,5
|
lfsx 0,10,5
|
||||||
fmuls 11,2,11
|
fmuls 11,2,11
|
||||||
|
#ifdef CONJ
|
||||||
fmsubs 12,1,12,11
|
fmsubs 12,1,12,11
|
||||||
fsubs 0,0,12
|
fsubs 0,0,12
|
||||||
|
#else
|
||||||
|
fmadds 12,1,12,11
|
||||||
|
fadds 0,0,12
|
||||||
|
#endif
|
||||||
stfsx 0,10,5
|
stfsx 0,10,5
|
||||||
ble 7,.L39
|
ble 7,.L39
|
||||||
sldi 6,6,2
|
sldi 6,6,2
|
||||||
|
|
|
@ -1,3 +1,6 @@
|
||||||
|
#define ASSEMBLER
|
||||||
|
#include "common.h"
|
||||||
|
/*
|
||||||
.file "cdot.c"
|
.file "cdot.c"
|
||||||
.abiversion 2
|
.abiversion 2
|
||||||
.section ".text"
|
.section ".text"
|
||||||
|
@ -5,6 +8,9 @@
|
||||||
.p2align 4,,15
|
.p2align 4,,15
|
||||||
.globl cdot_k
|
.globl cdot_k
|
||||||
.type cdot_k, @function
|
.type cdot_k, @function
|
||||||
|
*/
|
||||||
|
PROLOGUE
|
||||||
|
|
||||||
cdot_k:
|
cdot_k:
|
||||||
.LCF0:
|
.LCF0:
|
||||||
0: addis 2,12,.TOC.-.LCF0@ha
|
0: addis 2,12,.TOC.-.LCF0@ha
|
||||||
|
|
Loading…
Reference in New Issue