@mojir/lits 2.1.11 → 2.1.13

package/dist/testFramework.js

@@ -448,6 +448,8 @@ function isNumber(value, options) {
     if (options === void 0) { options = {}; }
     if (typeof value !== 'number')
         return false;
+    if (Number.isNaN(value))
+        return false;
     if (options.integer && !Number.isInteger(value))
         return false;
     if (options.finite && !Number.isFinite(value))
@@ -1068,6 +1070,35 @@ var collectionNormalExpression = {
         },
         paramCount: 2,
     },
+    'filteri': {
+        evaluate: function (_a, sourceCodeInfo, contextStack, _b) {
+            var _c = __read(_a, 2), coll = _c[0], fn = _c[1];
+            var executeFunction = _b.executeFunction;
+            assertColl(coll, sourceCodeInfo);
+            assertFunctionLike(fn, sourceCodeInfo);
+            if (Array.isArray(coll)) {
+                var result = coll.filter(function (elem, index) { return executeFunction(fn, [elem, index], contextStack, sourceCodeInfo); });
+                return result;
+            }
+            if (isString(coll)) {
+                return coll
+                    .split('')
+                    .filter(function (elem, index) { return executeFunction(fn, [elem, index], contextStack, sourceCodeInfo); })
+                    .join('');
+            }
+            return Object.entries(coll)
+                .filter(function (_a) {
+                var _b = __read(_a, 2), key = _b[0], value = _b[1];
+                return executeFunction(fn, [value, key], contextStack, sourceCodeInfo);
+            })
+                .reduce(function (result, _a) {
+                var _b = __read(_a, 2), key = _b[0], value = _b[1];
+                result[key] = value;
+                return result;
+            }, {});
+        },
+        paramCount: 2,
+    },
     'map': {
         evaluate: function (params, sourceCodeInfo, contextStack, _a) {
             var executeFunction = _a.executeFunction;
@@ -1110,6 +1141,30 @@ var collectionNormalExpression = {
         },
         paramCount: { min: 2 },
     },
+    'mapi': {
+        evaluate: function (_a, sourceCodeInfo, contextStack, _b) {
+            var _c = __read(_a, 2), coll = _c[0], fn = _c[1];
+            var executeFunction = _b.executeFunction;
+            assertColl(coll, sourceCodeInfo);
+            assertFunctionLike(fn, sourceCodeInfo);
+            if (Array.isArray(coll)) {
+                return coll.map(function (elem, index) { return executeFunction(fn, [elem, index], contextStack, sourceCodeInfo); });
+            }
+            if (isString(coll)) {
+                return coll
+                    .split('')
+                    .map(function (elem, index) { return executeFunction(fn, [elem, index], contextStack, sourceCodeInfo); })
+                    .join('');
+            }
+            return Object.entries(coll)
+                .reduce(function (acc, _a) {
+                var _b = __read(_a, 2), key = _b[0], value = _b[1];
+                acc[key] = executeFunction(fn, [value, key], contextStack, sourceCodeInfo);
+                return acc;
+            }, {});
+        },
+        paramCount: 2,
+    },
     'reduce': {
         evaluate: function (_a, sourceCodeInfo, contextStack, _b) {
             var _c = __read(_a, 3), coll = _c[0], fn = _c[1], initial = _c[2];
@@ -1143,6 +1198,39 @@ var collectionNormalExpression = {
         },
         paramCount: 3,
     },
+    'reducei': {
+        evaluate: function (_a, sourceCodeInfo, contextStack, _b) {
+            var _c = __read(_a, 3), coll = _c[0], fn = _c[1], initial = _c[2];
+            var executeFunction = _b.executeFunction;
+            assertColl(coll, sourceCodeInfo);
+            assertFunctionLike(fn, sourceCodeInfo);
+            assertAny(initial, sourceCodeInfo);
+            if (typeof coll === 'string') {
+                assertString(initial, sourceCodeInfo);
+                if (coll.length === 0)
+                    return initial;
+                return coll.split('').reduce(function (result, elem, index) {
+                    return executeFunction(fn, [result, elem, index], contextStack, sourceCodeInfo);
+                }, initial);
+            }
+            else if (Array.isArray(coll)) {
+                if (coll.length === 0)
+                    return initial;
+                return coll.reduce(function (result, elem, index) {
+                    return executeFunction(fn, [result, elem, index], contextStack, sourceCodeInfo);
+                }, initial);
+            }
+            else {
+                if (Object.keys(coll).length === 0)
+                    return initial;
+                return Object.entries(coll).reduce(function (result, _a) {
+                    var _b = __read(_a, 2), key = _b[0], elem = _b[1];
+                    return executeFunction(fn, [result, elem, key], contextStack, sourceCodeInfo);
+                }, initial);
+            }
+        },
+        paramCount: 3,
+    },
     'reduce-right': {
         evaluate: function (_a, sourceCodeInfo, contextStack, _b) {
             var _c = __read(_a, 3), coll = _c[0], fn = _c[1], initial = _c[2];
@@ -1175,6 +1263,38 @@ var collectionNormalExpression = {
         },
         paramCount: 3,
     },
+    'reducei-right': {
+        evaluate: function (_a, sourceCodeInfo, contextStack, _b) {
+            var _c = __read(_a, 3), coll = _c[0], fn = _c[1], initial = _c[2];
+            var executeFunction = _b.executeFunction;
+            assertColl(coll, sourceCodeInfo);
+            assertFunctionLike(fn, sourceCodeInfo);
+            assertAny(initial, sourceCodeInfo);
+            if (typeof coll === 'string') {
+                if (coll.length === 0)
+                    return initial;
+                return coll.split('').reduceRight(function (result, elem, index) {
+                    return executeFunction(fn, [result, elem, index], contextStack, sourceCodeInfo);
+                }, initial);
+            }
+            else if (Array.isArray(coll)) {
+                if (coll.length === 0)
+                    return initial;
+                return coll.reduceRight(function (result, elem, index) {
+                    return executeFunction(fn, [result, elem, index], contextStack, sourceCodeInfo);
+                }, initial);
+            }
+            else {
+                if (Object.keys(coll).length === 0)
+                    return initial;
+                return Object.entries(coll).reduceRight(function (result, _a) {
+                    var _b = __read(_a, 2), key = _b[0], elem = _b[1];
+                    return executeFunction(fn, [result, elem, key], contextStack, sourceCodeInfo);
+                }, initial);
+            }
+        },
+        paramCount: 3,
+    },
     'reductions': {
         evaluate: function (_a, sourceCodeInfo, contextStack, _b) {
             var _c = __read(_a, 3), coll = _c[0], fn = _c[1], initial = _c[2];
@@ -1221,6 +1341,52 @@ var collectionNormalExpression = {
         },
         paramCount: 3,
     },
+    'reductionsi': {
+        evaluate: function (_a, sourceCodeInfo, contextStack, _b) {
+            var _c = __read(_a, 3), coll = _c[0], fn = _c[1], initial = _c[2];
+            var executeFunction = _b.executeFunction;
+            assertColl(coll, sourceCodeInfo);
+            assertFunctionLike(fn, sourceCodeInfo);
+            assertAny(initial, sourceCodeInfo);
+            assertAny(initial, sourceCodeInfo);
+            if (typeof coll === 'string') {
+                assertString(initial, sourceCodeInfo);
+                if (coll.length === 0)
+                    return [initial];
+                var resultArray_4 = [initial];
+                coll.split('').reduce(function (result, elem, index) {
+                    var newVal = executeFunction(fn, [result, elem, index], contextStack, sourceCodeInfo);
+                    resultArray_4.push(newVal);
+                    return newVal;
+                }, initial);
+                return resultArray_4;
+            }
+            else if (Array.isArray(coll)) {
+                if (coll.length === 0)
+                    return [initial];
+                var resultArray_5 = [initial];
+                coll.reduce(function (result, elem, index) {
+                    var newVal = executeFunction(fn, [result, elem, index], contextStack, sourceCodeInfo);
+                    resultArray_5.push(newVal);
+                    return newVal;
+                }, initial);
+                return resultArray_5;
+            }
+            else {
+                if (Object.keys(coll).length === 0)
+                    return [initial];
+                var resultArray_6 = [initial];
+                Object.entries(coll).reduce(function (result, _a) {
+                    var _b = __read(_a, 2), key = _b[0], elem = _b[1];
+                    var newVal = executeFunction(fn, [result, elem, key], contextStack, sourceCodeInfo);
+                    resultArray_6.push(newVal);
+                    return newVal;
+                }, initial);
+                return resultArray_6;
+            }
+        },
+        paramCount: 3,
+    },
     'get': {
         evaluate: function (params, sourceCodeInfo) {
             var _a = __read(params, 2), coll = _a[0], key = _a[1];
@@ -1474,7 +1640,7 @@ var collectionNormalExpression = {
 };
 
 var arrayNormalExpression = {
-    range: {
+    'range': {
         evaluate: function (params, sourceCodeInfo) {
             var _a = __read(params, 3), first = _a[0], second = _a[1], third = _a[2];
             var from;
@@ -1512,7 +1678,7 @@ var arrayNormalExpression = {
         },
         paramCount: { min: 1, max: 3 },
     },
-    repeat: {
+    'repeat': {
         evaluate: function (_a, sourceCodeInfo) {
             var _b = __read(_a, 2), value = _b[0], count = _b[1];
             assertNumber(count, sourceCodeInfo, { integer: true, nonNegative: true });
@@ -1523,7 +1689,7 @@ var arrayNormalExpression = {
         },
         paramCount: 2,
     },
-    flatten: {
+    'flatten': {
         evaluate: function (_a, sourceCodeInfo) {
             var _b = __read(_a, 2), seq = _b[0], depth = _b[1];
             assertArray(seq, sourceCodeInfo);
@@ -1534,7 +1700,7 @@ var arrayNormalExpression = {
         },
         paramCount: { min: 1, max: 2 },
     },
-    mapcat: {
+    'mapcat': {
         evaluate: function (_a, sourceCodeInfo, contextStack, _b) {
             var _c = __read(_a, 2), arr = _c[0], fn = _c[1];
             var executeFunction = _b.executeFunction;
@@ -1544,6 +1710,38 @@ var arrayNormalExpression = {
         },
         paramCount: 2,
     },
+    'moving-fn': {
+        evaluate: function (_a, sourceCodeInfo, contextStack, _b) {
+            var _c = __read(_a, 3), arr = _c[0], windowSize = _c[1], fn = _c[2];
+            var executeFunction = _b.executeFunction;
+            assertArray(arr, sourceCodeInfo);
+            assertNumber(windowSize, sourceCodeInfo, { integer: true, lte: arr.length });
+            assertFunctionLike(fn, sourceCodeInfo);
+            var result = [];
+            for (var i = 0; i <= arr.length - windowSize; i++) {
+                var window_1 = arr.slice(i, i + windowSize);
+                var value = executeFunction(fn, [window_1], contextStack, sourceCodeInfo);
+                result.push(value);
+            }
+            return result;
+        },
+        paramCount: 3,
+    },
+    'running-fn': {
+        evaluate: function (_a, sourceCodeInfo, contextStack, _b) {
+            var _c = __read(_a, 2), arr = _c[0], fn = _c[1];
+            var executeFunction = _b.executeFunction;
+            assertArray(arr, sourceCodeInfo);
+            assertFunctionLike(fn, sourceCodeInfo);
+            var result = [];
+            for (var i = 0; i < arr.length; i += 1) {
+                var subArr = arr.slice(0, i + 1);
+                result.push(executeFunction(fn, [subArr], contextStack, sourceCodeInfo));
+            }
+            return result;
+        },
+        paramCount: 2,
+    },
 };
 
 var sequenceNormalExpression = {
@@ -2275,7 +2473,7 @@ function isVector(vector) {
     if (vectors.has(vector)) {
         return true;
     }
-    if (vector.every(function (elem) { return isNumber(elem, { finite: true }); })) {
+    if (vector.every(function (elem) { return isNumber(elem); })) {
         annotatedArrays.add(vector);
         vectors.add(vector);
         return true;
@@ -2384,7 +2582,7 @@ function isMatrix(matrix) {
             if (row.length !== nbrOfCols) {
                 return false;
             }
-            if (row.some(function (cell) { return !isNumber(cell, { finite: true }); })) {
+            if (row.some(function (cell) { return !isNumber(cell); })) {
                 return false;
             }
         }
@@ -3917,14 +4115,6 @@ var predicatesNormalExpression = {
         },
         paramCount: 1,
     },
-    'nan?': {
-        evaluate: function (_a, sourceCodeInfo) {
-            var _b = __read(_a, 1), value = _b[0];
-            assertNumber(value, sourceCodeInfo);
-            return Number.isNaN(value);
-        },
-        paramCount: 1,
-    },
     'positive-infinity?': {
         evaluate: function (_a, sourceCodeInfo) {
             var _b = __read(_a, 1), value = _b[0];
@@ -12486,8 +12676,13 @@ function evaluateNode(node, contextStack) {
             return contextStack.evaluateSymbol(node);
         case NodeTypes.ReservedSymbol:
             return evaluateReservedSymbol(node);
-        case NodeTypes.NormalExpression:
-            return annotate(evaluateNormalExpression(node, contextStack));
+        case NodeTypes.NormalExpression: {
+            var result = evaluateNormalExpression(node, contextStack);
+            if (typeof result === 'number' && Number.isNaN(result)) {
+                throw new LitsError('Number is NaN', node[2]);
+            }
+            return annotate(result);
+        }
         case NodeTypes.SpecialExpression:
             return annotate(evaluateSpecialExpression(node, contextStack));
         /* v8 ignore next 2 */
@@ -12879,6 +13074,8 @@ var binaryOperators = [
     '|>', // pipe
 ];
 var otherOperators = [
+    '?', // conditional operator
+    ':', // conditional operator
     '->', // lambda
     '...', // rest
     '.', // property accessor
@@ -12888,17 +13085,12 @@ var otherOperators = [
 ];
 var symbolicOperators = __spreadArray(__spreadArray([], __read(binaryOperators), false), __read(otherOperators), false);
 var nonFunctionOperators = [
-    '??',
-    '&&',
-    '||',
     'comment',
     'cond',
     'def',
     'defined?',
-    // 'defn',
     'do',
     'doseq',
-    // 'fn',
     'if',
     'let',
     'loop',
@@ -13476,8 +13668,9 @@ function untokenize(tokenStream) {
     }, '');
 }
 
-var exponentiationPrecedence = 11;
-var binaryFunctionalOperatorPrecedence = 2;
+var exponentiationPrecedence = 12;
+var binaryFunctionalOperatorPrecedence = 3;
+var conditionalOperatorPrecedence = 1;
 var placeholderRegexp = /^\$([1-9]\d?)?$/;
 function withSourceCodeInfo(node, sourceCodeInfo) {
     if (sourceCodeInfo) {
@@ -13492,38 +13685,39 @@ function getPrecedence(operatorSign, sourceCodeInfo) {
         case '*': // multiplication
         case '/': // division
         case '%': // remainder
-            return 10;
+            return 11;
         case '+': // addition
         case '-': // subtraction
-            return 9;
+            return 10;
         case '<<': // left shift
         case '>>': // signed right shift
         case '>>>': // unsigned right shift
-            return 8;
+            return 9;
         case '++': // string concatenation
-            return 7;
+            return 8;
         case '<': // less than
         case '<=': // less than or equal
         case '≤': // less than or equal
         case '>': // greater than
         case '>=': // greater than or equal
         case '≥': // greater than or equal
-            return 6;
+            return 7;
         case '=': // equal
         case '!=': // not equal
         case '≠': // not equal
-            return 5;
+            return 6;
         case '&': // bitwise AND
         case 'xor': // bitwise XOR
         case '|': // bitwise OR
-            return 4;
+            return 5;
         case '&&': // logical AND
         case '||': // logical OR
         case '??': // nullish coalescing
-            return 3;
+            return 4;
+        // leave room for binaryFunctionalOperatorPrecedence = 3
         case '|>': // pipe
-            return 1;
-        // leave room for binaryFunctionalOperatorPrecedence = 2
+            return 2;
+        // leave room for conditionalOperatorPrecedence = 1
         /* v8 ignore next 2 */
         default:
             throw new LitsError("Unknown binary operator: ".concat(operatorSign), sourceCodeInfo);
@@ -13571,13 +13765,15 @@ function fromBinaryOperatorToNode(operator, symbolNode, left, right, sourceCodeI
         case '||':
         case '??':
             return withSourceCodeInfo([NodeTypes.SpecialExpression, [specialExpressionTypes[operatorName], [left, right]]], sourceCodeInfo);
-        /* v8 ignore next 10 */
+        /* v8 ignore next 11 */
         case '.':
         case ';':
         case ':=':
         case ',':
         case '->':
         case '...':
+        case '?':
+        case ':':
             throw new LitsError("Unknown binary operator: ".concat(operatorName), sourceCodeInfo);
         default:
             throw new LitsError("Unknown binary operator: ".concat(operatorName), sourceCodeInfo);
@@ -13693,6 +13889,19 @@ var Parser = /** @class */ (function () {
                 }
                 left = createNamedNormalExpressionNode(operatorSymbol, [left, right], operator[2]);
             }
+            else if ((operator === null || operator === void 0 ? void 0 : operator[1]) === '?') {
+                if (conditionalOperatorPrecedence <= precedence) {
+                    break;
+                }
+                this.advance();
+                var trueNode = this.parseExpression();
+                if (!isOperatorToken(this.peek(), ':')) {
+                    throw new LitsError('Expected :', this.peekSourceCodeInfo());
+                }
+                this.advance();
+                var falseNode = this.parseExpression();
+                left = withSourceCodeInfo([NodeTypes.SpecialExpression, [specialExpressionTypes.if, [left, trueNode, falseNode]]], left[2]);
+            }
             else {
                 break;
             }