Mercurial > octave-nkf
changeset 6656:c92e679d9cc5
[project @ 2007-05-22 21:20:58 by jwe]
| author | jwe |
|---|---|
| date | Tue, 22 May 2007 21:20:58 +0000 |
| parents | 8dda89ca38f6 |
| children | 86354a8cd6a7 |
| files | src/ChangeLog src/pt-fcn-handle.cc |
| diffstat | 2 files changed, 8 insertions(+), 0 deletions(-) [+] |
line wrap: on
line diff
--- a/src/ChangeLog Tue May 22 19:25:29 2007 +0000 +++ b/src/ChangeLog Tue May 22 21:20:58 2007 +0000 @@ -2,6 +2,9 @@ * version.h (OCTAVE_VERSION): Now 2.9.12. + * pt-fcn-handle.cc (tree_anon_fcn_handle::rvalue): + Set current function as parent of anonymous function handle. + * Makefile.in (uninstall): Also remove $(DESTDIR)$(octincludedir)/octave, $(DESTDIR)$(octincludedir), $(DESTDIR)$(octlibdir), and $(DESTDIR)$(octfiledir).
--- a/src/pt-fcn-handle.cc Tue May 22 19:25:29 2007 +0000 +++ b/src/pt-fcn-handle.cc Tue May 22 21:20:58 2007 +0000 @@ -115,6 +115,11 @@ = new octave_user_function (new_param_list, new_ret_list, new_cmd_list, new_sym_tab); + octave_function *curr_fcn = octave_call_stack::current (); + + if (curr_fcn) + uf->stash_parent_fcn_name (curr_fcn->name ()); + uf->mark_as_inline_function (); octave_value ov_fcn (uf);