X-Git-Url: http://git.refcnt.org/?p=colorize.git;a=blobdiff_plain;f=lib%2FColorize%2FCommon.pm;h=a60dbe98d5ed8fa2233405d6784affa33f753fed;hp=e61450bfc6e1641063fc10b70b8e968a7bfc4651;hb=e644ee656f5a2ec2dabe74dc14e432b336082cbf;hpb=77f3034f313600e3d030948dd228a5325d5b4da0 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) = @_;