svn commit: r153981 - httpd/apreq/branches/multi-env-unstable/library/t/at.c

[joes]

Author: joes
Date: Tue Feb 15 17:32:24 2005
New Revision: 153981

URL: http://svn.apache.org/viewcvs?view=rev&rev=153981
Log:

Make sure the local reporter generates the 
skipped test list for Test::Harness, prior 
to doing a longjmp.  Without this Test::Harness
gets confused by the sequence gap.  Actually
this code probably belongs at_run().

Modified:
    httpd/apreq/branches/multi-env-unstable/library/t/at.c

Modified: httpd/apreq/branches/multi-env-unstable/library/t/at.c
URL: 
http://svn.apache.org/viewcvs/httpd/apreq/branches/multi-env-unstable/library/t/at.c?view=diff&r1=153980&r2=153981
==============================================================================
--- httpd/apreq/branches/multi-env-unstable/library/t/at.c (original)
+++ httpd/apreq/branches/multi-env-unstable/library/t/at.c Tue Feb 15 17:32:24 
2005
@@ -218,6 +218,7 @@
 
 static apr_status_t at_report_local_write(at_report_t *ctx, const char *msg)
 {
+    char buf[256];
     struct at_report_local *q = (struct at_report_local *)ctx;
     dAT = q->t;
 
@@ -226,8 +227,11 @@
         AT->report = q->saved_report;
         AT->fatal = q->saved_fatal;
         apr_pool_cleanup_kill(q->pool, q, report_local_cleanup);
-        at_trace(AT, "Abandon %s, omitting tests %d - %d from this run.",
-                 AT->name, AT->prior + AT->current + 1, AT->prior + AT->plan);
+        while (AT->current++ < AT->plan) {
+            snprintf(buf, 256, "not ok %d # skipped: aborting test %s",
+                     AT->prior + AT->current, AT->name);
+            at_report(AT, buf);
+        }
         longjmp(*AT->abort, 0);
     }
     AT->current--;