use Try::Tiny;
use Log::Log4perl qw/get_logger/;
-use constant PAGE_SIZE => 10;
use constant FORMAT_EXTENSION => {
C => 'c',
CPP => 'cpp',
content => $job->source,
},
},
- map { $_ => $job->problem->get_column($_) } qw/generator runner judge testcnt timeout olimit/
+ map { $_ => $job->problem->get_column($_) } qw/generator runner judge precnt testcnt timeout olimit/
};
$meta->{tests} = decode_json $job->problem->tests if $meta->{runner} eq 'File';
+ delete $meta->{precnt} if $job->problem->is_in_archive;
+ $meta->{testcnt} = $meta->{precnt} if $meta->{precnt};
$meta->{files}{ver} = {
name => 'ver.' . FORMAT_EXTENSION->{$job->problem->verformat},
process $meta;
+ $meta->{result_text} .= ' (pretests)' if $meta->{precnt};
$job->update({
result => $meta->{result},
result_text => $meta->{result_text},