diff options
| author | Richard Levitte <levitte@openssl.org> | 2000-02-26 03:58:36 +0000 |
|---|---|---|
| committer | Richard Levitte <levitte@openssl.org> | 2000-02-26 03:58:36 +0000 |
| commit | 8072c135cbea43cd7f343542420cc1a2b0a8e3b2 (patch) | |
| tree | 32d33f616a22eb37eaed0d2cb86a04b0c6544827 /test | |
| parent | 1472f300d57e01401b722886803a0868f7d59c9b (diff) | |
Move to using the same perl code as Makefile.ssl
Diffstat (limited to 'test')
| -rw-r--r-- | test/tests.com | 4 |
1 files changed, 1 insertions, 3 deletions
diff --git a/test/tests.com b/test/tests.com index 51dfc869b7..040dafab8d 100644 --- a/test/tests.com +++ b/test/tests.com @@ -151,9 +151,7 @@ RECORD $ create/fdl=bntest-vms.fdl bntest-vms.sh $ open/append foo bntest-vms.sh $ type/output=foo: sys$input: -<< __FOO__ bc | awk '{ \ -if ($$0 != "0") {print "error"; exit(1); } \ -if (((NR+1)%64) == 0) print NR+1," tests done"; }' +<< __FOO__ bc | perl -e 'while (<STDIN>) {if (/^test (.*)/) {print STDERR "\nverify $1";} elsif (!/^0$/) {die "\nFailed! bc: $_";} print STDERR "."; $i++;} print STDERR "\n$i tests passed\n"' $ define/user sys$output bntest-vms.tmp $ mcr 'texe_dir''bntest' $ copy bntest-vms.tmp foo: |