OpenMathLib/OpenBLAS
1
0
Fork 0
mirror of https://github.com/OpenMathLib/OpenBLAS synced 2026-05-31 00:45:48 +08:00
Code Issues Actions 1 Packages Projects Releases Wiki Activity

fix handling of dummy2

Browse Source
This commit is contained in:
Martin Kroeker
2025-06-12 03:03:01 -07:00
committed by GitHub
parent 7c77537b25
commit 58eeb9041c
1 changed files with 7 additions and 8 deletions
Download Patch File Download Diff File Expand all files Collapse all files

15
kernel/arm64/zscal.S
View File

@@ -33,7 +33,7 @@ USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
#define INC_X x4 /* X stride */
#define I x5 /* loop variable */
#define X_COPY x6 /* Copy of X */
#define FLAG x7 /* NaN handling level */
#define FLAG x7
/*******************************************************************************
* Macro definitions
*******************************************************************************/
@@ -216,23 +216,22 @@ zscal_begin:
cmp N, xzr
ble .Lzscal_kernel_L999
ldr FLAG, [sp]
cmp FLAG, #1
beq .Lzscal_kernel_R_non_zero
ldr FLAG, [sp]
cmp FLAG, #1
beq .Lzscal_kernel_RI_non_zero
fcmp DA_R, #0.0
bne .Lzscal_kernel_R_non_zero
// fcmp DA_I, #0.0
// beq .Lzscal_kernel_RI_zero
fcmp DA_I, #0.0
beq .Lzscal_kernel_RI_zero
// b .Lzscal_kernel_R_zero
.Lzscal_kernel_R_non_zero:
fcmp DA_I, #0.0
beq .Lzscal_kernel_I_zero
//QUAK beq .Lzscal_kernel_I_zero
/*******************************************************************************
* A_R != 0 && A_I != 0