ext/numo/linalg/blas/numo_blas.h in numo-linalg-0.1.2 vs ext/numo/linalg/blas/numo_blas.h in numo-linalg-0.1.3

@@ -29,9 +29,15 @@
     { if ((order)==CblasColMajor) {(tmp)=(a);(a)=(b);(b)=(tmp);} }
 
 #define SWAP_IFROW(order,a,b,tmp)                               \
     { if ((order)==CblasRowMajor) {(tmp)=(a);(a)=(b);(b)=(tmp);} }
 
+#define SWAP_IFNOTRANS(trans,a,b,tmp)                           \
+    { if ((trans)==CblasNoTrans) {(tmp)=(a);(a)=(b);(b)=(tmp);} }
+
+#define SWAP_IFTRANS(trans,a,b,tmp)                           \
+    { if ((trans)!=CblasNoTrans) {(tmp)=(a);(a)=(b);(b)=(tmp);} }
+
 #define SWAP_IFCOLTR(order,trans,a,b,tmp)                       \
     { if (((order)==CblasRowMajor && (trans)!=CblasNoTrans) ||  \
           ((order)!=CblasRowMajor && (trans)==CblasNoTrans))    \
             {(tmp)=(a);(a)=(b);(b)=(tmp);}                      \
     }