Mercurial > octave-nkf
diff src/lex.l @ 3189:bef7b73c0724
[project @ 1998-10-16 18:05:26 by jwe]
author | jwe |
---|---|
date | Fri, 16 Oct 1998 18:05:31 +0000 |
parents | c17387059fd3 |
children | 81738e630f57 |
line wrap: on
line diff
--- a/src/lex.l Thu Oct 15 06:02:21 1998 +0000 +++ b/src/lex.l Fri Oct 16 18:05:31 1998 +0000 @@ -1802,14 +1802,16 @@ // arguments. // // If the following token is `=', or if we are parsing a function - // return list or function parameter list, force the symbol to be - // inserted as a variable in the current symbol table. + // return list or function parameter list, or if we are looking at + // something like [ab,cd] = foo (), force the symbol to be inserted + // as a variable in the current symbol table. if (is_text_function_name (tok) && ! is_variable (tok)) { if (next_tok_is_eq || lexer_flags.looking_at_return_list - || lexer_flags.looking_at_parameter_list) + || lexer_flags.looking_at_parameter_list + || lexer_flags.looking_at_matrix_or_assign_lhs) { force_local_variable (tok); }