diff options
| author | Marc Espie <espie@cvs.openbsd.org> | 2014-01-31 10:28:19 +0000 |
|---|---|---|
| committer | Marc Espie <espie@cvs.openbsd.org> | 2014-01-31 10:28:19 +0000 |
| commit | ee4d6dd22844efb4bb018e371263db07310abbd7 (patch) | |
| tree | dbcffb89221979bb93631031f8e8f9991b561a82 /regress | |
| parent | e8a10193a7458a7b2efa6cde9fb96fc0b5d27e10 (diff) | |
fix number of tests
Diffstat (limited to 'regress')
| -rw-r--r-- | regress/usr.sbin/pkg_add/check-cfl | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/regress/usr.sbin/pkg_add/check-cfl b/regress/usr.sbin/pkg_add/check-cfl index 235fedd585b..ab4d0486c8b 100644 --- a/regress/usr.sbin/pkg_add/check-cfl +++ b/regress/usr.sbin/pkg_add/check-cfl @@ -1,11 +1,11 @@ #! /usr/bin/perl -# $OpenBSD: check-cfl,v 1.2 2014/01/31 10:18:35 espie Exp $ +# $OpenBSD: check-cfl,v 1.3 2014/01/31 10:28:18 espie Exp $ # Written by Marc Espie # Public domain use strict; use warnings; -use Test::Simple tests => 3; +use Test::Simple tests => 4; use OpenBSD::PkgCfl; use OpenBSD::PackingList; @@ -19,8 +19,8 @@ sub check_list if (@r != @_) { print STDERR "length: ", scalar(@r)," vs. ", scalar(@_), "\n"; - print STDERR join(',', @r), "\n"; - print STDERR join(',', @_), "\n"; + print STDERR "Expected: ", join(',', @r), "\n"; + print STDERR "Result: ", join(',', @_), "\n"; return 0; } for my $i (0 .. @_ -1) { |