From 055b7ca1312376f2fdf214176a1ae782d05f5396 Mon Sep 17 00:00:00 2001 From: Steven Schubiger Date: Wed, 11 Jun 2014 14:55:04 +0200 Subject: Check exit value for displaying version data --- test.pl | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) diff --git a/test.pl b/test.pl index 8d8b592..27f7a67 100755 --- a/test.pl +++ b/test.pl @@ -10,7 +10,7 @@ use IPC::Open3 qw(open3); use Symbol qw(gensym); use Test::More; -my $tests = 23; +my $tests = 24; my %BUF_SIZE = ( normal => 1024, @@ -42,7 +42,8 @@ SKIP: { my $program = tmpnam(); skip 'compiling failed (normal)', $tests unless system("gcc -DTEST -DBUF_SIZE=$BUF_SIZE{normal} -o $program $source") == 0; - is(system("$program --help >/dev/null 2>&1"), 0, 'exit value for help screen'); + is(system("$program --help >/dev/null 2>&1"), 0, 'exit value for help screen'); + is(system("$program --version >/dev/null 2>&1"), 0, 'exit value for version data'); my $run_program_fail = sub { -- cgit v1.2.3