[js] Use the :ctx named parameter for ops that take a ctx.

Author: pmurias

src/vm/js/QAST/Compiler.nqp

@@ -397,7 +397,7 @@ class QAST::OperationsJS {
     add_simple_op('setcontspec', $T_OBJ, [$T_OBJ, $T_STR, $T_OBJ], :sideffects);
     add_simple_op('assign',  $T_OBJ, [$T_OBJ, $T_OBJ], sub ($cont, $value) {"$cont.\$\$assign({$*CTX},$value)"}, :sideffects);
     add_simple_op('assignunchecked',  $T_OBJ, [$T_OBJ, $T_OBJ], sub ($cont, $value) {"$cont.\$\$assignunchecked({$*CTX},$value)"}, :sideffects);
-    add_simple_op('decont', $T_OBJ, [$T_OBJ], sub ($cont) {"nqp.op.decont({$*CTX}, $cont)"});
+    add_simple_op('decont', $T_OBJ, [$T_OBJ], :ctx);
     add_simple_op('iscont', $T_INT, [$T_OBJ]);
 
     add_infix_op('add_n', $T_NUM, '+', $T_NUM, $T_NUM);
@@ -580,8 +580,7 @@ class QAST::OperationsJS {
     add_simple_op('open', $T_OBJ, [$T_STR, $T_STR], :sideffects);
 
     add_simple_op('tellfh', $T_INT, [$T_OBJ], :sideffects);
-    add_simple_op('seekfh', $T_INT, [$T_OBJ, $T_INT, $T_INT],
-        sub ($fh, $offset, $whence) { "nqp.op.seekfh($fh, $offset, $whence, $*CTX)" }, :sideffects);
+    add_simple_op('seekfh', $T_INT, [$T_OBJ, $T_INT, $T_INT], :ctx, :sideffects);
     add_simple_op('eoffh', $T_INT, [$T_OBJ], :sideffects);
     add_simple_op('readlinefh', $T_STR, [$T_OBJ], :sideffects);
     add_simple_op('readlinechompfh', $T_STR, [$T_OBJ], :sideffects);
@@ -775,9 +774,7 @@ class QAST::OperationsJS {
 
     # Ops for NFA
 
-    add_simple_op('nfafromstatelist', $T_OBJ, [$T_OBJ, $T_OBJ], sub ($states, $type) {
-        "nqp.op.nfafromstatelist($states, $type, $*CTX)";
-    }, :sideffects);
+    add_simple_op('nfafromstatelist', $T_OBJ, [$T_OBJ, $T_OBJ], :ctx, :sideffects);
     add_simple_op('nfarunproto', $T_OBJ, [$T_OBJ, $T_STR, $T_INT], :sideffects);
     add_simple_op('nfarunalt', $T_OBJ, [$T_OBJ, $T_STR, $T_INT, $T_OBJ, $T_OBJ, $T_OBJ]);
 
@@ -903,8 +900,7 @@ class QAST::OperationsJS {
 
     add_simple_op('ctxouter', $T_OBJ, [$T_OBJ]);
 
-    add_simple_op('loadbytecode', $T_STR, [$T_STR],
-        sub ($path) { "nqp.op.loadbytecode($*CTX, $path)" }, :sideffects);
+    add_simple_op('loadbytecode', $T_STR, [$T_STR], :ctx, :sideffects);
 
     add_simple_op('elems', $T_INT, [$T_OBJ]);
 

src/vm/js/nqp-runtime/io.js

@@ -221,7 +221,7 @@ op.readallfh = function(fh) {
   return iconv.decode(all, fh.encoding);
 };
 
-op.seekfh = function(fh, offset, whence, ctx) {
+op.seekfh = function(ctx, fh, offset, whence) {
   if (whence == 0 && offset < 0) {
     ctx.die("Can't seek to position: " + offset);
   }

src/vm/js/nqp-runtime/nfa.js

@@ -22,7 +22,7 @@ var EDGE_FATE = 0,
     EDGE_CODEPOINT_I_LL = 15;
 
 // TODO think about type conversions of the stuff inside the array
-op.nfafromstatelist = function(states, type, ctx) {
+op.nfafromstatelist = function(ctx, states, type) {
 
   var nfa = type._STable.REPR.allocate(type._STable);
   nfa.fates = states[0];