mirror of
https://github.com/pragma-/pbot.git
synced 2024-11-04 11:09:32 +01:00
b6b90ffa49
The compiler_vm module has been significantly refactored into distinct modules in order to better facilitate the addition of other languages and compilers. Currently there is support for C89, C99 and C11 using gcc, as well as support for Perl. This is an initial work-in-progress commit and there are still some minor rough edges to polish up.
27 lines
558 B
Perl
Executable File
27 lines
558 B
Perl
Executable File
#!/usr/bin/perl
|
|
|
|
use warnings;
|
|
use strict;
|
|
|
|
package perl;
|
|
use parent '_default';
|
|
|
|
sub initialize {
|
|
my ($self, %conf) = @_;
|
|
|
|
$self->{sourcefile} = 'prog.pl';
|
|
$self->{execfile} = 'prog.pl';
|
|
$self->{default_options} = '';
|
|
$self->{cmdline} = 'perl $options $sourcefile';
|
|
}
|
|
|
|
sub postprocess_output {
|
|
my $self = shift;
|
|
$self->SUPER::postprocess_output;
|
|
|
|
$self->{output} =~ s/\s+at $self->{sourcefile} line \d+, near ".*?"//;
|
|
$self->{output} =~ s/\s*Execution of $self->{sourcefile} aborted due to compilation errors.//;
|
|
}
|
|
|
|
1;
|