From 7fa6356c30c8eb5988abe73ed47444327cbd6346 Mon Sep 17 00:00:00 2001 From: Steven Schubiger Date: Sun, 19 Jan 2014 17:41:25 +0100 Subject: Compile with -ansi -pedantic --- test.pl | 10 +++++++--- 1 file changed, 7 insertions(+), 3 deletions(-) (limited to 'test.pl') diff --git a/test.pl b/test.pl index 01d77ed..5dc3bf3 100755 --- a/test.pl +++ b/test.pl @@ -17,7 +17,7 @@ my %BUF_SIZE = ( short => 10, ); my $source = 'colorize.c'; -my $warning_flags = '-Wall -Wextra -Wformat -Wswitch-default -Wuninitialized -Wunused -Wno-unused-function -Wno-unused-parameter'; +my $compiler_flags = '-ansi -pedantic -Wall -Wextra -Wformat -Wswitch-default -Wuninitialized -Wunused -Wno-unused-function -Wno-unused-parameter'; my $write_to_tmpfile = sub { @@ -35,8 +35,12 @@ plan tests => $tests; SKIP: { skip "$source does not exist", $tests unless -e $source; + my $binary = tmpnam(); + skip 'compiling failed', $tests unless system("gcc $compiler_flags -o $binary $source") == 0; + unlink $binary; + my $program = tmpnam(); - skip 'compiling failed (normal)', $tests unless system("gcc -DTEST -DBUF_SIZE=$BUF_SIZE{normal} $warning_flags -o $program $source") == 0; + 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'); @@ -139,7 +143,7 @@ SKIP: { SKIP: { my $program_buf = tmpnam(); - skip 'compiling failed (short buffer)', 2 unless system("gcc -DTEST -DBUF_SIZE=$BUF_SIZE{short} $warning_flags -o $program_buf $source") == 0; + skip 'compiling failed (short buffer)', 2 unless system("gcc -DTEST -DBUF_SIZE=$BUF_SIZE{short} -o $program_buf $source") == 0; $check_clean_buf->($program_buf, $_) foreach qw(clean clean-all); unlink $program_buf; } -- cgit v1.2.3