Pass test 73.

Implement associative_delegate.

Author: pmurias

src/vm/js/bin/run_tests

@@ -1,3 +1,3 @@
 #!/bin/bash
 # 19 and 30 where moved out as they were parrot specific, 52,54 is missing, we can't pass 49 till we are bootstraped
-prove "$@" -e  './nqp-js' t/nqp/{01,02,03,04,05,06,07,08,09,10,11,12,13,14,15,16,17,18,20,21,22,23,25,26,27,28,33,35,36,37,38,39,40,41,42,46,47,48,51,53,55,56,57,58,59,63,64,65,68,69,70,71,75,76,78,79,81,83,88,89,90,91,92,93,94,95}* t/js/getcomp-js.t t/qast/02*
+prove "$@" -e  './nqp-js' t/nqp/{01,02,03,04,05,06,07,08,09,10,11,12,13,14,15,16,17,18,20,21,22,23,25,26,27,28,33,35,36,37,38,39,40,41,42,46,47,48,51,53,55,56,57,58,59,63,64,65,68,69,70,71,73,75,76,78,79,81,83,88,89,90,91,92,93,94,95}* t/js/getcomp-js.t t/qast/02*

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

@@ -116,8 +116,10 @@ P6opaque.prototype.deserialize_repr_data = function(cursor, STable) {
   if (this.positional_delegate_slot != -1) {
     STable.setPositionalDelegate(slots[this.positional_delegate_slot]);
   }
+  if (this.associative_delegate_slot != -1) {
+    STable.setAssociativeDelegate(slots[this.associative_delegate_slot]);
+  }
 
-  /* TODO make possitional and associative delegates work */
   /* TODO make auto viv values work */
 };
 

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

@@ -85,7 +85,16 @@ STable.prototype.setPositionalDelegate = function(attr) {
     this.obj_constructor.prototype.$$atpos = function(index) {
         return this[attr][index];
     };
+};
 
+// TODO handle attrs properly
+STable.prototype.setAssociativeDelegate = function(attr) {
+    this.obj_constructor.prototype.$$bindkey = function(key, value) {
+        return this[attr].$$bindkey(key, value);
+    };
+    this.obj_constructor.prototype.$$atkey = function(key) {
+        return this[attr].$$atkey(key);
+    };
 };
 
 module.exports.STable = STable;