Mercurial > hg > octave-lojdl
changeset 1370:35477f627d7c
[project @ 1995-09-06 20:08:52 by jwe]
author | jwe |
---|---|
date | Wed, 06 Sep 1995 20:08:52 +0000 |
parents | 6a323120f291 |
children | 766af9ca8edb |
files | src/pt-exp-base.cc |
diffstat | 1 files changed, 9 insertions(+), 0 deletions(-) [+] |
line wrap: on
line diff
--- a/src/pt-exp-base.cc +++ b/src/pt-exp-base.cc @@ -680,6 +680,15 @@ tree_fvc::lookup_map_element (SLList<char*>& list, int insert, int silent) { static tree_constant retval; + + int l = line (); + int c = column (); + + if (l == -1 && c == -1) + ::error ("invalid structure reference"); + else + ::error ("invalid structure reference near line %d column %d", l, c); + return retval; }