X-Git-Url: http://git.refcnt.org/?a=blobdiff_plain;f=lib%2FColorize%2FCommon.pm;h=a60dbe98d5ed8fa2233405d6784affa33f753fed;hb=1bcdb8b4968cab99b55f041ff41e5da45da060cb;hp=e61450bfc6e1641063fc10b70b8e968a7bfc4651;hpb=3585dd50b9428db6691512575181da97b10e967b;p=colorize.git diff --git a/lib/Colorize/Common.pm b/lib/Colorize/Common.pm index e61450b..a60dbe9 100644 --- a/lib/Colorize/Common.pm +++ b/lib/Colorize/Common.pm @@ -11,10 +11,10 @@ our (@EXPORT_OK, %EXPORT_TAGS); my @defaults; @defaults = qw($source $compiler); -@EXPORT_OK = (qw($compiler_flags %BUF_SIZE $write_to_tmpfile), @defaults); +@EXPORT_OK = (qw($compiler_flags %BUF_SIZE $valgrind_command $write_to_tmpfile), @defaults); %EXPORT_TAGS = ('defaults' => [ @defaults ]); -our ($source, $compiler, $compiler_flags, %BUF_SIZE, $write_to_tmpfile); +our ($source, $compiler, $compiler_flags, %BUF_SIZE, $valgrind_command, $write_to_tmpfile); #---------------# # START of data # @@ -27,6 +27,7 @@ $compiler_flags = '-ansi -pedantic -Wall -Wextra -Wformat -Wswitch-default -Wuni normal => 1024, short => 10, ); +$valgrind_command = 'valgrind'; $write_to_tmpfile = sub { my ($content) = @_;