Mercurial > hg > octave-nkf

diff src/ov-bool-mat.h @ 5533:667ad2becb63
[project @ 2005-11-10 21:40:48 by jwe]
author: jwe
date: Thu, 10 Nov 2005 21:40:49 +0000
parents: 4c8a2e4e0717
children: ce79d238f142
--- a/src/ov-bool-mat.h
+++ b/src/ov-bool-mat.h
@@ -84,6 +84,30 @@
 
   bool valid_as_scalar_index (void) const;
 
+  int8NDArray
+  int8_array_value (void) const { return int8NDArray (matrix); }
+
+  int16NDArray
+  int16_array_value (void) const { return int16NDArray (matrix); }
+
+  int32NDArray
+  int32_array_value (void) const { return int32NDArray (matrix); }
+
+  int64NDArray
+  int64_array_value (void) const { return int64NDArray (matrix); }
+
+  uint8NDArray
+  uint8_array_value (void) const { return uint8NDArray (matrix); }
+
+  uint16NDArray
+  uint16_array_value (void) const { return uint16NDArray (matrix); }
+
+  uint32NDArray
+  uint32_array_value (void) const { return uint32NDArray (matrix); }
+
+  uint64NDArray
+  uint64_array_value (void) const { return uint64NDArray (matrix); }
+
   double double_value (bool = false) const;
 
   double scalar_value (bool frc_str_conv = false) const
@@ -103,6 +127,19 @@
   ComplexNDArray complex_array_value (bool = false) const
     { return ComplexNDArray (matrix); }
 
+  charNDArray
+  char_array_value (bool = false) const
+  {
+    charNDArray retval (dims ());
+
+    octave_idx_type nel = numel ();
+  
+    for (octave_idx_type i = 0; i < nel; i++)
+      retval(i) = static_cast<char>(matrix(i));
+
+    return retval;
+  }
+
   boolMatrix bool_matrix_value (void) const
     { return matrix.matrix_value (); }