Browse Source

fix blasabs for windows

Bugfix in #1713 for Windows (LLP64), where `blasabs` needs to be `llabs` rather than `labs` for the 64-bit API.
tags/v0.3.3
Steven G. Johnson GitHub 7 years ago
parent
commit
48610a4524
No known key found for this signature in database GPG Key ID: 4AEE18F83AFDEB23
1 changed files with 4 additions and 0 deletions
  1. +4
    -0
      common.h

+ 4
- 0
common.h View File

@@ -257,7 +257,11 @@ typedef unsigned long BLASULONG;


#ifdef USE64BITINT #ifdef USE64BITINT
typedef BLASLONG blasint; typedef BLASLONG blasint;
#if defined(OS_WINDOWS) && defined(__64BIT__)
#define blasabs(x) llabs(x)
#else
#define blasabs(x) labs(x) #define blasabs(x) labs(x)
#endif
#else #else
typedef int blasint; typedef int blasint;
#define blasabs(x) abs(x) #define blasabs(x) abs(x)


Loading…
Cancel
Save