scs_blas.h in scs-0.4.2

- old
+ new

@@ -15,22 +15,26 @@
 /* annoying hack because some preprocessors can't handle empty macros */
 #if defined(NOBLASSUFFIX) && NOBLASSUFFIX > 0
 /* single or double precision */
 #ifndef SFLOAT
 #define BLAS(x) d##x
+#define BLASI(x) id##x
 #else
 #define BLAS(x) s##x
+#define BLASI(x) is##x
 #endif
 #else
 /* this extra indirection is needed for BLASSUFFIX to work correctly as a
  * variable */
 #define stitch_(pre, x, post) pre##x##post
 #define stitch__(pre, x, post) stitch_(pre, x, post)
 /* single or double precision */
 #ifndef SFLOAT
 #define BLAS(x) stitch__(d, x, BLASSUFFIX)
+#define BLASI(x) stitch__(id, x, BLASSUFFIX)
 #else
 #define BLAS(x) stitch__(s, x, BLASSUFFIX)
+#define BLASI(x) stitch__(is, x, BLASSUFFIX)
 #endif
 #endif
 
 #ifdef MATLAB_MEX_FILE
 typedef ptrdiff_t blas_int;