Mercurial > hg > octave-lyh

diff src/ov-scalar.h @ 4569:01e4957409a4

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2003-10-30 05:48:17 by jwe]
author jwe
date Thu, 30 Oct 2003 05:48:17 +0000
parents 508238e65af7
children d44675070f1a
line wrap: on
line diff
--- a/src/ov-scalar.h
+++ b/src/ov-scalar.h
@@ -89,17 +89,17 @@
   Matrix matrix_value (bool = false) const
     { return Matrix (1, 1, scalar); }
 
-  NDArray double_nd_array_value (bool = false) const
-    {
-      dim_vector temp (1, 1);
-      return NDArray (temp, double_value ());
-    }
+  NDArray array_value (bool = false) const
+    { return NDArray (dim_vector (1, 1), double_value ()); }
 
   Complex complex_value (bool = false) const { return scalar; }
 
   ComplexMatrix complex_matrix_value (bool = false) const
     { return  ComplexMatrix (1, 1, Complex (scalar)); }
 
+  ComplexNDArray complex_array_value (bool = false) const
+    { return ComplexNDArray (dim_vector (1, 1), double_value ()); }
+
   octave_value convert_to_str_internal (bool pad, bool force) const;
 
   void increment (void) { ++scalar; }