Mercurial > hg > octave-nkf

diff liboctave/dNDArray.cc @ 8956:d91fa4b20bbb

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
ensure nonnegative char -> real conversion
author Jaroslav Hajek <highegg@gmail.com>
date Wed, 11 Mar 2009 10:31:08 +0100
parents eb63fbe60fab
children ed5055b0a476
line wrap: on
line diff
--- a/liboctave/dNDArray.cc
+++ b/liboctave/dNDArray.cc
@@ -87,6 +87,14 @@
     }
 }
 
+NDArray::NDArray (const charNDArray& a)
+  : MArrayN<double> (a.dims ())
+{
+  octave_idx_type n = a.numel ();
+  for (octave_idx_type i = 0; i < n; i++)
+    xelem (i) = static_cast<unsigned char> (a(i));
+}
+
 #if defined (HAVE_FFTW3)
 
 ComplexNDArray