fabs -> fabsl
Fixes two calls that were using `fabs` on a `long double` argument rather than `fabsl`, which looks like it is doing an unintentional truncation to `double` precision.
This commit is contained in:
parent
9e65430504
commit
a4e321400b
|
@ -22,8 +22,8 @@ void CNAME(FLOAT *DA, FLOAT *DB, FLOAT *C, FLOAT *S){
|
||||||
long double s;
|
long double s;
|
||||||
long double r, roe, z;
|
long double r, roe, z;
|
||||||
|
|
||||||
long double ada = fabs(da);
|
long double ada = fabsl(da);
|
||||||
long double adb = fabs(db);
|
long double adb = fabsl(db);
|
||||||
long double scale = ada + adb;
|
long double scale = ada + adb;
|
||||||
|
|
||||||
#ifndef CBLAS
|
#ifndef CBLAS
|
||||||
|
|
Loading…
Reference in New Issue