changeset 13069:48c94e21b57f

codesprint: recognize "fail" as a test in fntests.m * fntests.m (has_tests): Also look for "fail".
author John W. Eaton <jwe@octave.org>
date Sat, 03 Sep 2011 15:24:44 -0400
parents 542891ebfcdb
children a0d854f079d2
files test/fntests.m
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/test/fntests.m	Sat Sep 03 14:09:51 2011 -0500
+++ b/test/fntests.m	Sat Sep 03 15:24:44 2011 -0400
@@ -91,7 +91,7 @@
   if (fid >= 0)
     str = fread (fid, "*char")';
     fclose (fid);
-    retval = ! isempty (regexp (str, '^%!(test|assert|error|warning)', "lineanchors"));
+    retval = ! isempty (regexp (str, '^%!(assert|error|fail|test|warning)', "lineanchors"));
   else
     error ("fopen failed: %s", f);
   endif