Browse Source

Merge pull request #5282 from martin-frbg/zscal_power

kernel/power: Fixed cscal and zscal
tags/v0.3.30
Martin Kroeker GitHub 3 months ago
parent
commit
1408be5fe0
No known key found for this signature in database GPG Key ID: B5690EEEBB952194
3 changed files with 12 additions and 1 deletions
  1. +6
    -0
      kernel/power/zscal.S
  2. +1
    -1
      kernel/power/zscal.c
  3. +5
    -0
      kernel/power/zscal_ppc440.S

+ 6
- 0
kernel/power/zscal.S View File

@@ -51,6 +51,7 @@
#define X r8
#define INCX r9
#endif
#define FLAG r11
#endif

#if defined(_AIX) || defined(__APPLE__)
@@ -61,6 +62,7 @@
#define X r8
#define INCX r9
#endif
#define FLAG r11
#endif

#define FZERO f0
@@ -94,6 +96,10 @@
fcmpu cr0, FZERO, ALPHA_I
bne- cr0, LL(A1I1)

LDLONG FLAG, 104(SP)
cmpwi cr0, FLAG, 1
beq- cr0, LL(A1I1)

cmpwi cr0, INCX, 2 * SIZE
bne- cr0, LL(A0IN)



+ 1
- 1
kernel/power/zscal.c View File

@@ -136,7 +136,7 @@ int CNAME(BLASLONG n, BLASLONG dummy0, BLASLONG dummy1, FLOAT da_r,FLOAT da_i, F
if ( inc_x <= 0 )
return(0);

if (da_r == ZERO && da_i == ZERO) {
if (da_r == ZERO && da_i == ZERO && dummy2 == 0) {
//clear the vector and return
if (inc_x == 1) {
memset(x, 0, n*COMPSIZE*SIZE);


+ 5
- 0
kernel/power/zscal_ppc440.S View File

@@ -64,6 +64,7 @@
#endif

#define INC1 r11
#define FLAG r12

#define FZERO f0
#define ALPHA_R f1
@@ -97,6 +98,10 @@
fcmpu cr0, FZERO, ALPHA_I
bne- cr0, LL(A1I1)

lwz FLAG, FRAMESLOT(0)(SP)
cmpwi cr0, FLAG, 1
beq- cr0, LL(A1I1)

LL(A0IN):
srawi. r0, N, 3
mtspr CTR, r0


Loading…
Cancel
Save