Mercurial > hg > octave-nkf

diff src/oct-obj.cc @ 8455:fd11a08a9b31

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
disallow invalid {}-indexed assigments
author Jaroslav Hajek <highegg@gmail.com>
date Sun, 11 Jan 2009 07:55:44 +0100
parents f00578b495e9
children ad3afaaa19c1
line wrap: on
line diff
--- a/src/oct-obj.cc
+++ b/src/oct-obj.cc
@@ -162,6 +162,16 @@
 }
 
 bool
+octave_value_list::all_scalars (void) const
+{
+  octave_idx_type n = length (), i;
+
+  for (i = 0; i < n && elem (i).is_string (); i++) ;
+  
+  return i == n;
+}
+
+bool
 octave_value_list::has_magic_colon (void) const
 {
   octave_idx_type n = length ();