Mercurial > hg > octave-nkf

diff liboctave/chNDArray.cc @ 4940:954cc2ba6a49

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2004-08-24 19:30:31 by jwe]
author jwe
date Tue, 24 Aug 2004 19:32:46 +0000
parents c638c144d4da
children e71be9c548f2
line wrap: on
line diff
--- a/liboctave/chNDArray.cc
+++ b/liboctave/chNDArray.cc
@@ -53,7 +53,7 @@
 concat (const charNDArray& ra, const charNDArray& rb, const Array<int>& ra_idx)
 {
   charNDArray retval (ra);
-  if (ra.numel () > 0)
+  if (rb.numel () > 0)
     retval.insert (rb, ra_idx);
   return retval;
 }
@@ -65,7 +65,7 @@
   charNDArray tmp (rb.dims ());
   int nel = rb.numel ();
 
-  if (ra.numel () == 0)
+  if (rb.numel () == 0)
     return retval;
 
   for (int i = 0; i < nel; i++)
@@ -124,6 +124,9 @@
 	}
     }
 
+  if (rb.numel () == 0)
+    return retval;
+
   retval.insert (rb, ra_idx);
   return retval;
 }