Mercurial > hg > octave-lojdl
changeset 10128:e68431e60e3d
Fix !function test blocks
author | David Grundberg <davidg@cs.umu.se> |
---|---|
date | Mon, 18 Jan 2010 13:48:13 +0100 |
parents | f21fdff5c906 |
children | ab80681c44d9 |
files | scripts/ChangeLog scripts/testfun/test.m |
diffstat | 2 files changed, 5 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/scripts/ChangeLog +++ b/scripts/ChangeLog @@ -1,3 +1,7 @@ +2010-01-18 David Grundberg <davidg@cs.umu.se> + + * testfun/test.m: Fix !function test blocks. + 2010-01-17 Thorsten Meyer <thorsten.meyier@gmx.de> * general/celldisp.m: Add example, add demo.
--- a/scripts/testfun/test.m +++ b/scripts/testfun/test.m @@ -348,7 +348,7 @@ __signal_fail); else __name = __block(__name_position(1):__name_position(2)); - __code = __block; + __code = [__block "\nendfunction"]; try eval(__code); ## Define the function __clear = sprintf ("%sclear %s;\n", __clear, __name);