[js] Implement nqp::getcodecuid.

Author: pmurias

src/vm/js/QAST/Compiler.nqp

@@ -695,6 +695,8 @@ class QAST::OperationsJS {
     add_simple_op('rmdir', $T_VOID, [$T_STR], :sideffects);
     add_simple_op('mkdir', $T_VOID, [$T_STR, $T_INT], :sideffects);
 
+    add_simple_op('chmod', $T_VOID, [$T_STR, $T_INT], :sideffects);
+
     add_simple_op('getenvhash', $T_OBJ, [], :sideffects);
     add_simple_op('cwd', $T_STR, [], :sideffects);
 
@@ -1512,6 +1514,8 @@ class QAST::OperationsJS {
     add_simple_op('getcodeobj', $T_OBJ, [$T_OBJ]);
     add_simple_op('setcodeobj', $T_OBJ, [$T_OBJ, $T_OBJ], :sideffects);
 
+    add_simple_op('getcodecuid', $T_STR, [$T_OBJ]);
+
     add_simple_op('box_i', $T_OBJ, [$T_INT, $T_OBJ]);
     add_simple_op('unbox_i', $T_INT, [$T_OBJ]);
 

src/vm/js/nqp-runtime/code-ref.js

@@ -38,6 +38,7 @@ CodeRef.prototype.capture = function(block) {
 CodeRef.prototype.closure = function(block) {
   var closure = new CodeRef(this.name, undefined);
   closure.codeObj = this.codeObj;
+  closure.cuid = this.cuid;
   closure.$call = block;
   closure.$call.codeRef = closure;
   return closure;

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

@@ -866,3 +866,7 @@ op.getcodelocation = function(code) {
   hash.content.set('line', new NQPInt(-1));
   return hash;
 };
+
+op.getcodecuid = function(codeRef) {
+  return codeRef.cuid;
+};

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

@@ -420,3 +420,7 @@ op.readlink = function(path) {
 op.gethostname = function() {
   return os.hostname();
 };
+
+op.chmod = function(path, mode) {
+  return fs.chmodSync(path, mode);
+};