Mercurial > octave-nkf

changeset 13833:0a28c49cb477

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Format test suite output correctly on Win32. * fntestsm (run_test_dir, run_test_script): Use filesep instead of hardcoded forward slash.
author Michael Goffioul <michael.goffioul@gmail.com>
date Sun, 06 Nov 2011 20:08:17 +0000
parents 2e4252228f73
children 227130df89eb
files test/fntests.m
diffstat 1 files changed, 4 insertions(+), 4 deletions(-) [+]
line wrap: on
line diff
--- a/test/fntests.m	Sat Nov 05 13:46:15 2011 -0700
+++ b/test/fntests.m	Sun Nov 06 20:08:17 2011 +0000
@@ -119,7 +119,7 @@
         && ! strcmp (nm, ".") && ! strcmp (nm, "..")
         && ! strcmp (nm, "private") && nm(1) != "@"
         && ! strcmp (nm, "CVS"))
-      [p, n, xf, sk] = run_test_dir (fid, [d, "/", nm]);
+      [p, n, xf, sk] = run_test_dir (fid, [d, filesep, nm]);
       dp += p;
       dn += n;
       dxf += xf;
@@ -167,7 +167,7 @@
     nm = lst(i).name;
     if (lst(i).isdir && ! strcmp (nm, ".") && ! strcmp (nm, "..")
         && ! strcmp (nm, "CVS"))
-      [p, n, xf, sk] = run_test_script (fid, [d, "/", nm]);
+      [p, n, xf, sk] = run_test_script (fid, [d, filesep, nm]);
       dp += p;
       dn += n;
       dxf += xf;
@@ -186,8 +186,8 @@
       p = n = xf = 0;
       ## Only run if it contains %!test, %!assert %!error or %!warning
       if (has_tests (f))
-        tmp = strrep (f, [topsrcdir, "/"], "");
-        tmp = strrep (tmp, [topbuilddir, "/"], "../");
+        tmp = strrep (f, [topsrcdir, filesep], "");
+        tmp = strrep (tmp, [topbuilddir, filesep], ["..", filesep]);
         print_test_file_name (tmp);
         [p, n, xf, sk] = test (f, "quiet", fid);
         print_pass_fail (n, p);