Mercurial > hg > octave-nkf

diff scripts/testfun/test.m @ 15006:d8acad691f26

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Clear %!functions at the end of testing, not for each shared block. * test.m: Stop clearing of test functions at the beginning of each %!shared block.
author Rik <rik@octave.org>
date Tue, 24 Jul 2012 07:50:42 -0700
parents 5d3a684236b0
children bcace51598ed
line wrap: on
line diff
--- a/scripts/testfun/test.m
+++ b/scripts/testfun/test.m
@@ -334,10 +334,6 @@
                          __signal_fail);
       end_try_catch
 
-      ## Clear shared function definitions.
-      eval (__clear, "");
-      __clear = "";
-
       ## Initialization code will be evaluated below.
 
 ### FUNCTION
@@ -555,6 +551,7 @@
     __tests += __istest;
     __successes += __success * __istest;
   endfor
+  ## Clear any test functions created
   eval (__clear, "");
 
   if (nargout == 0)