floraachy
/
OpenBLAS
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Add NaN tests

This commit is contained in:
Martin Kroeker 2023-08-20 14:57:31 +02:00 committed by GitHub
parent 3d10fb003e
commit 76d675bd55
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23
1 changed files with 41 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

41
kernel/x86/iamax.S
View File

@ -100,6 +100,8 @@
movl $1, RET movl $1, RET
FLD (X) FLD (X)
fcomi %st, %st
jp .L999
#ifdef USE_ABS #ifdef USE_ABS
fabs fabs
#endif #endif
@ -121,6 +123,8 @@
#endif #endif
FLD 0 * SIZE(X) FLD 0 * SIZE(X)
fucomi
jp .L998
#ifdef USE_ABS #ifdef USE_ABS
fabs fabs
#endif #endif
@ -131,6 +135,8 @@
incl NUM incl NUM
FLD 1 * SIZE(X) FLD 1 * SIZE(X)
fucomi
jp .L998
#ifdef USE_ABS #ifdef USE_ABS
fabs fabs
#endif #endif
@ -141,6 +147,8 @@
incl NUM incl NUM
FLD 2 * SIZE(X) FLD 2 * SIZE(X)
fucomi
jp .L998
#ifdef USE_ABS #ifdef USE_ABS
fabs fabs
#endif #endif
@ -151,6 +159,8 @@
incl NUM incl NUM
FLD 3 * SIZE(X) FLD 3 * SIZE(X)
fucomi
jp .L998
#ifdef USE_ABS #ifdef USE_ABS
fabs fabs
#endif #endif
@ -161,6 +171,8 @@
incl NUM incl NUM
FLD 4 * SIZE(X) FLD 4 * SIZE(X)
fucomi
jp .L998
#ifdef USE_ABS #ifdef USE_ABS
fabs fabs
#endif #endif
@ -171,6 +183,8 @@
incl NUM incl NUM
FLD 5 * SIZE(X) FLD 5 * SIZE(X)
fucomi
jp .L998
#ifdef USE_ABS #ifdef USE_ABS
fabs fabs
#endif #endif
@ -181,6 +195,8 @@
incl NUM incl NUM
FLD 6 * SIZE(X) FLD 6 * SIZE(X)
fucomi
jp .L998
#ifdef USE_ABS #ifdef USE_ABS
fabs fabs
#endif #endif
@ -191,6 +207,8 @@
incl NUM incl NUM
FLD 7 * SIZE(X) FLD 7 * SIZE(X)
fucomi
jp .L998
#ifdef USE_ABS #ifdef USE_ABS
fabs fabs
#endif #endif
@ -215,6 +233,8 @@
.L21: .L21:
FLD 0 * SIZE(X) FLD 0 * SIZE(X)
fucomi
jp .L998
#ifdef USE_ABS #ifdef USE_ABS
fabs fabs
#endif #endif
@ -238,6 +258,8 @@
.L50: .L50:
FLD 0 * SIZE(X) FLD 0 * SIZE(X)
fucomi
jp .L998
addl INCX, X addl INCX, X
#ifdef USE_ABS #ifdef USE_ABS
fabs fabs
@ -249,6 +271,8 @@
incl NUM incl NUM
FLD 0 * SIZE(X) FLD 0 * SIZE(X)
fucomi
jp .L998
addl INCX, X addl INCX, X
#ifdef USE_ABS #ifdef USE_ABS
fabs fabs
@ -260,6 +284,8 @@
incl NUM incl NUM
FLD 0 * SIZE(X) FLD 0 * SIZE(X)
fucomi
jp .L998
addl INCX, X addl INCX, X
#ifdef USE_ABS #ifdef USE_ABS
fabs fabs
@ -271,6 +297,8 @@
incl NUM incl NUM
FLD 0 * SIZE(X) FLD 0 * SIZE(X)
fucomi
jp .L998
addl INCX, X addl INCX, X
#ifdef USE_ABS #ifdef USE_ABS
fabs fabs
@ -282,6 +310,8 @@
incl NUM incl NUM
FLD 0 * SIZE(X) FLD 0 * SIZE(X)
fucomi
jp .L998
addl INCX, X addl INCX, X
#ifdef USE_ABS #ifdef USE_ABS
fabs fabs
@ -293,6 +323,8 @@
incl NUM incl NUM
FLD 0 * SIZE(X) FLD 0 * SIZE(X)
fucomi
jp .L998
addl INCX, X addl INCX, X
#ifdef USE_ABS #ifdef USE_ABS
fabs fabs
@ -304,6 +336,8 @@
incl NUM incl NUM
FLD 0 * SIZE(X) FLD 0 * SIZE(X)
fucomi
jp .L998
addl INCX, X addl INCX, X
#ifdef USE_ABS #ifdef USE_ABS
fabs fabs
@ -315,6 +349,8 @@
incl NUM incl NUM
FLD 0 * SIZE(X) FLD 0 * SIZE(X)
fucomi
jp .L998
addl INCX, X addl INCX, X
#ifdef USE_ABS #ifdef USE_ABS
fabs fabs
@ -338,6 +374,8 @@
.L61: .L61:
FLD 0 * SIZE(X) FLD 0 * SIZE(X)
fucomi
jp .L998
#ifdef USE_ABS #ifdef USE_ABS
fabs fabs
#endif #endif
@ -361,4 +399,7 @@
popl %ebp popl %ebp
ret ret
.L998: mov NUM, RET
jmp .L999
EPILOGUE EPILOGUE