Mercurial > hg > octave-lyh
diff scripts/testfun/test.m @ 10128:e68431e60e3d
Fix !function test blocks
author | David Grundberg <davidg@cs.umu.se> |
---|---|
date | Mon, 18 Jan 2010 13:48:13 +0100 |
parents | 929e53107f09 |
children | 0c3609dd34cf |
line wrap: on
line diff
--- 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);