[js] Implement nqp::p6captosig.

rakudo · Jan 24, 2017 · c820894 · c820894
1 parent ab7cf8e
commit c820894
Showing 1 changed file with 4 additions and 0 deletions.
diff --git a/src/vm/js/Perl6/Ops.nqp b/src/vm/js/Perl6/Ops.nqp
@@ -67,6 +67,10 @@ $ops.add_simple_op('p6isbindable', $ops.INT, [$ops.OBJ, $ops.OBJ], :!inlinable,
     "nqp.p6binder.is_bindable($*CTX, null, nqp.p6binder, $sig, $cap)"
 });
 
+$ops.add_simple_op('p6captosig', $ops.OBJ, [$ops.OBJ, $ops.OBJ], sub ($sig, $cap) {
+    "nqp.p6binder.bind_cap_to_sig($*CTX, null, nqp.p6binder, $sig, $cap)"
+}, :side_effects);
+
 $ops.add_op('p6bindattrinvres', $ops.bindattr($ops.OBJ, :inverted_result));
 
 $ops.add_simple_op('p6invokeunder', $ops.OBJ, [$ops.OBJ, $ops.OBJ], :side_effects, sub ($fake, $code) {