|  | @@ -129,7 +129,6 @@ define("amber/boot", [ 'require', './browser-compatibility' ], function (require
 | 
	
		
			
				|  |  |  
 | 
	
		
			
				|  |  |  		this.__init__ = function () {
 | 
	
		
			
				|  |  |  			st.addPackage("Kernel-Objects");
 | 
	
		
			
				|  |  | -			st.addPackage("Kernel-Infrastructure");
 | 
	
		
			
				|  |  |  			st.wrapClassName("ProtoObject", "Kernel-Objects", SmalltalkProtoObject, undefined, false);
 | 
	
		
			
				|  |  |  			st.wrapClassName("Object", "Kernel-Objects", SmalltalkObject, globals.ProtoObject, 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);
 | 
	
		
			
				|  |  |  
 | 
	
		
			
				|  |  |  		this.__init__ = function () {
 | 
	
		
			
				|  |  | +			st.addPackage("Kernel-Infrastructure");
 | 
	
		
			
				|  |  |  			st.wrapClassName("Organizer", "Kernel-Infrastructure", SmalltalkOrganizer, globals.Object, false);
 | 
	
		
			
				|  |  |  			st.wrapClassName("PackageOrganizer", "Kernel-Infrastructure", SmalltalkPackageOrganizer, 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) {
 | 
	
		
			
				|  |  |  			if(klass.wrapped) {
 | 
	
		
			
				|  |  |  				copySuperclass(klass);
 | 
	
		
			
				|  |  | -			}
 | 
	
		
			
				|  |  | -
 | 
	
		
			
				|  |  | -			if(klass.wrapped) {
 | 
	
		
			
				|  |  |  				dnu.installHandlers(klass);
 | 
	
		
			
				|  |  |  			}
 | 
	
		
			
				|  |  |  		};
 | 
	
	
		
			
				|  | @@ -313,7 +310,7 @@ define("amber/boot", [ 'require', './browser-compatibility' ], function (require
 | 
	
		
			
				|  |  |  
 | 
	
		
			
				|  |  |  		var org = brikz.ensure("organize");
 | 
	
		
			
				|  |  |  		var root = brikz.ensure("root");
 | 
	
		
			
				|  |  | -        brikz.ensure("classInit");
 | 
	
		
			
				|  |  | +		brikz.ensure("classInit");
 | 
	
		
			
				|  |  |  		var nil = root.nil;
 | 
	
		
			
				|  |  |  		var rootAsClass = root.rootAsClass;
 | 
	
		
			
				|  |  |  		var SmalltalkObject = root.Object;
 | 
	
	
		
			
				|  | @@ -341,6 +338,7 @@ define("amber/boot", [ 'require', './browser-compatibility' ], function (require
 | 
	
		
			
				|  |  |  			globals.ProtoObject.klass.superclass = rootAsClass.klass = globals.Class;
 | 
	
		
			
				|  |  |  			addSubclass(globals.ProtoObject.klass);
 | 
	
		
			
				|  |  |  
 | 
	
		
			
				|  |  | +			st.addPackage("Kernel-Infrastructure");
 | 
	
		
			
				|  |  |  			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;
 | 
	
		
			
				|  |  |  		};
 | 
	
		
			
				|  |  |  
 | 
	
		
			
				|  |  | +		function wireKlass(klass) {
 | 
	
		
			
				|  |  | +			Object.defineProperty(klass.fn.prototype, "klass", {
 | 
	
		
			
				|  |  | +				value: klass,
 | 
	
		
			
				|  |  | +				enumerable: false, configurable: true, writable: true
 | 
	
		
			
				|  |  | +			});
 | 
	
		
			
				|  |  | +		}
 | 
	
		
			
				|  |  | +
 | 
	
		
			
				|  |  |  		function setupClass(klass, spec) {
 | 
	
		
			
				|  |  |  			spec = spec || {};
 | 
	
		
			
				|  |  |  			klass.iVarNames = spec.iVarNames || [];
 | 
	
	
		
			
				|  | @@ -415,10 +420,7 @@ define("amber/boot", [ 'require', './browser-compatibility' ], function (require
 | 
	
		
			
				|  |  |  				value: Object.create(null),
 | 
	
		
			
				|  |  |  				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.
 | 
	
	
		
			
				|  | @@ -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. */
 | 
	
		
			
				|  |  |  
 | 
	
		
			
				|  |  |  		st.addClass = function(className, superclass, iVarNames, pkgName) {
 | 
	
		
			
				|  |  | -			if (superclass == nil) { superclass = null; }
 | 
	
		
			
				|  |  | -
 | 
	
		
			
				|  |  |  			// While subclassing nil is allowed, it might be an error, so
 | 
	
		
			
				|  |  |  			// 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);
 | 
	
		
			
				|  |  |  		};
 | 
	
	
		
			
				|  | @@ -461,6 +461,7 @@ define("amber/boot", [ 'require', './browser-compatibility' ], function (require
 | 
	
		
			
				|  |  |  				throw new Error("Missing package "+pkgName);
 | 
	
		
			
				|  |  |  			}
 | 
	
		
			
				|  |  |  
 | 
	
		
			
				|  |  | +			if (!superclass || superclass == nil) { superclass = null; }
 | 
	
		
			
				|  |  |  			if(globals[className] && globals[className].superclass == superclass) {
 | 
	
		
			
				|  |  |  				//            globals[className].superclass = superclass;
 | 
	
		
			
				|  |  |  				globals[className].iVarNames = iVarNames || [];
 | 
	
	
		
			
				|  | @@ -528,10 +529,7 @@ define("amber/boot", [ 'require', './browser-compatibility' ], function (require
 | 
	
		
			
				|  |  |  			klass.fn = constructor;
 | 
	
		
			
				|  |  |  
 | 
	
		
			
				|  |  |  			// 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);
 | 
	
		
			
				|  |  |  		};
 | 
	
	
		
			
				|  | @@ -775,13 +773,10 @@ define("amber/boot", [ 'require', './browser-compatibility' ], function (require
 | 
	
		
			
				|  |  |  
 | 
	
		
			
				|  |  |  		/* Converts a JavaScript object to valid Smalltalk Object */
 | 
	
		
			
				|  |  |  		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) {
 | 
	
		
			
				|  |  |  				if(readObject) {
 | 
	
		
			
				|  |  |  					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) {
 | 
	
		
			
				|  |  |  			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);
 | 
	
		
			
				|  |  |  		}
 | 
	
	
		
			
				|  | @@ -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 */
 |