Mercurial > octave-nkf
diff src/ov-fcn-handle.cc @ 6416:59a4304b7cc5
[project @ 2007-03-15 20:37:44 by jwe]
author | jwe |
---|---|
date | Thu, 15 Mar 2007 20:37:44 +0000 |
parents | 9b525feab43b |
children | 89ed13fec6fe |
line wrap: on
line diff
--- a/src/ov-fcn-handle.cc Thu Mar 15 18:03:18 2007 +0000 +++ b/src/ov-fcn-handle.cc Thu Mar 15 20:37:44 2007 +0000 @@ -698,7 +698,17 @@ if (! error_state && fh) { std::string fh_nm = fh->fcn_name (); - retval = fh_nm; + + if (fh_nm == "@<anonymous>") + { + std::ostringstream buf; + + fh->print_raw (buf); + + retval = buf.str (); + } + else + retval = fh_nm; } else error ("func2str: expecting valid function handle as first argument");