about to change toplevel reference and setting again

js-assembler/assemble-perform-statement.rkt

@@ -53,10 +53,15 @@
                                                            (symbol->string
                                                             (kernel-module-variable->primitive-name n)))]
                                                   [else
-                                                   (format "{moduleName:~s,name:~s}"
-                                                           (symbol->string
+                                                   (define module-name
+                                                     (symbol->string
                                                             (ModuleLocator-name
-                                                             (ModuleVariable-module-name n)))
+                                                             (ModuleVariable-module-name n))))
+                                                   (format "{moduleName:~s,name:~s,prefix:M.modules[~s].prefix,offset:M.modules[~s].getPrefixOffset(~s)}"
+                                                           module-name
+                                                           (symbol->string (ModuleVariable-name n))
+                                                           module-name
+                                                           module-name
                                                            (symbol->string (ModuleVariable-name n)))])]))
                                  names)
                                 ",")

js-assembler/runtime-src/baselib-modules.js

@@ -71,6 +71,17 @@
         this.privateExports = {};
     };
 
+    // Returns the offset into the prefix in which the value will be stored.
+    ModuleRecord.prototype.getPrefixOffset = function(externalName) {
+        var i;
+        for (i = 0; i < this.prefix.names; i++) {
+            if (this.prefix.names[i] === externalName) {
+                return i;
+            }
+        }
+        return void(0);
+    };
+
     // Returns access to the names defined in the module.
     ModuleRecord.prototype.getNamespace = function () {
         return this.namespace;

version.rkt

@@ -7,4 +7,4 @@
 (provide version)
 (: version String)
 
-(define version "1.185")
+(define version "1.186")