Fix nqp::getpid on Parrot.

Raku · Jun 23, 2013 · 7fa12e2 · 7fa12e2
1 parent f3cab58
commit 7fa12e2
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/src/vm/parrot/QAST/Operations.nqp b/src/vm/parrot/QAST/Operations.nqp
@@ -2296,7 +2296,7 @@ QAST::Operations.add_core_op('getpid', -> $qastcomp, $op {
         nqp::die('getenvhash requires no operands');
     }
     $qastcomp.as_post(QAST::Op.new(
-        :op('callmethod'), :name('getpid'),
+        :op('callmethod'), :name('getpid'), :returns(int),
         QAST::VM.new( :pirop('getinterp__P') )
     ))
 });