@eagleoutice/flowr 1.3.11 → 1.3.12

package/r-bridge/lang-4.x/ast/parser/xml/v1/internal/loops/index.js

@@ -1,22 +0,0 @@
-"use strict";
-var __createBinding = (this && this.__createBinding) || (Object.create ? (function(o, m, k, k2) {
-    if (k2 === undefined) k2 = k;
-    var desc = Object.getOwnPropertyDescriptor(m, k);
-    if (!desc || ("get" in desc ? !m.__esModule : desc.writable || desc.configurable)) {
-      desc = { enumerable: true, get: function() { return m[k]; } };
-    }
-    Object.defineProperty(o, k2, desc);
-}) : (function(o, m, k, k2) {
-    if (k2 === undefined) k2 = k;
-    o[k2] = m[k];
-}));
-var __exportStar = (this && this.__exportStar) || function(m, exports) {
-    for (var p in m) if (p !== "default" && !Object.prototype.hasOwnProperty.call(exports, p)) __createBinding(exports, m, p);
-};
-Object.defineProperty(exports, "__esModule", { value: true });
-__exportStar(require("./for"), exports);
-__exportStar(require("./while"), exports);
-__exportStar(require("./repeat"), exports);
-__exportStar(require("./break"), exports);
-__exportStar(require("./next"), exports);
-//# sourceMappingURL=index.js.map

package/r-bridge/lang-4.x/ast/parser/xml/v1/internal/loops/next.js

@@ -1,24 +0,0 @@
-"use strict";
-Object.defineProperty(exports, "__esModule", { value: true });
-exports.normalizeNext = void 0;
-const normalize_1 = require("../../normalize");
-const hooks_1 = require("../../hooks");
-const meta_1 = require("../../../common/meta");
-function normalizeNext(data, obj) {
-    normalize_1.parseLog.debug(`[next] try: ${JSON.stringify(obj)}`);
-    obj = (0, hooks_1.executeHook)(data.hooks.loops.onNext.before, data, obj);
-    const { location, content } = (0, meta_1.retrieveMetaStructure)(data.config, obj);
-    const result = {
-        type: "RNext" /* RType.Next */,
-        location,
-        lexeme: content,
-        info: {
-            fullRange: data.currentRange,
-            additionalTokens: [],
-            fullLexeme: data.currentLexeme
-        }
-    };
-    return (0, hooks_1.executeHook)(data.hooks.loops.onNext.after, data, result);
-}
-exports.normalizeNext = normalizeNext;
-//# sourceMappingURL=next.js.map

package/r-bridge/lang-4.x/ast/parser/xml/v1/internal/loops/repeat.js

@@ -1,42 +0,0 @@
-"use strict";
-Object.defineProperty(exports, "__esModule", { value: true });
-exports.tryNormalizeRepeat = void 0;
-const meta_1 = require("../../../common/meta");
-const normalize_1 = require("../../normalize");
-const structure_1 = require("../structure");
-const assert_1 = require("../../../../../../../../util/assert");
-const hooks_1 = require("../../hooks");
-/**
- * Try to parse the construct as a {@link RRepeatLoop}.
- *
- * @param data - The data used by the parser (see {@link ParserData})
- * @param repeatToken - Token which represents the `repeat` keyword
- * @param body - The `body` of the repeat-loop
- *
- * @returns The parsed {@link RRepeatLoop} or `undefined` if the given construct is not a repeat-loop
- */
-function tryNormalizeRepeat(data, repeatToken, body) {
-    if (repeatToken.name !== "REPEAT" /* RawRType.Repeat */) {
-        normalize_1.parseLog.debug('encountered non-repeat token for supposed repeat-loop structure');
-        return (0, hooks_1.executeUnknownHook)(data.hooks.loops.onRepeatLoop.unknown, data, { repeatToken, body });
-    }
-    normalize_1.parseLog.debug('trying to parse repeat-loop');
-    ({ repeatToken, body } = (0, hooks_1.executeHook)(data.hooks.loops.onRepeatLoop.before, data, { repeatToken, body }));
-    const parseBody = (0, structure_1.tryNormalizeSingleNode)(data, body);
-    (0, assert_1.guard)(parseBody.type !== "RDelimiter" /* RType.Delimiter */, () => `no body for repeat-loop ${JSON.stringify(repeatToken)} (${JSON.stringify(body)})`);
-    const { location, content } = (0, meta_1.retrieveMetaStructure)(data.config, repeatToken.content);
-    const result = {
-        type: "RRepeatLoop" /* RType.RepeatLoop */,
-        location,
-        lexeme: content,
-        body: (0, meta_1.ensureExpressionList)(parseBody),
-        info: {
-            fullRange: data.currentRange,
-            additionalTokens: [],
-            fullLexeme: data.currentLexeme
-        }
-    };
-    return (0, hooks_1.executeHook)(data.hooks.loops.onRepeatLoop.after, data, result);
-}
-exports.tryNormalizeRepeat = tryNormalizeRepeat;
-//# sourceMappingURL=repeat.js.map

package/r-bridge/lang-4.x/ast/parser/xml/v1/internal/loops/while.js

@@ -1,45 +0,0 @@
-"use strict";
-Object.defineProperty(exports, "__esModule", { value: true });
-exports.tryNormalizeWhile = void 0;
-const input_format_1 = require("../../../common/input-format");
-const meta_1 = require("../../../common/meta");
-const normalize_1 = require("../../normalize");
-const structure_1 = require("../structure");
-const hooks_1 = require("../../hooks");
-function tryNormalizeWhile(data, whileToken, leftParen, condition, rightParen, body) {
-    if (whileToken.name !== "WHILE" /* RawRType.While */) {
-        normalize_1.parseLog.debug('encountered non-while token for supposed while-loop structure');
-        return (0, hooks_1.executeUnknownHook)(data.hooks.loops.onWhileLoop.unknown, data, { whileToken, leftParen, condition, rightParen, body });
-    }
-    else if (leftParen.name !== "(" /* RawRType.ParenLeft */) {
-        throw new input_format_1.XmlParseError(`expected left-parenthesis for while but found ${JSON.stringify(leftParen)}`);
-    }
-    else if (rightParen.name !== ")" /* RawRType.ParenRight */) {
-        throw new input_format_1.XmlParseError(`expected right-parenthesis for while but found ${JSON.stringify(rightParen)}`);
-    }
-    normalize_1.parseLog.debug('trying to parse while-loop');
-    const parsedCondition = (0, structure_1.tryNormalizeSingleNode)(data, condition);
-    const parseBody = (0, structure_1.tryNormalizeSingleNode)(data, body);
-    if (parsedCondition.type === "RDelimiter" /* RType.Delimiter */ || parseBody.type === "RDelimiter" /* RType.Delimiter */) {
-        throw new input_format_1.XmlParseError(`unexpected under-sided while-loop, received ${JSON.stringify([
-            parsedCondition,
-            parseBody,
-        ])} for ${JSON.stringify([whileToken, condition, body])}`);
-    }
-    const { location, content } = (0, meta_1.retrieveMetaStructure)(data.config, whileToken.content);
-    const result = {
-        type: "RWhileLoop" /* RType.WhileLoop */,
-        condition: parsedCondition,
-        body: (0, meta_1.ensureExpressionList)(parseBody),
-        lexeme: content,
-        location,
-        info: {
-            fullRange: data.currentRange,
-            additionalTokens: [],
-            fullLexeme: data.currentLexeme
-        }
-    };
-    return (0, hooks_1.executeHook)(data.hooks.loops.onWhileLoop.after, data, result);
-}
-exports.tryNormalizeWhile = tryNormalizeWhile;
-//# sourceMappingURL=while.js.map

package/r-bridge/lang-4.x/ast/parser/xml/v1/internal/operators/binary.js

@@ -1,162 +0,0 @@
-"use strict";
-Object.defineProperty(exports, "__esModule", { value: true });
-exports.tryNormalizeBinary = void 0;
-const input_format_1 = require("../../../common/input-format");
-const normalize_1 = require("../../normalize");
-const meta_1 = require("../../../common/meta");
-const special_1 = require("./special");
-const structure_1 = require("../structure");
-const model_1 = require("../../../../../model");
-const hooks_1 = require("../../hooks");
-const assert_1 = require("../../../../../../../../util/assert");
-/**
- * Parsing binary operations includes the pipe, even though the produced PIPE construct is not a binary operation,
- * to ensure it is handled separately from the others (especially in the combination of a pipe bind)
- */
-function tryNormalizeBinary(data, lhs, operator, rhs) {
-    normalize_1.parseLog.trace(`binary op for ${lhs.name} [${operator.name}] ${rhs.name}`);
-    let flavor;
-    if ("SPECIAL" /* RawRType.Special */ === operator.name) {
-        flavor = 'special';
-    }
-    else if (model_1.ArithmeticOperatorsRAst.has(operator.name)) {
-        flavor = 'arithmetic';
-    }
-    else if (model_1.ComparisonOperatorsRAst.has(operator.name)) {
-        flavor = 'comparison';
-    }
-    else if (model_1.LogicalOperatorsRAst.has(operator.name)) {
-        flavor = 'logical';
-    }
-    else if (model_1.ModelFormulaOperatorsRAst.has(operator.name)) {
-        flavor = 'model formula';
-    }
-    else if (model_1.AssignmentsRAst.has(operator.name)) {
-        flavor = 'assignment';
-    }
-    else if (operator.name === "PIPE" /* RawRType.Pipe */) {
-        flavor = 'pipe';
-    }
-    else {
-        return (0, hooks_1.executeUnknownHook)(data.hooks.operators.onBinary.unknown, data, { lhs, operator, rhs });
-    }
-    return parseBinaryOp(data, flavor, lhs, operator, rhs);
-}
-exports.tryNormalizeBinary = tryNormalizeBinary;
-function parseBinaryOp(data, flavor, lhs, operator, rhs) {
-    normalize_1.parseLog.debug(`[binary op] trying to parse ${flavor}`);
-    ({ flavor, lhs, rhs, operator } = (0, hooks_1.executeHook)(data.hooks.operators.onBinary.before, data, { flavor, lhs, operator, rhs }));
-    (0, meta_1.ensureChildrenAreLhsAndRhsOrdered)(data.config, lhs.content, rhs.content);
-    let parsedLhs = (0, structure_1.tryNormalizeSingleNode)(data, lhs);
-    let parsedRhs = (0, structure_1.tryNormalizeSingleNode)(data, rhs);
-    if (parsedLhs.type === "RDelimiter" /* RType.Delimiter */ || parsedRhs.type === "RDelimiter" /* RType.Delimiter */) {
-        throw new input_format_1.XmlParseError(`unexpected under-sided binary op, received ${JSON.stringify([parsedLhs, parsedRhs])} for ${JSON.stringify([lhs, operator, rhs])}`);
-    }
-    const operationName = (0, meta_1.retrieveOpName)(data.config, operator);
-    // special support for strings in assignments
-    if (flavor === 'assignment') {
-        [parsedLhs, parsedRhs] = processLhsAndRhsForAssignment(data, operationName, parsedLhs, parsedRhs);
-    }
-    const { location, content } = (0, meta_1.retrieveMetaStructure)(data.config, operator.content);
-    if (flavor === 'special') {
-        flavor = (0, special_1.identifySpecialOp)(content);
-    }
-    if (flavor === 'special') {
-        (0, assert_1.guard)(parsedLhs.location !== undefined && parsedLhs.lexeme !== undefined && parsedRhs.location !== undefined && parsedRhs.lexeme !== undefined, () => `special op lhs and rhs must have a locations and lexemes, but ${JSON.stringify(parsedLhs)} and ${JSON.stringify(parsedRhs)})`);
-        // parse as infix function call!
-        const result = {
-            type: "RFunctionCall" /* RType.FunctionCall */,
-            flavor: 'named',
-            infixSpecial: true,
-            lexeme: data.currentLexeme ?? content,
-            location,
-            functionName: {
-                type: "RSymbol" /* RType.Symbol */,
-                location,
-                lexeme: content,
-                content,
-                namespace: undefined,
-                info: {}
-            },
-            arguments: [
-                {
-                    type: "RArgument" /* RType.Argument */,
-                    location: parsedLhs.location,
-                    value: parsedLhs,
-                    name: undefined,
-                    lexeme: parsedLhs.lexeme,
-                    info: {}
-                },
-                {
-                    type: "RArgument" /* RType.Argument */,
-                    location: parsedRhs.location,
-                    value: parsedRhs,
-                    name: undefined,
-                    lexeme: parsedRhs.lexeme,
-                    info: {}
-                }
-            ],
-            info: {}
-        };
-        return (0, hooks_1.executeHook)(data.hooks.operators.onBinary.after, data, result);
-    }
-    let result;
-    if (flavor === 'pipe') {
-        (0, assert_1.guard)(parsedLhs.location !== undefined, () => `pipe lhs must have a location, but ${JSON.stringify(parsedLhs)})`);
-        (0, assert_1.guard)(parsedLhs.lexeme !== undefined, () => `pipe lhs must have a full lexeme, but ${JSON.stringify(parsedLhs)})`);
-        result = {
-            type: "RPipe" /* RType.Pipe */,
-            location,
-            lhs: {
-                type: "RArgument" /* RType.Argument */,
-                location: parsedLhs.location,
-                value: parsedLhs,
-                name: undefined,
-                lexeme: parsedLhs.lexeme,
-                info: {}
-            },
-            rhs: parsedRhs,
-            lexeme: content,
-            info: {
-                fullRange: data.currentRange,
-                additionalTokens: [],
-                fullLexeme: data.currentLexeme
-            }
-        };
-    }
-    else {
-        result = {
-            type: "RBinaryOp" /* RType.BinaryOp */,
-            flavor,
-            location,
-            lhs: parsedLhs,
-            rhs: parsedRhs,
-            operator: operationName,
-            lexeme: content,
-            info: {
-                fullRange: data.currentRange,
-                additionalTokens: [],
-                fullLexeme: data.currentLexeme
-            }
-        };
-    }
-    return (0, hooks_1.executeHook)(data.hooks.operators.onBinary.after, data, result);
-}
-function processLhsAndRhsForAssignment(data, opName, parsedLhs, parsedRhs) {
-    const isRhs = opName === '->' || opName === '->>';
-    const assigned = isRhs ? parsedRhs : parsedLhs;
-    if (assigned.type !== "RString" /* RType.String */) {
-        return [parsedLhs, parsedRhs];
-    }
-    // update the assigned value to be parsed as a symbol
-    const result = {
-        type: "RSymbol" /* RType.Symbol */,
-        lexeme: assigned.lexeme,
-        location: assigned.location,
-        content: assigned.content.str,
-        namespace: undefined,
-        info: assigned.info
-    };
-    return isRhs ? [parsedLhs, result] : [result, parsedRhs];
-}
-//# sourceMappingURL=binary.js.map

package/r-bridge/lang-4.x/ast/parser/xml/v1/internal/operators/index.js

@@ -1,20 +0,0 @@
-"use strict";
-var __createBinding = (this && this.__createBinding) || (Object.create ? (function(o, m, k, k2) {
-    if (k2 === undefined) k2 = k;
-    var desc = Object.getOwnPropertyDescriptor(m, k);
-    if (!desc || ("get" in desc ? !m.__esModule : desc.writable || desc.configurable)) {
-      desc = { enumerable: true, get: function() { return m[k]; } };
-    }
-    Object.defineProperty(o, k2, desc);
-}) : (function(o, m, k, k2) {
-    if (k2 === undefined) k2 = k;
-    o[k2] = m[k];
-}));
-var __exportStar = (this && this.__exportStar) || function(m, exports) {
-    for (var p in m) if (p !== "default" && !Object.prototype.hasOwnProperty.call(exports, p)) __createBinding(exports, m, p);
-};
-Object.defineProperty(exports, "__esModule", { value: true });
-__exportStar(require("./unary"), exports);
-__exportStar(require("./binary"), exports);
-__exportStar(require("./special"), exports);
-//# sourceMappingURL=index.js.map

package/r-bridge/lang-4.x/ast/parser/xml/v1/internal/operators/special.js

@@ -1,24 +0,0 @@
-"use strict";
-Object.defineProperty(exports, "__esModule", { value: true });
-exports.identifySpecialOp = void 0;
-const model_1 = require("../../../../../model");
-/**
- * Identify the flavor of a given operator, as we do not really have a use for "special"
- * operators within our internal AST.
- */
-function identifySpecialOp(content) {
-    if (model_1.ComparisonOperatorsRAst.has(content)) {
-        return 'comparison';
-    }
-    else if (model_1.LogicalOperatorsRAst.has(content)) {
-        return 'logical';
-    }
-    else if (model_1.ArithmeticOperatorsRAst.has(content)) {
-        return 'arithmetic';
-    }
-    else {
-        return 'special';
-    }
-}
-exports.identifySpecialOp = identifySpecialOp;
-//# sourceMappingURL=special.js.map

package/r-bridge/lang-4.x/ast/parser/xml/v1/internal/operators/unary.js

@@ -1,59 +0,0 @@
-"use strict";
-Object.defineProperty(exports, "__esModule", { value: true });
-exports.tryNormalizeUnary = void 0;
-const meta_1 = require("../../../common/meta");
-const normalize_1 = require("../../normalize");
-const structure_1 = require("../structure");
-const assert_1 = require("../../../../../../../../util/assert");
-const model_1 = require("../../../../../model");
-const hooks_1 = require("../../hooks");
-/**
- * Parses the construct as a {@link RUnaryOp} (automatically identifies the flavor).
- *
- * @param data     - The data used by the parser (see {@link ParserData})
- * @param operator - The operator token
- * @param operand  - The operand of the unary operator
- *
- * @returns The parsed {@link RUnaryOp} or `undefined` if the given construct is not a unary operator
- */
-function tryNormalizeUnary(data, operator, operand) {
-    normalize_1.parseLog.trace(`unary op for ${operator.name} ${operand.name}`);
-    let flavor;
-    if (model_1.ArithmeticOperatorsRAst.has(operator.name)) {
-        flavor = 'arithmetic';
-    }
-    else if (model_1.LogicalOperatorsRAst.has(operator.name)) {
-        flavor = 'logical';
-    }
-    else if (model_1.ModelFormulaOperatorsRAst.has(operator.name)) {
-        flavor = 'model formula';
-    }
-    else {
-        return (0, hooks_1.executeUnknownHook)(data.hooks.operators.onUnary.unknown, data, { operator, operand });
-    }
-    return parseUnaryOp(data, flavor, operator, operand);
-}
-exports.tryNormalizeUnary = tryNormalizeUnary;
-function parseUnaryOp(data, flavor, operator, operand) {
-    normalize_1.parseLog.debug(`[unary op] parse ${flavor}`); // <- semicolon sadly required for not miss-interpreting the destructuring match as call
-    ({ flavor, operator, operand } = (0, hooks_1.executeHook)(data.hooks.operators.onUnary.before, data, { flavor, operator, operand }));
-    const parsedOperand = (0, structure_1.tryNormalizeSingleNode)(data, operand);
-    (0, assert_1.guard)(parsedOperand.type !== "RDelimiter" /* RType.Delimiter */, () => 'unexpected under-sided unary op');
-    const operationName = (0, meta_1.retrieveOpName)(data.config, operator);
-    const { location, content } = (0, meta_1.retrieveMetaStructure)(data.config, operator.content);
-    const result = {
-        type: "RUnaryOp" /* RType.UnaryOp */,
-        flavor,
-        location,
-        operator: operationName,
-        lexeme: content,
-        operand: parsedOperand,
-        info: {
-            fullRange: data.currentRange,
-            additionalTokens: [],
-            fullLexeme: data.currentLexeme
-        }
-    };
-    return (0, hooks_1.executeHook)(data.hooks.operators.onUnary.after, data, result);
-}
-//# sourceMappingURL=unary.js.map

package/r-bridge/lang-4.x/ast/parser/xml/v1/internal/other/comment.js

@@ -1,34 +0,0 @@
-"use strict";
-Object.defineProperty(exports, "__esModule", { value: true });
-exports.normalizeComment = void 0;
-const normalize_1 = require("../../normalize");
-const meta_1 = require("../../../common/meta");
-const assert_1 = require("../../../../../../../../util/assert");
-const hooks_1 = require("../../hooks");
-/**
- * Normalize the given object as an R comment.
- * This requires you to check the corresponding name beforehand.
- *
- * @param data - The data used by the parser (see {@link ParserData})
- * @param obj  - The json object to extract the meta-information from
- */
-function normalizeComment(data, obj) {
-    normalize_1.parseLog.debug('[comment]');
-    obj = (0, hooks_1.executeHook)(data.hooks.other.onComment.before, data, obj);
-    const { location, content } = (0, meta_1.retrieveMetaStructure)(data.config, obj);
-    (0, assert_1.guard)(content.startsWith('#'), 'comment must start with #');
-    const result = {
-        type: "RComment" /* RType.Comment */,
-        location,
-        content: content.slice(1),
-        lexeme: content,
-        info: {
-            fullRange: data.currentRange,
-            additionalTokens: [],
-            fullLexeme: content
-        }
-    };
-    return (0, hooks_1.executeHook)(data.hooks.other.onComment.after, data, result);
-}
-exports.normalizeComment = normalizeComment;
-//# sourceMappingURL=comment.js.map

package/r-bridge/lang-4.x/ast/parser/xml/v1/internal/other/index.js

@@ -1,18 +0,0 @@
-"use strict";
-var __createBinding = (this && this.__createBinding) || (Object.create ? (function(o, m, k, k2) {
-    if (k2 === undefined) k2 = k;
-    var desc = Object.getOwnPropertyDescriptor(m, k);
-    if (!desc || ("get" in desc ? !m.__esModule : desc.writable || desc.configurable)) {
-      desc = { enumerable: true, get: function() { return m[k]; } };
-    }
-    Object.defineProperty(o, k2, desc);
-}) : (function(o, m, k, k2) {
-    if (k2 === undefined) k2 = k;
-    o[k2] = m[k];
-}));
-var __exportStar = (this && this.__exportStar) || function(m, exports) {
-    for (var p in m) if (p !== "default" && !Object.prototype.hasOwnProperty.call(exports, p)) __createBinding(exports, m, p);
-};
-Object.defineProperty(exports, "__esModule", { value: true });
-__exportStar(require("./comment"), exports);
-//# sourceMappingURL=index.js.map

package/r-bridge/lang-4.x/ast/parser/xml/v1/internal/other/line-directive.js

@@ -1,55 +0,0 @@
-"use strict";
-Object.defineProperty(exports, "__esModule", { value: true });
-exports.normalizeLineDirective = void 0;
-const normalize_1 = require("../../normalize");
-const meta_1 = require("../../../common/meta");
-const assert_1 = require("../../../../../../../../util/assert");
-const hooks_1 = require("../../hooks");
-const LineDirectiveRegex = /^#line\s+(\d+)\s+"([^"]+)"\s*$/;
-/**
- * Normalize the given object as an R line directive (`#line <number> "<file>"`).
- * This requires you to check the corresponding name beforehand.
- * If the given object turns out to be no line directive, this returns a normal comment instead.
- *
- * @param data - The data used by the parser (see {@link ParserData})
- * @param obj  - The json object to extract the meta-information from
- */
-function normalizeLineDirective(data, obj) {
-    normalize_1.parseLog.debug('[line-directive]');
-    obj = (0, hooks_1.executeHook)(data.hooks.other.onLineDirective.before, data, obj);
-    const { location, content } = (0, meta_1.retrieveMetaStructure)(data.config, obj);
-    (0, assert_1.guard)(content.startsWith('#line'), 'line directive must start with #line');
-    const match = LineDirectiveRegex.exec(content);
-    let result;
-    if (match === null) {
-        normalize_1.parseLog.debug(`[line-directive] does not match the regex ${LineDirectiveRegex.source} given ${JSON.stringify(content)}`);
-        result = {
-            type: "RComment" /* RType.Comment */,
-            location,
-            lexeme: content,
-            info: {
-                fullRange: data.currentRange,
-                additionalTokens: [],
-                fullLexeme: content
-            },
-            content: content.slice(1)
-        };
-    }
-    else {
-        result = {
-            type: "RLineDirective" /* RType.LineDirective */,
-            location,
-            line: parseInt(match[1]),
-            file: match[2],
-            lexeme: content,
-            info: {
-                fullRange: data.currentRange,
-                additionalTokens: [],
-                fullLexeme: content
-            }
-        };
-    }
-    return (0, hooks_1.executeHook)(data.hooks.other.onLineDirective.after, data, result);
-}
-exports.normalizeLineDirective = normalizeLineDirective;
-//# sourceMappingURL=line-directive.js.map