Mercurial > hg > octave-avbm
diff src/ov-ch-mat.cc @ 6720:fa2f5d4e55db
[project @ 2007-06-14 01:18:25 by dbateman]
author | dbateman |
---|---|
date | Thu, 14 Jun 2007 01:18:26 +0000 (2007-06-14) |
parents | 2aad75fcc93a |
children | 93c65f2a5668 |
line wrap: on
line diff
--- a/src/ov-ch-mat.cc +++ b/src/ov-ch-mat.cc @@ -44,6 +44,16 @@ DEFINE_OV_TYPEID_FUNCTIONS_AND_DATA (octave_char_matrix, "char matrix", "int8"); +idx_vector +octave_char_matrix::index_vector (void) const +{ + const char *p = matrix.data (); + if (numel () == 1 && *p == ':') + return idx_vector (':'); + else + return idx_vector (array_value (true)); +} + bool octave_char_matrix::valid_as_scalar_index (void) const {