From 40c068a8750d74d2434709aac3992a8bf80e4734 Mon Sep 17 00:00:00 2001
From: Martin Kroeker <martin@ruby.chemie.uni-freiburg.de>
Date: Sat, 4 Aug 2018 20:07:59 +0200
Subject: [PATCH] Introduce blasabs() to switch between abs() and labs() for
 INTERFACE64

---
 common.h | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/common.h b/common.h
index 663f37e7b..0516a57c0 100644
--- 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