| 123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129 | /* ==================================================================== | |   Amber Smalltalk |   http://amber-lang.net | ====================================================================== ====================================================================== | | Copyright (c) 2010-2014 | Nicolas Petton <petton.nicolas@gmail.com> | | Copyright (c) 2012-2017 | The Amber team https://lolg.it/org/amber/members | Amber contributors (see /CONTRIBUTORS) | | Amber is released under the MIT license | | Permission is hereby granted, free of charge, to any person obtaining | a copy of this software and associated documentation files (the | 'Software'), to deal in the Software without restriction, including | without limitation the rights to use, copy, modify, merge, publish, | distribute, sublicense, and/or sell copies of the Software, and to | permit persons to whom the Software is furnished to do so, subject to | the following conditions: | | The above copyright notice and this permission notice shall be | included in all copies or substantial portions of the Software. | | THE SOFTWARE IS PROVIDED 'AS IS', WITHOUT WARRANTY OF ANY KIND, | EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF | MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. | IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY | CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, | TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE | SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE. | ==================================================================== *///jshint eqnull:truedefine([    'require', './kernel-checks', './brikz', './kernel-fundamentals', './kernel-language'], function (require, _, Brikz, configureWithFundamentals, configureWithHierarchy) {    "use strict";    require(['./kernel-runtime']); // preload    function SmalltalkInitBrik (brikz, st) {        var initialized = false;        var runtimeLoadedPromise = new Promise(function (resolve, reject) {            require(['./kernel-runtime'], resolve, reject);        });        /* Smalltalk initialization. Called on page load */        st.initialize = function () {            return runtimeLoadedPromise.then(function (configureWithRuntime) {                if (initialized) return;                brikz.classes.bootstrapHierarchy();                configureWithRuntime(brikz);                // TODO deprecation helper; remove                Object.defineProperty(st, "packages", {                    get: function () {                        console.warn("Use of .packages deprecated, use .packageDescriptors");                        return st.packageDescriptors;                    },                    set: function (v) {                        console.trace();                        throw new Error("No one should be setting st.packages directly on initialized Amber.");                    }                });                brikz.startImage.run();                initialized = true;            });        };    }    /* Adds AMD and requirejs related methods to the api */    function AMDBrik (brikz, st) {        st.amdRequire = require;        st.defaultTransportType = st.defaultTransportType || "amd";        st.defaultAmdNamespace = st.defaultAmdNamespace || "amber_core";    }    /* Defines asReceiver to be present at load time */    /* (logically it belongs more to PrimitiveBrik) */    AsReceiverBrik.deps = ["nil"];    function AsReceiverBrik (brikz, st) {        var nilAsReceiver = brikz.nil.nilAsReceiver;        /**         * 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 -> nilAsReceiver,         * object having Smalltalk signature -> unchanged,         * otherwise wrapped foreign (JS) object         */        this.asReceiver = function (o) {            if (o == null) return nilAsReceiver;            else if (o.a$cls != null) return o;            else return st.wrapJavaScript(o);        };    }    var api = {};    var brikz = new Brikz(api);    configureWithFundamentals(brikz);    configureWithHierarchy(brikz);    brikz.asReceiver = AsReceiverBrik;    brikz.stInit = SmalltalkInitBrik;    brikz.amd = AMDBrik;    brikz.rebuild();    return {        api: api,        nilAsReceiver: brikz.nil.nilAsReceiver,        nilAsValue: brikz.nil.nilAsValue,        nilAsClass: brikz.classes.nilAsClass,        globals: brikz.smalltalkGlobals.globals,        asReceiver: brikz.asReceiver.asReceiver    };});
 |