Mercurial > octave-nkf

diff scripts/testfun/test.m @ 10635:d1978e7364ad

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Print name of function in error() string messages.
author Rik <octave@nomad.inbox5.com>
date Sun, 16 May 2010 22:26:54 -0700
parents 08050f37ba49
children be55736a0783
line wrap: on
line diff
--- a/scripts/testfun/test.m	Sun May 16 18:28:59 2010 -0700
+++ b/scripts/testfun/test.m	Sun May 16 22:26:54 2010 -0700
@@ -105,7 +105,7 @@
     if (ischar (__fid))
       __fid = fopen (__fid, "wt");
       if (__fid < 0)
-        error ("could not open log file");
+        error ("test: could not open log file");
       endif
       __close_fid = 1;
     endif
@@ -149,7 +149,7 @@
     endif
     return;
   else
-    error ("test unknown flag '%s'", __flag);
+    error ("test: unknown flag '%s'", __flag);
   endif
 
   ## Locate the file to test.