Skip to content

Commit b5f2c5d

Browse files
committed
-e option to HLL::Compiler needs to pass an arg0.
1 parent 9573361 commit b5f2c5d

File tree

1 file changed

+3
-1
lines changed

1 file changed

+3
-1
lines changed

src/HLL/Compiler.pm

Lines changed: 3 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -304,7 +304,9 @@ class HLL::Compiler {
304304
self.nqpevent(%adverbs<nqpevent>) if %adverbs<nqpevent>;
305305

306306
my $result;
307-
if %adverbs<e> { $result := self.eval(%adverbs<e>, |@a, |%adverbs) }
307+
if %adverbs<e> {
308+
$result := self.eval(%adverbs<e>, '-e', |@a, |%adverbs)
309+
}
308310
elsif !@a { $result := self.interactive(|%adverbs) }
309311
elsif %adverbs<combine> { $result := self.evalfiles(@a, |%adverbs) }
310312
else { $result := self.evalfiles(@a[0], |@a, |%adverbs) }

0 commit comments

Comments
 (0)