Skip to content

Commit c52b1cb

Browse files
committed
Remove long-unrequied hack from early Moar days.
1 parent 8541494 commit c52b1cb

File tree

3 files changed

+7
-13
lines changed

3 files changed

+7
-13
lines changed

src/vm/moar/HLL/Backend.nqp

Lines changed: 5 additions & 5 deletions
Original file line numberDiff line numberDiff line change
@@ -209,9 +209,9 @@ class HLL::Backend::MoarVM {
209209
}
210210
else {
211211
my $boot_mode := %adverbs<bootstrap> ?? 1 !! 0;
212-
__MVM__usecompileehllconfig() if $boot_mode;
212+
nqp::usecompileehllconfig() if $boot_mode;
213213
my $result := $assmblr.assemble_and_load($mast);
214-
__MVM__usecompilerhllconfig() if $boot_mode;
214+
nqp::usecompilerhllconfig() if $boot_mode;
215215
$result
216216
}
217217
}
@@ -221,15 +221,15 @@ class HLL::Backend::MoarVM {
221221
}
222222

223223
method is_compunit($cuish) {
224-
__MVM__iscompunit($cuish)
224+
nqp::iscompunit($cuish)
225225
}
226226

227227
method compunit_mainline($cu) {
228-
__MVM__compunitmainline($cu)
228+
nqp::compunitmainline($cu)
229229
}
230230

231231
method compunit_coderefs($cu) {
232-
__MVM__compunitcodes($cu)
232+
nqp::compunitcodes($cu)
233233
}
234234
}
235235

src/vm/moar/QAST/QASTCompilerMAST.nqp

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -1853,11 +1853,11 @@ class MASTBytecodeAssembler {
18531853
}
18541854

18551855
method assemble_to_file($mast, $file) {
1856-
__MVM__masttofile($mast, self.node_hash(), $file)
1856+
nqp::masttofile($mast, self.node_hash(), $file)
18571857
}
18581858

18591859
method assemble_and_load($mast) {
1860-
__MVM__masttocu($mast, self.node_hash())
1860+
nqp::masttocu($mast, self.node_hash())
18611861
}
18621862
}
18631863

src/vm/moar/QAST/QASTOperationsMAST.nqp

Lines changed: 0 additions & 6 deletions
Original file line numberDiff line numberDiff line change
@@ -1368,12 +1368,6 @@ sub arrange_args(@in) {
13681368
}
13691369

13701370
my $call_gen := sub ($qastcomp, $op) {
1371-
# Cheat for __MVM__ => nqp::foo
1372-
if nqp::substr($op.name, 0, 8) eq '&__MVM__' {
1373-
my $realname := nqp::substr($op.name, 8);
1374-
return $qastcomp.as_mast(QAST::Op.new( :op($realname), |$op.list ));
1375-
}
1376-
13771371
# Work out what callee is.
13781372
my $callee;
13791373
my @args := $op.list;

0 commit comments

Comments
 (0)