Mercurial > hg > octave-max

diff src/ov-base-scalar.h @ 7433:402168152bb9

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2008-01-31 18:59:09 by dbateman]
author dbateman
date Thu, 31 Jan 2008 18:59:11 +0000
parents a1dbe9d80eee
children 36594d5bbe13
line wrap: on
line diff
--- a/src/ov-base-scalar.h
+++ b/src/ov-base-scalar.h
@@ -93,6 +93,16 @@
 
   octave_value any (int = 0) const { return (scalar != ST ()); }
 
+  octave_value sort (octave_idx_type, sortmode) const
+    { return octave_value (scalar); }
+  octave_value sort (Array<octave_idx_type> &sidx, octave_idx_type,
+		     sortmode) const
+    { 
+      sidx.resize (dim_vector (1, 1)); 
+      sidx(0) = 0; 
+      return octave_value (scalar); 
+    }
+
   MatrixType matrix_type (void) const { return typ; }
   MatrixType matrix_type (const MatrixType& _typ) const
     { MatrixType ret = typ; typ = _typ; return ret; }