Mercurial > hg > octave-nkf

diff liboctave/mx-defs.h @ 9661:afcf852256d2

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
optimize / and '\ for triangular matrices
author Jaroslav Hajek <highegg@gmail.com>
date Wed, 23 Sep 2009 10:00:16 +0200
parents eb63fbe60fab
children 4c0cdbe0acca
line wrap: on
line diff
--- a/liboctave/mx-defs.h
+++ b/liboctave/mx-defs.h
@@ -126,6 +126,20 @@
 typedef float (*f_fc_Mapper)(const FloatComplex&);
 typedef FloatComplex (*fc_fc_Mapper)(const FloatComplex&);
 
+enum blas_trans_type
+{
+  blas_no_trans = 'N',
+  blas_trans = 'T',
+  blas_conj_trans = 'C'
+};
+
+inline char 
+get_blas_char (blas_trans_type transt)
+{
+  return static_cast<char> (transt);
+}
+
+
 #endif
 
 #endif