Mercurial > hg > octave-max

changeset 10128:e68431e60e3d

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
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);