Mercurial > octave
diff liboctave/Array.cc @ 10681:0ba9bd294421
make cat() (hopefully) more matlab compatible
| author | Jaroslav Hajek <highegg@gmail.com> |
|---|---|
| date | Fri, 04 Jun 2010 15:08:33 +0200 |
| parents | e3064439d6b4 |
| children | 5eb420d92307 |
line wrap: on
line diff
--- a/liboctave/Array.cc Thu Jun 03 21:52:11 2010 -0700 +++ b/liboctave/Array.cc Fri Jun 04 15:08:33 2010 +0200 @@ -2518,9 +2518,11 @@ if (n == 1) return array_list[0]; - - dim_vector dv; - for (octave_idx_type i = 0; i < n; i++) + else if (n == 0) + return Array<T> (); + + dim_vector dv = array_list[0].dims (); + for (octave_idx_type i = 1; i < n; i++) if (! dv.concat (array_list[i].dims (), dim)) (*current_liboctave_error_handler) ("cat: dimension mismatch");