Introduce blasabs() to switch between abs() and labs() for INTERFACE64
authorMartin Kroeker <martin@ruby.chemie.uni-freiburg.de>
Sat, 4 Aug 2018 18:07:59 +0000 (20:07 +0200)
committerGitHub <noreply@github.com>
Sat, 4 Aug 2018 18:07:59 +0000 (20:07 +0200)
common.h

index 663f37e..0516a57 100644 (file)
--- a/common.h
+++ b/common.h
@@ -253,8 +253,10 @@ typedef unsigned long BLASULONG;
 
 #ifdef USE64BITINT
 typedef BLASLONG blasint;
+#define blasabs(x) labs(x)
 #else
 typedef int blasint;
+#define blasabs(x) abs(x)
 #endif
 #else
 #ifdef USE64BITINT