Browse Source

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.
tags/v0.3.3
Steven G. Johnson GitHub 8 years ago
parent
commit
a4e321400b
No known key found for this signature in database GPG Key ID: 4AEE18F83AFDEB23
1 changed files with 2 additions and 2 deletions
  1. +2
    -2
      interface/rotg.c

+ 2
- 2
interface/rotg.c View File

@@ -22,8 +22,8 @@ void CNAME(FLOAT *DA, FLOAT *DB, FLOAT *C, FLOAT *S){
long double s;
long double r, roe, z;

long double ada = fabs(da);
long double adb = fabs(db);
long double ada = fabsl(da);
long double adb = fabsl(db);
long double scale = ada + adb;

#ifndef CBLAS


Loading…
Cancel
Save