Skip to content

Commit d841e27

Browse files
committed
Abstract notion of "pre-compiled".
Previously, this has been tied to --target=pir.
1 parent 2a13778 commit d841e27

File tree

2 files changed

+5
-1
lines changed

2 files changed

+5
-1
lines changed

src/HLL/Compiler.pm

Lines changed: 4 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -242,6 +242,10 @@ class HLL::Compiler {
242242

243243
%adverbs.update(%opts);
244244
self.usage($program-name) if %adverbs<help> || %adverbs<h>;
245+
246+
if !nqp::existskey(%adverbs, 'precomp') && %adverbs<target> eq 'pir' {
247+
%adverbs<precomp> := 1;
248+
}
245249

246250
pir::load_bytecode__vs('dumper.pbc');
247251
pir::load_bytecode__vs('PGE/Dumper.pbc');

src/HLL/World.pm

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -55,7 +55,7 @@ class HLL::World {
5555
%!addr_to_slot := nqp::hash();
5656
@!fixup_tasks := nqp::list();
5757
@!load_dependency_tasks := nqp::list();
58-
$!precomp_mode := %*COMPILING<%?OPTIONS><target> eq 'pir';
58+
$!precomp_mode := %*COMPILING<%?OPTIONS><precomp>;
5959
$!num_code_refs := 0;
6060
$!code_ref_blocks := [];
6161
nqp::scsetdesc($!sc, $description);

0 commit comments

Comments
 (0)