Update PREREQ_PM

[gruntmaster-daemon.git] / gruntmaster-compile

diff --git a/gruntmaster-compile b/gruntmaster-compile
index 0414e4f79dd7ff90353328628faf1bfe0b89c7e6..2d98d1438e8267940aff8536044e3d3e622d430e 100755 (executable)
--- a/gruntmaster-compile
+++ b/gruntmaster-compile
@@ -2,15 +2,22 @@
 use v5.14;
 no if $] > 5.017011, warnings => 'experimental::smartmatch';
 
+use File::Copy qw/copy/;
+
 my ($format, $basename, $name) = @ARGV;
 my $ret = fork // die $!;
 if ($ret) {
-  $SIG{ALRM} = sub {kill KILL => $ret};
-  alarm 5;
-  wait;
-  exit $? >> 8
+       $SIG{ALRM} = sub {kill KILL => $ret};
+       alarm 5;
+       wait;
+       exit $? >> 8
 } else {
-  given ($format){
-       exec 'g++', '-o', $basename, $name when 'CPP';
-  }
+       given ($format){
+               exec 'gcc', qw/-DONLINE_JUDGE -std=gnu11 -Wextra -O2 -o/, $basename, $name when 'C';
+               exec 'g++', qw/-DONLINE_JUDGE -std=gnu++11 -fabi-version=6 -Wextra -O2 -o/, $basename, $name when 'CPP';
+               exec 'gmcs', '-d:ONLINE_JUDGE', $name when  'MONO';
+               exec 'javac', $name when 'JAVA';
+               exec 'fpc', qw/-dONLINE_JUDGE -O2 -n/, $name when 'PASCAL';
+               copy $name, $basename when ['PERL', 'PYTHON']
+       }
 }