Mercurial > hg > octave-nkf
diff src/pt-idx.cc @ 7100:28607462901f
[project @ 2007-11-05 23:42:01 by jwe]
author | jwe |
---|---|
date | Mon, 05 Nov 2007 23:42:01 +0000 |
parents | 70f30a92b725 |
children | 12a12ef1f1bc |
line wrap: on
line diff
--- a/src/pt-idx.cc +++ b/src/pt-idx.cc @@ -495,7 +495,8 @@ { std::string ttype = type.substr (0, i); - if (ttype[ttype.length()-1] == '(') + char c = ttype[ttype.length()-1]; + if (c == '(' || c == '{') { octave_idx_type nel = 1; @@ -545,7 +546,9 @@ { std::string ttype = type.substr (0, i); - if (ttype[ttype.length()-1] != '(') + char c = ttype[ttype.length()-1]; + + if (! (c == '(' || c == '{')) { octave_value_list tmp_list = first_retval_object.subsref (ttype, idx, 1);