m4-commit
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Changes to m4/tests/generate.awk,v


From: Eric Blake
Subject: Changes to m4/tests/generate.awk,v
Date: Wed, 20 Sep 2006 04:04:31 +0000

CVSROOT:        /sources/m4
Module name:    m4
Changes by:     Eric Blake <ericb>      06/09/20 04:04:29

Index: tests/generate.awk
===================================================================
RCS file: /sources/m4/m4/tests/generate.awk,v
retrieving revision 1.18
retrieving revision 1.19
diff -u -b -r1.18 -r1.19
--- tests/generate.awk  31 Aug 2006 03:21:35 -0000      1.18
+++ tests/generate.awk  20 Sep 2006 04:04:29 -0000      1.19
@@ -22,7 +22,7 @@
 
 BEGIN {
   seq = -1;
-  status = 0;
+  status = xfail = 0;
   file = options = "";
   print "# This file is part of the GNU m4 test suite.  -*- Autotest -*-";
   # I don't know how to get this file's name, so it's hard coded :(
@@ -53,9 +53,13 @@
   gsub ("@comment options:", "", options);
 }
 
+/address@hidden xfail$/ {
+  xfail = 1;
+}
+
 /address@hidden ignore$/ {
   getline;
-  status = 0;
+  status = xfail = 0;
   options = file = "";
   next;
 }
@@ -93,9 +97,9 @@
        }
       else
        {
-         new_test(input, status, output, error, options);
+         new_test(input, status, output, error, options, xfail);
        }
-      status = 0;
+      status = xfail = 0;
       file = input = output = error = options = "";
       next;
     }
@@ -158,11 +162,16 @@
   printf ("AT_KEYWORDS([[documentation]])\n\n");
 }
 
-function new_test(input, status, output, error, options) {
+function new_test(input, status, output, error, options, xfail) {
   input = normalize(input);
   output = normalize(output);
   error = normalize(error);
 
+  if (options ~ /-m/)
+    printf ("AT_CHECK_DYNAMIC_MODULE\n");
+  if (xfail == 1)
+    printf ("AT_XFAIL_IF([:])\n");
+
   printf ("AT_DATA([[input.m4]],\n[[%s]])\n\n", input);
   # Some of these tests `include' files from tests/.
   printf ("AT_CHECK_M4([[%s input.m4]], %s,", options, status);




reply via email to

[Prev in Thread] Current Thread [Next in Thread]