X-Git-Url: http://git.ieval.ro/?p=gruntmaster-daemon.git;a=blobdiff_plain;f=gruntmaster-compile;h=ee80c409ace3a3b010018ffb91c6e7ec6184f151;hp=be900b9ac565fc4b2f2ac2b757b8f1710ae126c2;hb=c4d90e6f4a1d14b1b898c28d6787a06c8dfa2a90;hpb=95379e40e45ab2cc445a81b32555a7da9e193bac diff --git a/gruntmaster-compile b/gruntmaster-compile index be900b9..ee80c40 100755 --- a/gruntmaster-compile +++ b/gruntmaster-compile @@ -9,8 +9,8 @@ my ($format, $name) = @ARGV; my $basename = fileparse $name, qr/\..*/; given ($format){ - exec 'gcc', qw/-DONLINE_JUDGE -std=gnu11 -Wall -Wextra -O2 -o/, $basename, $name when 'C'; - exec 'g++', qw/-DONLINE_JUDGE -std=gnu++11 -Wall -Wextra -O2 -o/, $basename, $name when 'CPP'; + exec 'gcc', qw/-DONLINE_JUDGE -std=gnu11 -Wall -Wextra -lm -O2 -o/, $basename, $name when 'C'; + exec 'g++', qw/-DONLINE_JUDGE -std=gnu++11 -Wall -Wextra -lm -O2 -o/, $basename, $name when 'CPP'; when ('MONO') { system 'gmcs', '-d:ONLINE_JUDGE', $name and die "gmcs failed: errno=$! return=$?"; rename "$basename.exe", $basename; @@ -29,11 +29,13 @@ given ($format){ exec 'go', qw/build -compiler gccgo/, $name, when 'GCCGO'; exec 'ghc', qw/-DONLINE_JUDGE -Wall -O2 -o/, $basename, $name when 'HASKELL'; - when ([qw/PERL PYTHON/]){ + when ([qw/PERL PYTHON RUBY SBCL/]){ open IN, '<', $name; open OUT, '>', $basename; - print OUT "#!/usr/bin/perl\n" if $_ eq 'PERL'; - print OUT "#!/usr/bin/python\n" if $_ eq 'PYTHON'; + print OUT "#!/usr/bin/perl\n" if $_ eq 'PERL'; + print OUT "#!/usr/bin/python\n" if $_ eq 'PYTHON'; + print OUT "#!/usr/bin/ruby\n" if $_ eq 'RUBY'; + print OUT "#!/usr/bin/sbcl --script\n" if $_ eq 'SBCL'; print OUT while ; close OUT; close IN;