greybel-interpreter 0.7.2 → 1.0.0

package/dist/types/list.js

@@ -0,0 +1,227 @@
+"use strict";
+var __extends = (this && this.__extends) || (function () {
+    var extendStatics = function (d, b) {
+        extendStatics = Object.setPrototypeOf ||
+            ({ __proto__: [] } instanceof Array && function (d, b) { d.__proto__ = b; }) ||
+            function (d, b) { for (var p in b) if (Object.prototype.hasOwnProperty.call(b, p)) d[p] = b[p]; };
+        return extendStatics(d, b);
+    };
+    return function (d, b) {
+        if (typeof b !== "function" && b !== null)
+            throw new TypeError("Class extends value " + String(b) + " is not a constructor or null");
+        extendStatics(d, b);
+        function __() { this.constructor = d; }
+        d.prototype = b === null ? Object.create(b) : (__.prototype = b.prototype, new __());
+    };
+})();
+var __read = (this && this.__read) || function (o, n) {
+    var m = typeof Symbol === "function" && o[Symbol.iterator];
+    if (!m) return o;
+    var i = m.call(o), r, ar = [], e;
+    try {
+        while ((n === void 0 || n-- > 0) && !(r = i.next()).done) ar.push(r.value);
+    }
+    catch (error) { e = { error: error }; }
+    finally {
+        try {
+            if (r && !r.done && (m = i["return"])) m.call(i);
+        }
+        finally { if (e) throw e.error; }
+    }
+    return ar;
+};
+var __spreadArray = (this && this.__spreadArray) || function (to, from, pack) {
+    if (pack || arguments.length === 2) for (var i = 0, l = from.length, ar; i < l; i++) {
+        if (ar || !(i in from)) {
+            if (!ar) ar = Array.prototype.slice.call(from, 0, i);
+            ar[i] = from[i];
+        }
+    }
+    return to.concat(ar || Array.prototype.slice.call(from));
+};
+var __importDefault = (this && this.__importDefault) || function (mod) {
+    return (mod && mod.__esModule) ? mod : { "default": mod };
+};
+Object.defineProperty(exports, "__esModule", { value: true });
+exports.CustomListIterator = void 0;
+var intrinsics_container_1 = __importDefault(require("../intrinsics-container"));
+var path_1 = __importDefault(require("../utils/path"));
+var generics_1 = require("./generics");
+var CustomListIterator = /** @class */ (function () {
+    function CustomListIterator(value) {
+        var me = this;
+        me.value = value;
+        me.index = 0;
+    }
+    CustomListIterator.prototype.next = function () {
+        var me = this;
+        if (me.index === me.value.length) {
+            return {
+                value: null,
+                done: true
+            };
+        }
+        return {
+            value: me.value[me.index++],
+            done: false
+        };
+    };
+    return CustomListIterator;
+}());
+exports.CustomListIterator = CustomListIterator;
+var CustomList = /** @class */ (function (_super) {
+    __extends(CustomList, _super);
+    function CustomList(value) {
+        if (value === void 0) { value = []; }
+        var _this = _super.call(this) || this;
+        _this.value = __spreadArray([], __read(value), false);
+        return _this;
+    }
+    CustomList.getItemIndex = function (item, index) {
+        var n = index | 0;
+        if (n < 0)
+            n += item.value.length;
+        if (n < 0 || n >= item.value.length)
+            return -1;
+        return n;
+    };
+    CustomList.getIntrinsics = function () {
+        return this.intrinsics;
+    };
+    CustomList.addIntrinsic = function (name, fn) {
+        this.intrinsics.add(name, fn);
+    };
+    CustomList.prototype.getCustomType = function () {
+        return 'list';
+    };
+    CustomList.prototype.toString = function () {
+        return "[ ".concat(this.value.join(', '), " ]");
+    };
+    CustomList.prototype.fork = function () {
+        return new CustomList(this.value);
+    };
+    CustomList.prototype.toNumber = function () {
+        return 0;
+    };
+    CustomList.prototype.toInt = function () {
+        return 0;
+    };
+    CustomList.prototype.toTruthy = function () {
+        return this.value.length > 0;
+    };
+    CustomList.prototype.slice = function (a, b) {
+        return new CustomList(this.value.slice(a.toNumber(), b.toNumber()));
+    };
+    CustomList.prototype.extend = function (list) {
+        if (list instanceof CustomList) {
+            list = list.value;
+        }
+        for (var index = 0; index < list.length; index++) {
+            this.value.push(list[index]);
+        }
+        return this;
+    };
+    CustomList.prototype[Symbol.iterator] = function () {
+        return new CustomListIterator(this.value);
+    };
+    CustomList.prototype.getItemIndex = function (index) {
+        return CustomList.getItemIndex(this, index);
+    };
+    CustomList.prototype.has = function (path) {
+        if (typeof path === 'string') {
+            return this.has(new path_1.default([path]));
+        }
+        var traversalPath = path.clone();
+        var current = traversalPath.next();
+        if (current !== null) {
+            var currentIndex = parseInt(current);
+            var isCurrentNumber = !Number.isNaN(currentIndex);
+            if (isCurrentNumber) {
+                currentIndex = this.getItemIndex(currentIndex);
+            }
+            if (isCurrentNumber) {
+                var sub = this.value[currentIndex];
+                if (traversalPath.count() > 0 &&
+                    sub instanceof generics_1.CustomValueWithIntrinsics) {
+                    return sub.has(traversalPath);
+                }
+                return traversalPath.count() === 0;
+            }
+        }
+        return false;
+    };
+    CustomList.prototype.set = function (path, newValue) {
+        if (typeof path === 'string') {
+            return this.set(new path_1.default([path]), newValue);
+        }
+        var traversalPath = path.clone();
+        var last = traversalPath.last();
+        var current = traversalPath.next();
+        if (current !== null) {
+            var currentIndex = parseInt(current);
+            var isCurrentNumber = !Number.isNaN(currentIndex);
+            if (isCurrentNumber) {
+                currentIndex = this.getItemIndex(currentIndex);
+            }
+            if (isCurrentNumber &&
+                currentIndex >= 0 &&
+                currentIndex < this.value.length) {
+                var sub = this.value[currentIndex];
+                if (traversalPath.count() > 0 &&
+                    sub instanceof generics_1.CustomValueWithIntrinsics) {
+                    sub.set(traversalPath, newValue);
+                    return;
+                }
+            }
+            throw new Error("Cannot set path ".concat(path.toString(), "."));
+        }
+        var lastIndex = parseInt(last);
+        var isLastNumber = !Number.isNaN(lastIndex);
+        if (isLastNumber) {
+            lastIndex = this.getItemIndex(lastIndex);
+        }
+        if (isLastNumber && lastIndex >= 0 && lastIndex < this.value.length) {
+            this.value[lastIndex] = newValue;
+            return;
+        }
+        throw new Error("Index error (list index ".concat(lastIndex, " out of range)."));
+    };
+    CustomList.prototype.get = function (path) {
+        if (typeof path === 'string') {
+            return this.get(new path_1.default([path]));
+        }
+        var traversalPath = path.clone();
+        var current = traversalPath.next();
+        if (current !== null) {
+            var currentIndex = parseInt(current);
+            var isCurrentNumber = !Number.isNaN(currentIndex);
+            if (isCurrentNumber) {
+                currentIndex = this.getItemIndex(currentIndex);
+            }
+            if (isCurrentNumber &&
+                currentIndex >= 0 &&
+                currentIndex < this.value.length) {
+                var sub = this.value[currentIndex];
+                if (traversalPath.count() > 0) {
+                    if (sub instanceof generics_1.CustomValueWithIntrinsics) {
+                        return sub.get(traversalPath);
+                    }
+                }
+                else if (traversalPath.count() === 0) {
+                    return sub;
+                }
+            }
+            else if (path.count() === 1 &&
+                CustomList.getIntrinsics().has(current)) {
+                return CustomList.getIntrinsics().get(current);
+            }
+            if (isCurrentNumber) {
+                throw new Error("Index error (list index ".concat(currentIndex, " out of range)."));
+            }
+        }
+        throw new Error("Unknown path in list ".concat(path.toString(), "."));
+    };
+    CustomList.intrinsics = new intrinsics_container_1.default();
+    return CustomList;
+}(generics_1.CustomObject));
+exports.default = CustomList;

package/dist/types/map.d.ts

@@ -0,0 +1,30 @@
+import IntrinsicsContainer from '../intrinsics-container';
+import Path from '../utils/path';
+import CustomFunction from './function';
+import { CustomObject, CustomValue } from './generics';
+export declare class CustomMapIterator implements Iterator<CustomValue> {
+    value: Map<string, CustomValue>;
+    index: number;
+    constructor(value: Map<string, CustomValue>);
+    next(): IteratorResult<CustomMap>;
+}
+export default class CustomMap extends CustomObject {
+    private static intrinsics;
+    static getIntrinsics(): IntrinsicsContainer;
+    static addIntrinsic(name: string, fn: CustomFunction): void;
+    readonly value: Map<string, CustomValue>;
+    private isInstance;
+    constructor(value?: Map<string, CustomValue>);
+    getCustomType(): string;
+    toString(): string;
+    fork(): CustomMap;
+    toNumber(): number;
+    toInt(): number;
+    toTruthy(): boolean;
+    [Symbol.iterator](): CustomMapIterator;
+    extend(map: CustomMap | Map<string, CustomValue>): CustomMap;
+    has(path: Path<string> | string): boolean;
+    set(path: Path<string> | string, newValue: CustomValue): void;
+    get(path: Path<string> | string): CustomValue;
+    createInstance(): CustomMap;
+}

package/dist/types/map.js

@@ -0,0 +1,224 @@
+"use strict";
+var __extends = (this && this.__extends) || (function () {
+    var extendStatics = function (d, b) {
+        extendStatics = Object.setPrototypeOf ||
+            ({ __proto__: [] } instanceof Array && function (d, b) { d.__proto__ = b; }) ||
+            function (d, b) { for (var p in b) if (Object.prototype.hasOwnProperty.call(b, p)) d[p] = b[p]; };
+        return extendStatics(d, b);
+    };
+    return function (d, b) {
+        if (typeof b !== "function" && b !== null)
+            throw new TypeError("Class extends value " + String(b) + " is not a constructor or null");
+        extendStatics(d, b);
+        function __() { this.constructor = d; }
+        d.prototype = b === null ? Object.create(b) : (__.prototype = b.prototype, new __());
+    };
+})();
+var __values = (this && this.__values) || function(o) {
+    var s = typeof Symbol === "function" && Symbol.iterator, m = s && o[s], i = 0;
+    if (m) return m.call(o);
+    if (o && typeof o.length === "number") return {
+        next: function () {
+            if (o && i >= o.length) o = void 0;
+            return { value: o && o[i++], done: !o };
+        }
+    };
+    throw new TypeError(s ? "Object is not iterable." : "Symbol.iterator is not defined.");
+};
+var __read = (this && this.__read) || function (o, n) {
+    var m = typeof Symbol === "function" && o[Symbol.iterator];
+    if (!m) return o;
+    var i = m.call(o), r, ar = [], e;
+    try {
+        while ((n === void 0 || n-- > 0) && !(r = i.next()).done) ar.push(r.value);
+    }
+    catch (error) { e = { error: error }; }
+    finally {
+        try {
+            if (r && !r.done && (m = i["return"])) m.call(i);
+        }
+        finally { if (e) throw e.error; }
+    }
+    return ar;
+};
+var __importDefault = (this && this.__importDefault) || function (mod) {
+    return (mod && mod.__esModule) ? mod : { "default": mod };
+};
+Object.defineProperty(exports, "__esModule", { value: true });
+exports.CustomMapIterator = void 0;
+var intrinsics_container_1 = __importDefault(require("../intrinsics-container"));
+var path_1 = __importDefault(require("../utils/path"));
+var generics_1 = require("./generics");
+var nil_1 = __importDefault(require("./nil"));
+var string_1 = __importDefault(require("./string"));
+var CustomMapIterator = /** @class */ (function () {
+    function CustomMapIterator(value) {
+        var me = this;
+        me.value = value;
+        me.index = 0;
+    }
+    CustomMapIterator.prototype.next = function () {
+        var me = this;
+        var keys = Array.from(me.value.keys());
+        if (me.index === keys.length) {
+            return {
+                value: new nil_1.default(),
+                done: true
+            };
+        }
+        var key = keys[me.index++];
+        return {
+            value: new CustomMap(new Map([
+                ['key', new string_1.default(key)],
+                ['value', me.value.get(key)]
+            ])),
+            done: false
+        };
+    };
+    return CustomMapIterator;
+}());
+exports.CustomMapIterator = CustomMapIterator;
+var CustomMap = /** @class */ (function (_super) {
+    __extends(CustomMap, _super);
+    function CustomMap(value) {
+        if (value === void 0) { value = new Map(); }
+        var _this = _super.call(this) || this;
+        _this.isInstance = false;
+        _this.value = new Map(value);
+        return _this;
+    }
+    CustomMap.getIntrinsics = function () {
+        return this.intrinsics;
+    };
+    CustomMap.addIntrinsic = function (name, fn) {
+        this.intrinsics.add(name, fn);
+    };
+    CustomMap.prototype.getCustomType = function () {
+        if (this.has('classID')) {
+            return this.get('classID').toString();
+        }
+        return 'map';
+    };
+    CustomMap.prototype.toString = function () {
+        var e_1, _a;
+        var values = [];
+        try {
+            for (var _b = __values(this.value), _c = _b.next(); !_c.done; _c = _b.next()) {
+                var _d = __read(_c.value, 2), key = _d[0], value = _d[1];
+                values.push("".concat(key, ": ").concat(value.toString()));
+            }
+        }
+        catch (e_1_1) { e_1 = { error: e_1_1 }; }
+        finally {
+            try {
+                if (_c && !_c.done && (_a = _b.return)) _a.call(_b);
+            }
+            finally { if (e_1) throw e_1.error; }
+        }
+        return "{ ".concat(values.join(', '), " }");
+    };
+    CustomMap.prototype.fork = function () {
+        return new CustomMap(this.value);
+    };
+    CustomMap.prototype.toNumber = function () {
+        return 0;
+    };
+    CustomMap.prototype.toInt = function () {
+        return 0;
+    };
+    CustomMap.prototype.toTruthy = function () {
+        return this.value.size > 0;
+    };
+    CustomMap.prototype[Symbol.iterator] = function () {
+        return new CustomMapIterator(this.value);
+    };
+    CustomMap.prototype.extend = function (map) {
+        var e_2, _a;
+        if (map instanceof CustomMap) {
+            map = map.value;
+        }
+        try {
+            for (var map_1 = __values(map), map_1_1 = map_1.next(); !map_1_1.done; map_1_1 = map_1.next()) {
+                var _b = __read(map_1_1.value, 2), key = _b[0], value = _b[1];
+                this.value.set(key, value);
+            }
+        }
+        catch (e_2_1) { e_2 = { error: e_2_1 }; }
+        finally {
+            try {
+                if (map_1_1 && !map_1_1.done && (_a = map_1.return)) _a.call(map_1);
+            }
+            finally { if (e_2) throw e_2.error; }
+        }
+        return this;
+    };
+    CustomMap.prototype.has = function (path) {
+        if (typeof path === 'string') {
+            return this.has(new path_1.default([path]));
+        }
+        var traversalPath = path.clone();
+        var current = traversalPath.next();
+        if (current !== null) {
+            if (this.value.has(current)) {
+                var sub = this.value.get(current);
+                if (traversalPath.count() > 0 &&
+                    sub instanceof generics_1.CustomValueWithIntrinsics) {
+                    return sub.has(traversalPath);
+                }
+                return traversalPath.count() === 0;
+            }
+        }
+        return false;
+    };
+    CustomMap.prototype.set = function (path, newValue) {
+        if (typeof path === 'string') {
+            return this.set(new path_1.default([path]), newValue);
+        }
+        var traversalPath = path.clone();
+        var last = traversalPath.last();
+        var current = traversalPath.next();
+        if (current !== null) {
+            if (this.value.has(current)) {
+                var sub = this.value.get(current);
+                if (sub instanceof generics_1.CustomValueWithIntrinsics) {
+                    sub.set(traversalPath, newValue);
+                    return;
+                }
+            }
+            throw new Error("Cannot set path ".concat(path.toString(), "."));
+        }
+        this.value.set(last, newValue);
+    };
+    CustomMap.prototype.get = function (path) {
+        if (typeof path === 'string') {
+            return this.get(new path_1.default([path]));
+        }
+        var traversalPath = path.clone();
+        var current = traversalPath.next();
+        if (current !== null) {
+            if (this.value.has(current)) {
+                var sub = this.value.get(current);
+                if (traversalPath.count() > 0) {
+                    if (sub instanceof generics_1.CustomValueWithIntrinsics) {
+                        return sub.get(traversalPath);
+                    }
+                }
+                else if (traversalPath.count() === 0) {
+                    return sub;
+                }
+            }
+            else if (path.count() === 1 && CustomMap.getIntrinsics().has(current)) {
+                return CustomMap.getIntrinsics().get(current);
+            }
+        }
+        throw new Error("Unknown path in map ".concat(path.toString(), "."));
+    };
+    CustomMap.prototype.createInstance = function () {
+        var newInstance = new CustomMap(this.value);
+        newInstance.isInstance = true;
+        return newInstance;
+    };
+    CustomMap.intrinsics = new intrinsics_container_1.default();
+    return CustomMap;
+}(generics_1.CustomObject));
+exports.default = CustomMap;

package/dist/types/nil.d.ts

@@ -0,0 +1,9 @@
+import { CustomValue } from './generics';
+export default class CustomNil extends CustomValue {
+    getCustomType(): string;
+    toString(): string;
+    fork(): CustomNil;
+    toNumber(): number;
+    toInt(): number;
+    toTruthy(): boolean;
+}

package/dist/{custom-types → types}/nil.js

@@ -1,44 +1,44 @@
-"use strict";
-var __extends = (this && this.__extends) || (function () {
-    var extendStatics = function (d, b) {
-        extendStatics = Object.setPrototypeOf ||
-            ({ __proto__: [] } instanceof Array && function (d, b) { d.__proto__ = b; }) ||
-            function (d, b) { for (var p in b) if (Object.prototype.hasOwnProperty.call(b, p)) d[p] = b[p]; };
-        return extendStatics(d, b);
-    };
-    return function (d, b) {
-        if (typeof b !== "function" && b !== null)
-            throw new TypeError("Class extends value " + String(b) + " is not a constructor or null");
-        extendStatics(d, b);
-        function __() { this.constructor = d; }
-        d.prototype = b === null ? Object.create(b) : (__.prototype = b.prototype, new __());
-    };
-})();
-Object.defineProperty(exports, "__esModule", { value: true });
-var custom_type_1 = require("../types/custom-type");
-var CustomNil = /** @class */ (function (_super) {
-    __extends(CustomNil, _super);
-    function CustomNil() {
-        var _this = _super !== null && _super.apply(this, arguments) || this;
-        _this.value = null;
-        return _this;
-    }
-    CustomNil.prototype.getType = function () {
-        return 'null';
-    };
-    CustomNil.prototype.toNumber = function () {
-        return Number.NaN;
-    };
-    CustomNil.prototype.toTruthy = function () {
-        return false;
-    };
-    CustomNil.prototype.toString = function () {
-        return 'null';
-    };
-    CustomNil.prototype.valueOf = function () {
-        return null;
-    };
-    CustomNil.intrinsics = new Map();
-    return CustomNil;
-}(custom_type_1.CustomLiteralType));
-exports.default = CustomNil;
+"use strict";
+var __extends = (this && this.__extends) || (function () {
+    var extendStatics = function (d, b) {
+        extendStatics = Object.setPrototypeOf ||
+            ({ __proto__: [] } instanceof Array && function (d, b) { d.__proto__ = b; }) ||
+            function (d, b) { for (var p in b) if (Object.prototype.hasOwnProperty.call(b, p)) d[p] = b[p]; };
+        return extendStatics(d, b);
+    };
+    return function (d, b) {
+        if (typeof b !== "function" && b !== null)
+            throw new TypeError("Class extends value " + String(b) + " is not a constructor or null");
+        extendStatics(d, b);
+        function __() { this.constructor = d; }
+        d.prototype = b === null ? Object.create(b) : (__.prototype = b.prototype, new __());
+    };
+})();
+Object.defineProperty(exports, "__esModule", { value: true });
+var generics_1 = require("./generics");
+var CustomNil = /** @class */ (function (_super) {
+    __extends(CustomNil, _super);
+    function CustomNil() {
+        return _super !== null && _super.apply(this, arguments) || this;
+    }
+    CustomNil.prototype.getCustomType = function () {
+        return 'null';
+    };
+    CustomNil.prototype.toString = function () {
+        return '';
+    };
+    CustomNil.prototype.fork = function () {
+        return new CustomNil();
+    };
+    CustomNil.prototype.toNumber = function () {
+        return undefined;
+    };
+    CustomNil.prototype.toInt = function () {
+        return undefined;
+    };
+    CustomNil.prototype.toTruthy = function () {
+        return false;
+    };
+    return CustomNil;
+}(generics_1.CustomValue));
+exports.default = CustomNil;

package/dist/types/number.d.ts

@@ -0,0 +1,11 @@
+import { CustomValue } from './generics';
+export default class CustomNumber extends CustomValue {
+    readonly value: number;
+    constructor(value: number);
+    getCustomType(): string;
+    toString(): string;
+    fork(): CustomNumber;
+    toInt(): number;
+    toNumber(): number;
+    toTruthy(): boolean;
+}