suzanne.soy/whalesong
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

More renaming

Browse Source
This commit is contained in:
Danny Yoo 2013-03-27 15:36:56 -06:00
parent 577562944a
commit 3cb43f0eeb
7 changed files with 10 additions and 10 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
whalesong/image/private/kernel.js
View File

@ -4,7 +4,7 @@
//////////////////////////////////////////////////////////////////////
var colorNamespace = MACHINE.modules['whalesong/image/private/color.rkt'].getExternalNamespace();
var colorNamespace = MACHINE.modules['whalesong/image/private/color.rkt'].getExternalExports();
var colorStruct = colorNamespace.get('struct:color');
var makeColor = function(r,g,b,a) { return colorStruct.constructor([r,g,b,a]); };
var isColor = colorStruct.predicate;

2
whalesong/js-assembler/assemble-perform-statement.rkt
View File

@ -214,4 +214,4 @@
(symbol->string (ModuleLocator-name (ModuleProvide-source a-provide)))
(symbol->string (ModuleProvide-internal-name a-provide)))]))
"")
(format "}(M.modules[~s],M.modules[~s].getExports(),M.modules[~s].getExternalNamespace(),M.modules[~s].prefix));" modname modname modname modname))]))
(format "}(M.modules[~s],M.modules[~s].getExports(),M.modules[~s].getExternalExports(),M.modules[~s].prefix));" modname modname modname modname))]))

2
whalesong/js-assembler/package.rkt
View File

@ -218,7 +218,7 @@
if(--M.cbt<0) { throw arguments.callee; }
var modrec = M.modules[~s];
var ns = modrec.getExports();
var extNs = modrec.getExternalNamespace();
var extNs = modrec.getExternalExports();
~a
var exports = {};
modrec.isInvoked = true;

6
whalesong/js-assembler/runtime-src/baselib-modules.js
View File

@ -35,7 +35,7 @@
this.isInvoked = false;
this.prefix = false;
this.exports = new Namespace(this);
this.externalNamespace = new Namespace(this);
this.externalExports = new Namespace(this);
// JavaScript-implemented code will assign privateExports
// with all of the exported identifiers.
@ -60,8 +60,8 @@
};
// Returns access to the names defined with their external names.
ModuleRecord.prototype.getExternalNamespace = function() {
return this.externalNamespace;
ModuleRecord.prototype.getExternalExports = function() {
return this.externalExports;
};
// External invokation of a module.

2
whalesong/resource/js-impl.js
View File

@ -1,4 +1,4 @@
var resourceType = MACHINE.modules['whalesong/resource/structs.rkt'].getExternalNamespace().get('struct:resource');
var resourceType = MACHINE.modules['whalesong/resource/structs.rkt'].getExternalExports().get('struct:resource');
var makePrimitiveProcedure = plt.baselib.functions.makePrimitiveProcedure;

2
whalesong/resource/specialize/js-impl.js
View File

@ -1,4 +1,4 @@
var resourceType = MACHINE.modules['whalesong/resource/structs.rkt'].getExternalNamespace().get('struct:resource');
var resourceType = MACHINE.modules['whalesong/resource/structs.rkt'].getExternalExports().get('struct:resource');
var makeClosure = plt.baselib.functions.makeClosure;
var finalizeClosureCall = plt.baselib.functions.finalizeClosureCall;

4
whalesong/web-world/js-impl.js
View File

@ -34,10 +34,10 @@
var resourceStructType =
MACHINE.modules['whalesong/resource/structs.rkt'].getExternalNamespace().get('struct:resource');
MACHINE.modules['whalesong/resource/structs.rkt'].getExternalExports().get('struct:resource');
var eventStructType =
MACHINE.modules['whalesong/web-world/event.rkt'].getExternalNamespace().get('struct:event');
MACHINE.modules['whalesong/web-world/event.rkt'].getExternalExports().get('struct:event');