|
@@ -129,7 +129,6 @@ define("amber/boot", [ 'require', './browser-compatibility' ], function (require
|
|
|
|
|
|
this.__init__ = function () {
|
|
this.__init__ = function () {
|
|
st.addPackage("Kernel-Objects");
|
|
st.addPackage("Kernel-Objects");
|
|
- st.addPackage("Kernel-Infrastructure");
|
|
|
|
st.wrapClassName("ProtoObject", "Kernel-Objects", SmalltalkProtoObject, undefined, false);
|
|
st.wrapClassName("ProtoObject", "Kernel-Objects", SmalltalkProtoObject, undefined, false);
|
|
st.wrapClassName("Object", "Kernel-Objects", SmalltalkObject, globals.ProtoObject, false);
|
|
st.wrapClassName("Object", "Kernel-Objects", SmalltalkObject, globals.ProtoObject, false);
|
|
st.wrapClassName("UndefinedObject", "Kernel-Objects", SmalltalkNil, globals.Object, false);
|
|
st.wrapClassName("UndefinedObject", "Kernel-Objects", SmalltalkNil, globals.Object, false);
|
|
@@ -154,6 +153,7 @@ define("amber/boot", [ 'require', './browser-compatibility' ], function (require
|
|
inherits(SmalltalkClassOrganizer, SmalltalkOrganizer);
|
|
inherits(SmalltalkClassOrganizer, SmalltalkOrganizer);
|
|
|
|
|
|
this.__init__ = function () {
|
|
this.__init__ = function () {
|
|
|
|
+ st.addPackage("Kernel-Infrastructure");
|
|
st.wrapClassName("Organizer", "Kernel-Infrastructure", SmalltalkOrganizer, globals.Object, false);
|
|
st.wrapClassName("Organizer", "Kernel-Infrastructure", SmalltalkOrganizer, globals.Object, false);
|
|
st.wrapClassName("PackageOrganizer", "Kernel-Infrastructure", SmalltalkPackageOrganizer, globals.Organizer, false);
|
|
st.wrapClassName("PackageOrganizer", "Kernel-Infrastructure", SmalltalkPackageOrganizer, globals.Organizer, false);
|
|
st.wrapClassName("ClassOrganizer", "Kernel-Infrastructure", SmalltalkClassOrganizer, globals.Organizer, false);
|
|
st.wrapClassName("ClassOrganizer", "Kernel-Infrastructure", SmalltalkClassOrganizer, globals.Organizer, false);
|
|
@@ -241,9 +241,6 @@ define("amber/boot", [ 'require', './browser-compatibility' ], function (require
|
|
st.initClass = function(klass) {
|
|
st.initClass = function(klass) {
|
|
if(klass.wrapped) {
|
|
if(klass.wrapped) {
|
|
copySuperclass(klass);
|
|
copySuperclass(klass);
|
|
- }
|
|
|
|
-
|
|
|
|
- if(klass.wrapped) {
|
|
|
|
dnu.installHandlers(klass);
|
|
dnu.installHandlers(klass);
|
|
}
|
|
}
|
|
};
|
|
};
|
|
@@ -313,7 +310,7 @@ define("amber/boot", [ 'require', './browser-compatibility' ], function (require
|
|
|
|
|
|
var org = brikz.ensure("organize");
|
|
var org = brikz.ensure("organize");
|
|
var root = brikz.ensure("root");
|
|
var root = brikz.ensure("root");
|
|
- brikz.ensure("classInit");
|
|
|
|
|
|
+ brikz.ensure("classInit");
|
|
var nil = root.nil;
|
|
var nil = root.nil;
|
|
var rootAsClass = root.rootAsClass;
|
|
var rootAsClass = root.rootAsClass;
|
|
var SmalltalkObject = root.Object;
|
|
var SmalltalkObject = root.Object;
|
|
@@ -341,6 +338,7 @@ define("amber/boot", [ 'require', './browser-compatibility' ], function (require
|
|
globals.ProtoObject.klass.superclass = rootAsClass.klass = globals.Class;
|
|
globals.ProtoObject.klass.superclass = rootAsClass.klass = globals.Class;
|
|
addSubclass(globals.ProtoObject.klass);
|
|
addSubclass(globals.ProtoObject.klass);
|
|
|
|
|
|
|
|
+ st.addPackage("Kernel-Infrastructure");
|
|
st.wrapClassName("Package", "Kernel-Infrastructure", SmalltalkPackage, globals.Object, false);
|
|
st.wrapClassName("Package", "Kernel-Infrastructure", SmalltalkPackage, globals.Object, false);
|
|
};
|
|
};
|
|
|
|
|
|
@@ -405,6 +403,13 @@ define("amber/boot", [ 'require', './browser-compatibility' ], function (require
|
|
return 'Smalltalk ' + this.className;
|
|
return 'Smalltalk ' + this.className;
|
|
};
|
|
};
|
|
|
|
|
|
|
|
+ function wireKlass(klass) {
|
|
|
|
+ Object.defineProperty(klass.fn.prototype, "klass", {
|
|
|
|
+ value: klass,
|
|
|
|
+ enumerable: false, configurable: true, writable: true
|
|
|
|
+ });
|
|
|
|
+ }
|
|
|
|
+
|
|
function setupClass(klass, spec) {
|
|
function setupClass(klass, spec) {
|
|
spec = spec || {};
|
|
spec = spec || {};
|
|
klass.iVarNames = spec.iVarNames || [];
|
|
klass.iVarNames = spec.iVarNames || [];
|
|
@@ -415,10 +420,7 @@ define("amber/boot", [ 'require', './browser-compatibility' ], function (require
|
|
value: Object.create(null),
|
|
value: Object.create(null),
|
|
enumerable: false, configurable: true, writable: true
|
|
enumerable: false, configurable: true, writable: true
|
|
});
|
|
});
|
|
- Object.defineProperty(klass.fn.prototype, "klass", {
|
|
|
|
- value: klass,
|
|
|
|
- enumerable: false, configurable: true, writable: true
|
|
|
|
- });
|
|
|
|
|
|
+ wireKlass(klass);
|
|
}
|
|
}
|
|
|
|
|
|
/* Add a package to the smalltalk.packages object, creating a new one if needed.
|
|
/* Add a package to the smalltalk.packages object, creating a new one if needed.
|
|
@@ -444,12 +446,10 @@ define("amber/boot", [ 'require', './browser-compatibility' ], function (require
|
|
A Package is lazily created if it does not exist with given name. */
|
|
A Package is lazily created if it does not exist with given name. */
|
|
|
|
|
|
st.addClass = function(className, superclass, iVarNames, pkgName) {
|
|
st.addClass = function(className, superclass, iVarNames, pkgName) {
|
|
- if (superclass == nil) { superclass = null; }
|
|
|
|
-
|
|
|
|
// While subclassing nil is allowed, it might be an error, so
|
|
// While subclassing nil is allowed, it might be an error, so
|
|
// warn about it.
|
|
// warn about it.
|
|
- if (superclass === null) {
|
|
|
|
- console.warn('Compiling ' + className + ' as a subclass of `nil`. A dependency might be missing.');
|
|
|
|
|
|
+ if (!superclass || superclass == nil) {
|
|
|
|
+ console.warn('Creating ' + className + ' as a subclass of `nil`. A dependency might be missing.');
|
|
}
|
|
}
|
|
rawAddClass(pkgName, className, superclass, iVarNames, false, null);
|
|
rawAddClass(pkgName, className, superclass, iVarNames, false, null);
|
|
};
|
|
};
|
|
@@ -461,6 +461,7 @@ define("amber/boot", [ 'require', './browser-compatibility' ], function (require
|
|
throw new Error("Missing package "+pkgName);
|
|
throw new Error("Missing package "+pkgName);
|
|
}
|
|
}
|
|
|
|
|
|
|
|
+ if (!superclass || superclass == nil) { superclass = null; }
|
|
if(globals[className] && globals[className].superclass == superclass) {
|
|
if(globals[className] && globals[className].superclass == superclass) {
|
|
// globals[className].superclass = superclass;
|
|
// globals[className].superclass = superclass;
|
|
globals[className].iVarNames = iVarNames || [];
|
|
globals[className].iVarNames = iVarNames || [];
|
|
@@ -528,10 +529,7 @@ define("amber/boot", [ 'require', './browser-compatibility' ], function (require
|
|
klass.fn = constructor;
|
|
klass.fn = constructor;
|
|
|
|
|
|
// The fn property changed. We need to add back the klass property to the prototype
|
|
// The fn property changed. We need to add back the klass property to the prototype
|
|
- Object.defineProperty(klass.fn.prototype, "klass", {
|
|
|
|
- value: klass,
|
|
|
|
- enumerable: false, configurable: true, writable: true
|
|
|
|
- });
|
|
|
|
|
|
+ wireKlass(klass);
|
|
|
|
|
|
st.initClass(klass);
|
|
st.initClass(klass);
|
|
};
|
|
};
|
|
@@ -775,13 +773,10 @@ define("amber/boot", [ 'require', './browser-compatibility' ], function (require
|
|
|
|
|
|
/* Converts a JavaScript object to valid Smalltalk Object */
|
|
/* Converts a JavaScript object to valid Smalltalk Object */
|
|
st.readJSObject = function(js) {
|
|
st.readJSObject = function(js) {
|
|
- var object = js;
|
|
|
|
- var readObject = (js.constructor === Object);
|
|
|
|
- var readArray = (js.constructor === Array);
|
|
|
|
|
|
+ var readObject = js.constructor === Object;
|
|
|
|
+ var readArray = js.constructor === Array;
|
|
|
|
+ var object = readObject ? globals.Dictionary._new() : readArray ? [] : js;
|
|
|
|
|
|
- if(readObject) {
|
|
|
|
- object = globals.Dictionary._new();
|
|
|
|
- }
|
|
|
|
for(var i in js) {
|
|
for(var i in js) {
|
|
if(readObject) {
|
|
if(readObject) {
|
|
object._at_put_(i, st.readJSObject(js[i]));
|
|
object._at_put_(i, st.readJSObject(js[i]));
|
|
@@ -1038,17 +1033,17 @@ define("amber/boot", [ 'require', './browser-compatibility' ], function (require
|
|
|
|
|
|
function callJavaScriptMethod(receiver, selector, args) {
|
|
function callJavaScriptMethod(receiver, selector, args) {
|
|
var jsSelector = selector._asJavaScriptSelector();
|
|
var jsSelector = selector._asJavaScriptSelector();
|
|
- if (jsSelector in receiver) {
|
|
|
|
- var jsProperty = receiver[jsSelector];
|
|
|
|
- if (typeof jsProperty === "function" && !/^[A-Z]/.test(jsSelector)) {
|
|
|
|
- return jsProperty.apply(receiver, args);
|
|
|
|
- } else if (args.length > 0) {
|
|
|
|
- receiver[jsSelector] = args[0];
|
|
|
|
- return nil;
|
|
|
|
- } else {
|
|
|
|
- return jsProperty;
|
|
|
|
- }
|
|
|
|
- }
|
|
|
|
|
|
+ if (jsSelector in receiver) {
|
|
|
|
+ var jsProperty = receiver[jsSelector];
|
|
|
|
+ if (typeof jsProperty === "function" && !/^[A-Z]/.test(jsSelector)) {
|
|
|
|
+ return jsProperty.apply(receiver, args);
|
|
|
|
+ } else if (args.length > 0) {
|
|
|
|
+ receiver[jsSelector] = args[0];
|
|
|
|
+ return nil;
|
|
|
|
+ } else {
|
|
|
|
+ return jsProperty;
|
|
|
|
+ }
|
|
|
|
+ }
|
|
|
|
|
|
return st.send(globals.JSObjectProxy._on_(receiver), selector, args);
|
|
return st.send(globals.JSObjectProxy._on_(receiver), selector, args);
|
|
}
|
|
}
|
|
@@ -1122,27 +1117,27 @@ define("amber/boot", [ 'require', './browser-compatibility' ], function (require
|
|
};
|
|
};
|
|
}
|
|
}
|
|
|
|
|
|
- /* Defines asReceiver to be present at load time */
|
|
|
|
- /* (logically it belongs more to PrimitiveBrik) */
|
|
|
|
- function AsReceiverBrik(brikz, st) {
|
|
|
|
-
|
|
|
|
- var nil = brikz.ensure("root").nil;
|
|
|
|
-
|
|
|
|
- /**
|
|
|
|
- * This function is used all over the compiled amber code.
|
|
|
|
- * It takes any value (JavaScript or Smalltalk)
|
|
|
|
- * and returns a proper Amber Smalltalk receiver.
|
|
|
|
- *
|
|
|
|
- * null or undefined -> nil,
|
|
|
|
- * plain JS object -> wrapped JS object,
|
|
|
|
- * otherwise unchanged
|
|
|
|
- */
|
|
|
|
- this.asReceiver = function (o) {
|
|
|
|
- if (o == null) { return nil; }
|
|
|
|
- if (o.klass) { return o; }
|
|
|
|
- return globals.JSObjectProxy._on_(o);
|
|
|
|
- };
|
|
|
|
- }
|
|
|
|
|
|
+ /* Defines asReceiver to be present at load time */
|
|
|
|
+ /* (logically it belongs more to PrimitiveBrik) */
|
|
|
|
+ function AsReceiverBrik(brikz, st) {
|
|
|
|
+
|
|
|
|
+ var nil = brikz.ensure("root").nil;
|
|
|
|
+
|
|
|
|
+ /**
|
|
|
|
+ * This function is used all over the compiled amber code.
|
|
|
|
+ * It takes any value (JavaScript or Smalltalk)
|
|
|
|
+ * and returns a proper Amber Smalltalk receiver.
|
|
|
|
+ *
|
|
|
|
+ * null or undefined -> nil,
|
|
|
|
+ * plain JS object -> wrapped JS object,
|
|
|
|
+ * otherwise unchanged
|
|
|
|
+ */
|
|
|
|
+ this.asReceiver = function (o) {
|
|
|
|
+ if (o == null) { return nil; }
|
|
|
|
+ if (o.klass) { return o; }
|
|
|
|
+ return globals.JSObjectProxy._on_(o);
|
|
|
|
+ };
|
|
|
|
+ }
|
|
|
|
|
|
|
|
|
|
/* Making smalltalk that can load */
|
|
/* Making smalltalk that can load */
|