Mercurial > octave

diff src/data.cc @ 4911:14027e0bafa4

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2004-07-22 19:58:06 by jwe]
author jwe
date Thu, 22 Jul 2004 19:58:06 +0000
parents a9cfb8b37759
children c638c144d4da
line wrap: on
line diff
--- a/src/data.cc	Mon Jul 12 17:14:13 2004 +0000
+++ b/src/data.cc	Thu Jul 22 19:58:06 2004 +0000
@@ -1236,8 +1236,13 @@
 	{
 	  dim_vector dv = args(0).dims ();
 
-	  if (nd > 0 && nd <= dv.length ())
-	    retval(0) = dv(nd-1);
+	  if (nd > 0)
+	    {
+	      if (nd <= dv.length ())
+		retval(0) = dv(nd-1);
+	      else 
+		retval(0) = 1;
+	    }
 	  else
 	    error ("size: requested dimension (= %d) out of range", nd);
 	}