Mercurial > octave-nkf

diff test/fntests.m @ 11032:c9b0a75b02e8

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Make all regexp in Octave compatible with both POSIX and PCRE.
author Rik <octave@nomad.inbox5.com>
date Tue, 28 Sep 2010 09:25:14 -0700
parents fa56fd98c0c5
children d9c8916bb9dd
line wrap: on
line diff
--- a/test/fntests.m	Tue Sep 28 08:22:15 2010 -0400
+++ b/test/fntests.m	Tue Sep 28 09:25:14 2010 -0700
@@ -75,7 +75,7 @@
     if (fid >= 0)
       str = fread (fid, "*char")';
       fclose (fid);
-      retval = ! isempty (regexp (str,'[\r\n](DEFUN|DEFUN_DLD)\b', "once"));
+      retval = ! isempty (regexp (str,"[\r\n](DEFUN|DEFUN_DLD)\\b", "once"));
     else
       error ("fopen failed: %s", f);
     endif
@@ -93,7 +93,7 @@
     fclose (fid);
     ## Avoid PCRE 'lineanchors' by searching for newline followed by PTN.
     ## Equivalent to regexp ('^PTN','lineanchors')
-    retval = ! isempty (regexp (str, '[\r\n]\s*%!(test|assert|error|warning)', "once"));
+    retval = ! isempty (regexp (str, "[\r\n]\\s*%!(test|assert|error|warning)", "once"));
   else
     error ("fopen failed: %s", f);
   endif