Save compile errors
[gruntmaster-daemon.git] / gruntmaster-compile
1 #!/usr/bin/perl -w
2 use v5.14;
3 no if $] > 5.017011, warnings => 'experimental::smartmatch';
4
5 my ($format, $basename, $name) = @ARGV;
6 my $ret = fork // die $!;
7 if ($ret) {
8 $SIG{ALRM} = sub {kill KILL => $ret};
9 alarm 5;
10 wait;
11 exit $? >> 8
12 } else {
13 given ($format){
14 exec 'g++', '-o', $basename, $name when 'CPP';
15 }
16 }
This page took 0.02145 seconds and 4 git commands to generate.