implement op execname which returns ARGV[0]

This will only get useful when we provide a proper binary for nqp-m and perl6-m
Raku · Apr 3, 2014 · 7970930 · 7970930
1 parent 46fab27
commit 7970930
Showing 1 changed file with 1 addition and 0 deletions.
diff --git a/src/vm/moar/QAST/QASTOperationsMAST.nqp b/src/vm/moar/QAST/QASTOperationsMAST.nqp
@@ -2358,6 +2358,7 @@ QAST::MASTOperations.add_core_moarop_mapping('openpipe', 'openpipe');
 QAST::MASTOperations.add_core_moarop_mapping('rand_i', 'rand_i');
 QAST::MASTOperations.add_core_moarop_mapping('rand_n', 'randscale_n');
 QAST::MASTOperations.add_core_moarop_mapping('srand', 'srand', 0);
+QAST::MASTOperations.add_core_moarop_mapping('execname', 'execname');
 
 # thread related opcodes
 QAST::MASTOperations.add_core_moarop_mapping('newthread', 'newthread');