more tests

pull/67/head
David Schweikert 11 years ago
parent b779e14db6
commit e79444f09a

@ -1,8 +1,8 @@
#!/usr/bin/perl -w #!/usr/bin/perl -w
use Test::Command tests => 33; use Test::Command tests => 36;
for my $arg (qw(i B c C H i O p Q r t)) { for my $arg (qw(i b B c C H i O p Q r t)) {
my $cmd = Test::Command->new(cmd => "fping -$arg xxx"); my $cmd = Test::Command->new(cmd => "fping -$arg xxx");
$cmd->exit_is_num(1); $cmd->exit_is_num(1);
$cmd->stdout_is_eq(""); $cmd->stdout_is_eq("");

@ -424,9 +424,7 @@ int main( int argc, char **argv )
break; break;
case 'b': case 'b':
errno = 0; if (!sscanf(optarg,"%i",&ping_data_size))
ping_data_size = (unsigned int) strtol(optarg, (char **)NULL, 10);
if( errno )
usage(1); usage(1);
break; break;

Loading…
Cancel
Save