Mercurial > hg > octave-nkf

diff src/pt-mat.cc @ 4267:7cd865a8c815
[project @ 2003-01-03 15:27:05 by jwe]
author: jwe
date: Fri, 03 Jan 2003 15:27:06 +0000
parents: e556870ce8f0
children: 0a59e4de215e
--- a/src/pt-mat.cc
+++ b/src/pt-mat.cc
@@ -409,6 +409,20 @@
 }
 
 bool
+tree_matrix::has_magic_end (void) const
+{
+  for (const_iterator p = begin (); p != end (); p++)
+    {
+      tree_argument_list *elt = *p;
+
+      if (elt && elt->has_magic_end ())
+	return true;
+    }
+
+  return false;
+}
+
+bool
 tree_matrix::all_elements_are_constant (void) const
 {
   for (const_iterator p = begin (); p != end (); p++)