Browse Source

Merge pull request #1709 from stevengj/patch-1

fabs -> fabsl
tags/v0.3.3
Martin Kroeker GitHub 7 years ago
parent
commit
e788102c10
No known key found for this signature in database GPG Key ID: 4AEE18F83AFDEB23
2 changed files with 3 additions and 3 deletions
  1. +2
    -2
      interface/rotg.c
  2. +1
    -1
      interface/zrotg.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


+ 1
- 1
interface/zrotg.c View File

@@ -14,7 +14,7 @@ void NAME(FLOAT *DA, FLOAT *DB, FLOAT *C, FLOAT *S){
long double db_i = *(DB + 1);
long double r;

long double ada = fabs(da_r) + fabs(da_i);
long double ada = fabsl(da_r) + fabsl(da_i);

PRINT_DEBUG_NAME;



Loading…
Cancel
Save