@eagleoutice/flowr 2.0.25 → 2.1.0

package/r-bridge/lang-4.x/ast/parser/xml/internal/structure/normalize-expressions.js

@@ -1,6 +1,8 @@
 "use strict";
 Object.defineProperty(exports, "__esModule", { value: true });
-exports.parseNodesWithUnknownType = exports.normalizeExpressions = exports.splitComments = void 0;
+exports.splitComments = splitComments;
+exports.normalizeExpressions = normalizeExpressions;
+exports.parseNodesWithUnknownType = parseNodesWithUnknownType;
 const normalize_single_node_1 = require("./normalize-single-node");
 const parser_1 = require("../../../json/parser");
 const normalize_meta_1 = require("../../normalize-meta");
@@ -15,6 +17,7 @@ const normalize_symbol_1 = require("../values/normalize-symbol");
 const normalize_if_then_1 = require("../control/normalize-if-then");
 const normalize_while_1 = require("../loops/normalize-while");
 const normalize_if_then_else_1 = require("../control/normalize-if-then-else");
+const type_1 = require("../../../../model/type");
 const normalize_comment_1 = require("../other/normalize-comment");
 function normalizeMappedWithoutSemicolonBasedOnType(mappedWithName, data) {
     let result = undefined;
@@ -46,7 +49,7 @@ function splitComments(tokens) {
     const comments = [];
     const others = [];
     for (const elem of tokens) {
-        if (elem.name === "COMMENT" /* RawRType.Comment */) {
+        if (elem.name === type_1.RawRType.Comment) {
             comments.push(elem);
         }
         else {
@@ -55,19 +58,18 @@ function splitComments(tokens) {
     }
     return { comments, others };
 }
-exports.splitComments = splitComments;
 function splitExprs(tokens) {
     let last = 0, i = 0;
     let lastExpr = false;
     const segments = [];
     for (const token of tokens) {
-        if (token.name === ";" /* RawRType.Semicolon */) {
+        if (token.name === type_1.RawRType.Semicolon) {
             segments.push(tokens.slice(last, i));
             lastExpr = false;
             last = i + 1;
         }
         else {
-            const thisExpr = token.name === "expr" /* RawRType.Expression */ || token.name === "expr_or_assign_or_help" /* RawRType.ExprOfAssignOrHelp */ || token.name === "equal_assign" /* RawRType.LegacyEqualAssign */;
+            const thisExpr = token.name === type_1.RawRType.Expression || token.name === type_1.RawRType.ExprOfAssignOrHelp || token.name === type_1.RawRType.LegacyEqualAssign;
             if (thisExpr && lastExpr) {
                 if (i > last) {
                     segments.push(tokens.slice(last, i));
@@ -94,18 +96,18 @@ function handleExpressionList(raw) {
     }
     const { comments, others: tokens } = splitComments(raw);
     const first = tokens[0]?.name;
-    if (first === "{" /* RawRType.BraceLeft */) {
+    if (first === type_1.RawRType.BraceLeft) {
         const endType = tokens[tokens.length - 1].name;
-        (0, assert_1.guard)(endType === "}" /* RawRType.BraceRight */, () => `expected a brace at the end of the expression list as well, but ${endType} :: ${JSON.stringify(tokens[tokens.length - 1], json_1.jsonReplacer)}`);
+        (0, assert_1.guard)(endType === type_1.RawRType.BraceRight, () => `expected a brace at the end of the expression list as well, but ${endType} :: ${JSON.stringify(tokens[tokens.length - 1], json_1.jsonReplacer)}`);
         return {
             segments: [tokens.slice(1, tokens.length - 1)],
             comments,
             braces: [tokens[0], tokens[tokens.length - 1]]
         };
     }
-    else if (first === "(" /* RawRType.ParenLeft */) {
+    else if (first === type_1.RawRType.ParenLeft) {
         const endType = tokens[tokens.length - 1].name;
-        (0, assert_1.guard)(endType === ")" /* RawRType.ParenRight */, () => `expected a parenthesis at the end of the expression list as well, but ${endType} :: ${JSON.stringify(tokens[tokens.length - 1], json_1.jsonReplacer)}`);
+        (0, assert_1.guard)(endType === type_1.RawRType.ParenRight, () => `expected a parenthesis at the end of the expression list as well, but ${endType} :: ${JSON.stringify(tokens[tokens.length - 1], json_1.jsonReplacer)}`);
         return {
             segments: [tokens.slice(1, tokens.length - 1)],
             comments,
@@ -120,7 +122,7 @@ function processBraces([start, end], processed, comments, data) {
     const [newStart, newEnd] = [(0, normalize_symbol_1.tryNormalizeSymbol)(data, [start]), (0, normalize_symbol_1.tryNormalizeSymbol)(data, [end])];
     (0, assert_1.guard)(newStart !== undefined && newEnd !== undefined, () => `expected both start and end to be symbols, but ${JSON.stringify(start, json_1.jsonReplacer)} :: ${JSON.stringify(end, json_1.jsonReplacer)}`);
     return {
-        type: "RExpressionList" /* RType.ExpressionList */,
+        type: type_1.RType.ExpressionList,
         children: processed,
         grouping: [newStart, newEnd],
         lexeme: undefined,
@@ -145,7 +147,7 @@ function normalizeExpressions(data, tokens) {
         parsedComments = comments.map(c => (0, normalize_comment_1.normalizeComment)(data, c.content));
         if (segments.length > 1 || braces) {
             const processed = segments.flatMap(s => normalizeExpressions(data, s));
-            (0, assert_1.guard)(!processed.some(x => x.type === "RDelimiter" /* RType.Delimiter */), () => `expected no delimiter tokens in ${JSON.stringify(processed)}`);
+            (0, assert_1.guard)(!processed.some(x => x.type === type_1.RType.Delimiter), () => `expected no delimiter tokens in ${JSON.stringify(processed)}`);
             if (braces) {
                 return [processBraces(braces, processed, parsedComments, data)];
             }
@@ -168,7 +170,6 @@ function normalizeExpressions(data, tokens) {
     }
     return [...parsedComments, ...normalizeMappedWithoutSemicolonBasedOnType(mappedWithName, data)];
 }
-exports.normalizeExpressions = normalizeExpressions;
 function parseNodesWithUnknownType(data, mappedWithName) {
     const parsedNodes = [];
     // used to indicate the new root node of this set of nodes
@@ -178,5 +179,4 @@ function parseNodesWithUnknownType(data, mappedWithName) {
     }
     return parsedNodes;
 }
-exports.parseNodesWithUnknownType = parseNodesWithUnknownType;
 //# sourceMappingURL=normalize-expressions.js.map

package/r-bridge/lang-4.x/ast/parser/xml/internal/structure/normalize-root.js

@@ -1,14 +1,15 @@
 "use strict";
 Object.defineProperty(exports, "__esModule", { value: true });
-exports.normalizeRootObjToAst = void 0;
+exports.normalizeRootObjToAst = normalizeRootObjToAst;
 const input_format_1 = require("../../input-format");
 const normalize_meta_1 = require("../../normalize-meta");
 const normalize_expressions_1 = require("./normalize-expressions");
 const log_1 = require("../../../../../../../util/log");
 const arrays_1 = require("../../../../../../../util/arrays");
+const type_1 = require("../../../../model/type");
 function normalizeRootObjToAst(data, obj) {
-    const exprContent = (0, input_format_1.getKeyGuarded)(obj, "exprlist" /* RawRType.ExpressionList */);
-    (0, normalize_meta_1.assureTokenType)(exprContent, "exprlist" /* RawRType.ExpressionList */);
+    const exprContent = (0, input_format_1.getKeyGuarded)(obj, type_1.RawRType.ExpressionList);
+    (0, normalize_meta_1.assureTokenType)(exprContent, type_1.RawRType.ExpressionList);
     let parsedChildren = [];
     if (input_format_1.childrenKey in exprContent) {
         const children = (0, input_format_1.getKeyGuarded)(exprContent, input_format_1.childrenKey);
@@ -17,9 +18,9 @@ function normalizeRootObjToAst(data, obj) {
     else {
         log_1.log.debug('no children found, assume empty input');
     }
-    const [delimiters, nodes] = (0, arrays_1.partition)(parsedChildren, x => x.type === "RDelimiter" /* RType.Delimiter */ || x.type === "RComment" /* RType.Comment */);
+    const [delimiters, nodes] = (0, arrays_1.partition)(parsedChildren, x => x.type === type_1.RType.Delimiter || x.type === type_1.RType.Comment);
     return {
-        type: "RExpressionList" /* RType.ExpressionList */,
+        type: type_1.RType.ExpressionList,
         children: nodes,
         grouping: undefined,
         lexeme: undefined,
@@ -30,5 +31,4 @@ function normalizeRootObjToAst(data, obj) {
         }
     };
 }
-exports.normalizeRootObjToAst = normalizeRootObjToAst;
 //# sourceMappingURL=normalize-root.js.map

package/r-bridge/lang-4.x/ast/parser/xml/internal/structure/normalize-single-node.js

@@ -1,11 +1,12 @@
 "use strict";
 Object.defineProperty(exports, "__esModule", { value: true });
-exports.normalizeSingleNode = void 0;
+exports.normalizeSingleNode = normalizeSingleNode;
 const normalize_meta_1 = require("../../normalize-meta");
 const input_format_1 = require("../../input-format");
 const normalize_line_directive_1 = require("../other/normalize-line-directive");
 const assert_1 = require("../../../../../../../util/assert");
 const normalize_delimiter_1 = require("./normalize-delimiter");
+const type_1 = require("../../../../model/type");
 const normalize_comment_1 = require("../other/normalize-comment");
 const normalize_expression_1 = require("../expression/normalize-expression");
 const normalize_number_1 = require("../values/normalize-number");
@@ -23,31 +24,31 @@ const normalize_symbol_1 = require("../values/normalize-symbol");
  */
 function normalizeSingleNode(data, elem) {
     switch (elem.name) {
-        case "(" /* RawRType.ParenLeft */:
-        case ")" /* RawRType.ParenRight */:
-        case "{" /* RawRType.BraceLeft */:
-        case "}" /* RawRType.BraceRight */:
+        case type_1.RawRType.ParenLeft:
+        case type_1.RawRType.ParenRight:
+        case type_1.RawRType.BraceLeft:
+        case type_1.RawRType.BraceRight:
             return (0, normalize_delimiter_1.normalizeDelimiter)(elem);
-        case "COMMENT" /* RawRType.Comment */:
+        case type_1.RawRType.Comment:
             return (0, normalize_comment_1.normalizeComment)(data, elem.content);
-        case "LINE_DIRECTIVE" /* RawRType.LineDirective */:
+        case type_1.RawRType.LineDirective:
             return (0, normalize_line_directive_1.normalizeLineDirective)(data, elem.content);
-        case "exprlist" /* RawRType.ExpressionList */:
-        case "expr" /* RawRType.Expression */:
-        case "expr_or_assign_or_help" /* RawRType.ExprOfAssignOrHelp */:
-        case "equal_assign" /* RawRType.LegacyEqualAssign */:
+        case type_1.RawRType.ExpressionList:
+        case type_1.RawRType.Expression:
+        case type_1.RawRType.ExprOfAssignOrHelp:
+        case type_1.RawRType.LegacyEqualAssign:
             return (0, normalize_expression_1.normalizeExpression)(data, elem.content);
-        case "NUM_CONST" /* RawRType.NumericConst */:
+        case type_1.RawRType.NumericConst:
             return (0, normalize_number_1.normalizeNumber)(data, elem.content);
-        case "STR_CONST" /* RawRType.StringConst */:
+        case type_1.RawRType.StringConst:
             return (0, normalize_string_1.normalizeString)(data, elem.content);
-        case "BREAK" /* RawRType.Break */:
+        case type_1.RawRType.Break:
             return (0, normalize_break_1.normalizeBreak)(data, elem.content);
-        case "NEXT" /* RawRType.Next */:
+        case type_1.RawRType.Next:
             return (0, normalize_next_1.normalizeNext)(data, elem.content);
-        case "SYMBOL" /* RawRType.Symbol */:
-        case "SLOT" /* RawRType.Slot */:
-        case "NULL_CONST" /* RawRType.NullConst */: {
+        case type_1.RawRType.Symbol:
+        case type_1.RawRType.Slot:
+        case type_1.RawRType.NullConst: {
             const symbol = (0, normalize_symbol_1.tryNormalizeSymbol)(data, (0, normalize_meta_1.getWithTokenType)([elem.content]));
             (0, assert_1.guard)(symbol !== undefined, () => `should have been parsed to a symbol but was ${JSON.stringify(symbol)}`);
             return symbol;
@@ -56,5 +57,4 @@ function normalizeSingleNode(data, elem) {
             throw new input_format_1.XmlParseError(`unknown type ${elem.name} for ${JSON.stringify(elem)} in ${JSON.stringify(data)}`);
     }
 }
-exports.normalizeSingleNode = normalizeSingleNode;
 //# sourceMappingURL=normalize-single-node.js.map

package/r-bridge/lang-4.x/ast/parser/xml/internal/values/normalize-number.js

@@ -1,8 +1,9 @@
 "use strict";
 Object.defineProperty(exports, "__esModule", { value: true });
-exports.normalizeNumber = void 0;
+exports.normalizeNumber = normalizeNumber;
 const convert_values_1 = require("../../../../../convert-values");
 const normalize_meta_1 = require("../../normalize-meta");
+const type_1 = require("../../../../model/type");
 /**
  * Normalize the given object as a R number (see {@link number2ts}), supporting booleans (see {@link boolean2ts}),
  * and special values.
@@ -27,24 +28,23 @@ function normalizeNumber(data, obj) {
         return {
             ...common,
             namespace: undefined,
-            type: "RSymbol" /* RType.Symbol */,
+            type: type_1.RType.Symbol,
             content
         };
     }
     else if ((0, convert_values_1.isBoolean)(content)) {
         return {
             ...common,
-            type: "RLogical" /* RType.Logical */,
+            type: type_1.RType.Logical,
             content: (0, convert_values_1.boolean2ts)(content)
         };
     }
     else {
         return {
             ...common,
-            type: "RNumber" /* RType.Number */,
+            type: type_1.RType.Number,
             content: (0, convert_values_1.number2ts)(content)
         };
     }
 }
-exports.normalizeNumber = normalizeNumber;
 //# sourceMappingURL=normalize-number.js.map

package/r-bridge/lang-4.x/ast/parser/xml/internal/values/normalize-string.js

@@ -1,9 +1,10 @@
 "use strict";
 Object.defineProperty(exports, "__esModule", { value: true });
-exports.normalizeString = void 0;
+exports.normalizeString = normalizeString;
 const normalize_meta_1 = require("../../normalize-meta");
 const assert_1 = require("../../../../../../../util/assert");
 const convert_values_1 = require("../../../../../convert-values");
+const type_1 = require("../../../../model/type");
 /**
  * Normalize the given object as a R string (see {@link string2ts}).
  * This requires you to check the corresponding name beforehand.
@@ -21,7 +22,7 @@ function normalizeString(data, obj) {
         stringContent = data.currentLexeme;
     }
     return {
-        type: "RString" /* RType.String */,
+        type: type_1.RType.String,
         location,
         content: (0, convert_values_1.string2ts)(stringContent),
         lexeme: stringContent,
@@ -32,5 +33,4 @@ function normalizeString(data, obj) {
         }
     };
 }
-exports.normalizeString = normalizeString;
 //# sourceMappingURL=normalize-string.js.map

package/r-bridge/lang-4.x/ast/parser/xml/internal/values/normalize-symbol.js

@@ -1,6 +1,6 @@
 "use strict";
 Object.defineProperty(exports, "__esModule", { value: true });
-exports.tryNormalizeSymbol = void 0;
+exports.tryNormalizeSymbol = tryNormalizeSymbol;
 const assert_1 = require("../../../../../../../util/assert");
 const parser_1 = require("../../../json/parser");
 const normalize_meta_1 = require("../../normalize-meta");
@@ -36,7 +36,7 @@ function tryNormalizeSymbol(data, objs) {
         return undefined;
     }
     return {
-        type: "RSymbol" /* RType.Symbol */,
+        type: type_1.RType.Symbol,
         namespace,
         location,
         // remove backticks from symbol
@@ -49,5 +49,4 @@ function tryNormalizeSymbol(data, objs) {
         }
     };
 }
-exports.tryNormalizeSymbol = tryNormalizeSymbol;
 //# sourceMappingURL=normalize-symbol.js.map

package/r-bridge/lang-4.x/ast/parser/xml/normalize-meta.js

@@ -1,9 +1,18 @@
 "use strict";
 Object.defineProperty(exports, "__esModule", { value: true });
-exports.ensureExpressionList = exports.ensureChildrenAreLhsAndRhsOrdered = exports.retrieveOpName = exports.getWithTokenType = exports.getTokenType = exports.assureTokenType = exports.retrieveMetaStructure = exports.extractLocation = exports.objectWithArrUnwrap = void 0;
+exports.objectWithArrUnwrap = objectWithArrUnwrap;
+exports.extractLocation = extractLocation;
+exports.retrieveMetaStructure = retrieveMetaStructure;
+exports.assureTokenType = assureTokenType;
+exports.getTokenType = getTokenType;
+exports.getWithTokenType = getWithTokenType;
+exports.retrieveOpName = retrieveOpName;
+exports.ensureChildrenAreLhsAndRhsOrdered = ensureChildrenAreLhsAndRhsOrdered;
+exports.ensureExpressionList = ensureExpressionList;
 const range_1 = require("../../../../../util/range");
 const assert_1 = require("../../../../../util/assert");
 const input_format_1 = require("./input-format");
+const type_1 = require("../../model/type");
 /**
  * if the passed object is an array with only one element, remove the array wrapper
  */
@@ -21,14 +30,12 @@ function objectWithArrUnwrap(obj) {
         throw new input_format_1.XmlParseError(`expected array or object, yet received ${JSON.stringify(obj)}`);
     }
 }
-exports.objectWithArrUnwrap = objectWithArrUnwrap;
 /**
  * given a xml element, extract the source location of the corresponding element in the R-ast
  */
 function extractLocation(ast) {
     return (0, range_1.rangeFrom)(ast['line1'], ast['col1'], ast['line2'], ast['col2']);
 }
-exports.extractLocation = extractLocation;
 /**
  * The json object that represents the input xml contains various meta-information.
  * This function extracts the meta-information and returns it.
@@ -47,14 +54,12 @@ function retrieveMetaStructure(obj) {
         content
     };
 }
-exports.retrieveMetaStructure = retrieveMetaStructure;
 function assureTokenType(obj, expectedName) {
     const name = getTokenType(obj);
     if (name !== expectedName) {
         throw new input_format_1.XmlParseError(`expected name to be ${expectedName}, yet received ${name} for ${JSON.stringify(obj)}`);
     }
 }
-exports.assureTokenType = assureTokenType;
 /**
  * Extract the token-type of the given object. This is based on the knowledge, that all json objects created
  * from the R xml have a name attached.
@@ -64,21 +69,18 @@ exports.assureTokenType = assureTokenType;
 function getTokenType(content) {
     return content[input_format_1.nameKey];
 }
-exports.getTokenType = getTokenType;
 function getWithTokenType(obj) {
     return obj.map(content => ({
         name: getTokenType(content),
         content
     }));
 }
-exports.getWithTokenType = getWithTokenType;
 function retrieveOpName(operator) {
     /*
    * only real arithmetic ops have their operation as their own name, the others identify via content
    */
     return operator.content[input_format_1.contentKey];
 }
-exports.retrieveOpName = retrieveOpName;
 /**
  * Ensure that the first child is completely before the second child.
  *
@@ -92,11 +94,10 @@ function ensureChildrenAreLhsAndRhsOrdered(first, second) {
         throw new input_format_1.XmlParseError(`expected the first child to be the lhs, yet received ${JSON.stringify(first)} & ${JSON.stringify(second)}`);
     }
 }
-exports.ensureChildrenAreLhsAndRhsOrdered = ensureChildrenAreLhsAndRhsOrdered;
 function ensureExpressionList(node) {
-    if (node.type !== "RExpressionList" /* RType.ExpressionList */) {
+    if (node.type !== type_1.RType.ExpressionList) {
         return {
-            type: "RExpressionList" /* RType.ExpressionList */,
+            type: type_1.RType.ExpressionList,
             grouping: undefined,
             location: node.location,
             info: node.info,
@@ -106,5 +107,4 @@ function ensureExpressionList(node) {
     }
     return node;
 }
-exports.ensureExpressionList = ensureExpressionList;
 //# sourceMappingURL=normalize-meta.js.map

package/r-bridge/lang-4.x/convert-values.js

@@ -1,6 +1,12 @@
 "use strict";
 Object.defineProperty(exports, "__esModule", { value: true });
-exports.isNA = exports.RNull = exports.RNa = exports.string2ts = exports.number2ts = exports.RInf = exports.RIntegerMarker = exports.RImaginaryMarker = exports.RNumHexFloatRegex = exports.boolean2ts = exports.isBoolean = exports.RFalse = exports.RTrue = exports.ts2r = void 0;
+exports.RNull = exports.RNa = exports.RInf = exports.RIntegerMarker = exports.RImaginaryMarker = exports.RNumHexFloatRegex = exports.RFalse = exports.RTrue = void 0;
+exports.ts2r = ts2r;
+exports.isBoolean = isBoolean;
+exports.boolean2ts = boolean2ts;
+exports.number2ts = number2ts;
+exports.string2ts = string2ts;
+exports.isNA = isNA;
 class ValueConversionError extends Error {
     constructor(message) {
         super(message);
@@ -43,7 +49,6 @@ function ts2r(value) {
     }
     throw new ValueConversionError(`cannot convert value of type ${typeof value} to R code`);
 }
-exports.ts2r = ts2r;
 /** The R literal for the logical true */
 exports.RTrue = 'TRUE';
 /** The R literal for the logical false */
@@ -51,7 +56,6 @@ exports.RFalse = 'FALSE';
 function isBoolean(value) {
     return value === exports.RTrue || value === exports.RFalse;
 }
-exports.isBoolean = isBoolean;
 function boolean2ts(value) {
     if (value === exports.RTrue) {
         return true;
@@ -61,7 +65,6 @@ function boolean2ts(value) {
     }
     throw new ValueConversionError(`value ${value} is not a legal R boolean`);
 }
-exports.boolean2ts = boolean2ts;
 exports.RNumHexFloatRegex = /^\s*0x(?<intPart>[0-9a-f]+)?(\.(?<floatPart>[0-9a-f]*))?p(?<exp>[-+]?\d+)\s*$/;
 function getDecimalPlacesWithRadix(floatPart, radix) {
     return [...floatPart].reduce((acc, c, idx) => acc + parseInt(c, radix) / (radix ** (idx + 1)), 0);
@@ -113,7 +116,6 @@ function number2ts(value) {
         };
     }
 }
-exports.number2ts = number2ts;
 /**
  * Convert a valid R string into a {@link RStringValue}.
  *
@@ -147,11 +149,9 @@ function string2ts(value) {
         throw new ValueConversionError(`expected string to start with a known quote (' or "), or raw, yet received ${value}`);
     }
 }
-exports.string2ts = string2ts;
 exports.RNa = 'NA';
 exports.RNull = 'NULL';
 function isNA(value) {
     return value === exports.RNa;
 }
-exports.isNA = isNA;
 //# sourceMappingURL=convert-values.js.map

package/r-bridge/retriever.js

@@ -3,7 +3,16 @@ var __importDefault = (this && this.__importDefault) || function (mod) {
     return (mod && mod.__esModule) ? mod : { "default": mod };
 };
 Object.defineProperty(exports, "__esModule", { value: true });
-exports.retrieveNumberOfRTokensOfLastParse = exports.removeRQuotes = exports.retrieveNormalizedAstFromRCode = exports.retrieveParseDataFromRCode = exports.isEmptyRequest = exports.requestFingerprint = exports.requestProviderFromText = exports.requestProviderFromFile = exports.requestFromInput = exports.fileProtocol = void 0;
+exports.fileProtocol = void 0;
+exports.requestFromInput = requestFromInput;
+exports.requestProviderFromFile = requestProviderFromFile;
+exports.requestProviderFromText = requestProviderFromText;
+exports.requestFingerprint = requestFingerprint;
+exports.isEmptyRequest = isEmptyRequest;
+exports.retrieveParseDataFromRCode = retrieveParseDataFromRCode;
+exports.retrieveNormalizedAstFromRCode = retrieveNormalizedAstFromRCode;
+exports.removeRQuotes = removeRQuotes;
+exports.retrieveNumberOfRTokensOfLastParse = retrieveNumberOfRTokensOfLastParse;
 const strings_1 = require("../util/strings");
 const assert_1 = require("../util/assert");
 const shell_executor_1 = require("./shell-executor");
@@ -11,6 +20,7 @@ const object_hash_1 = __importDefault(require("object-hash"));
 const parser_1 = require("./lang-4.x/ast/parser/json/parser");
 const init_1 = require("./init");
 const convert_values_1 = require("./lang-4.x/convert-values");
+const type_1 = require("./lang-4.x/ast/model/type");
 exports.fileProtocol = 'file://';
 /**
  * Creates a {@link RParseRequests} from a given input.
@@ -29,7 +39,6 @@ function requestFromInput(input) {
         content: file ? content.slice(7) : content
     };
 }
-exports.requestFromInput = requestFromInput;
 function requestProviderFromFile() {
     return {
         createRequest(path) {
@@ -40,7 +49,6 @@ function requestProviderFromFile() {
         }
     };
 }
-exports.requestProviderFromFile = requestProviderFromFile;
 function requestProviderFromText(text) {
     return {
         createRequest(path) {
@@ -51,15 +59,12 @@ function requestProviderFromText(text) {
         }
     };
 }
-exports.requestProviderFromText = requestProviderFromText;
 function requestFingerprint(request) {
     return (0, object_hash_1.default)(request);
 }
-exports.requestFingerprint = requestFingerprint;
 function isEmptyRequest(request) {
     return request.content.trim().length === 0;
 }
-exports.isEmptyRequest = isEmptyRequest;
 /**
  * Provides the capability to parse R files/R code using the R parser.
  * Depends on {@link RShell} to provide a connection to R.
@@ -81,7 +86,6 @@ function retrieveParseDataFromRCode(request, shell) {
         return shell.sendCommandWithOutput(command).then(result => guardRetrievedOutput(result.join(shell.options.eol), request));
     }
 }
-exports.retrieveParseDataFromRCode = retrieveParseDataFromRCode;
 /**
  * Uses {@link retrieveParseDataFromRCode} and returns the nicely formatted object-AST.
  * If successful, allows further querying the last result with {@link retrieveNumberOfRTokensOfLastParse}.
@@ -90,7 +94,6 @@ async function retrieveNormalizedAstFromRCode(request, shell) {
     const data = await retrieveParseDataFromRCode(request, shell);
     return (0, parser_1.normalize)(data);
 }
-exports.retrieveNormalizedAstFromRCode = retrieveNormalizedAstFromRCode;
 /**
  * If the string has (R-)quotes around it, they will be removed; otherwise the string is returned unchanged.
  */
@@ -102,17 +105,15 @@ function removeRQuotes(str) {
         return str;
     }
 }
-exports.removeRQuotes = removeRQuotes;
 /**
  * Needs to be called *after*  {@link retrieveParseDataFromRCode} (or {@link retrieveNormalizedAstFromRCode})
  */
 async function retrieveNumberOfRTokensOfLastParse(shell, ignoreComments = false) {
-    const rows = ignoreComments ? `flowr_output[flowr_output$token != "${"COMMENT" /* RawRType.Comment */}", ]` : 'flowr_output';
+    const rows = ignoreComments ? `flowr_output[flowr_output$token != "${type_1.RawRType.Comment}", ]` : 'flowr_output';
     const result = await shell.sendCommandWithOutput(`cat(nrow(${rows}),${(0, convert_values_1.ts2r)(shell.options.eol)})`);
     (0, assert_1.guard)(result.length === 1, () => `expected exactly one line to obtain the number of R tokens, but got: ${JSON.stringify(result)}`);
     return Number(result[0]);
 }
-exports.retrieveNumberOfRTokensOfLastParse = retrieveNumberOfRTokensOfLastParse;
 function guardRetrievedOutput(output, request) {
     (0, assert_1.guard)(output !== init_1.ErrorMarker, () => `unable to parse R code (see the log for more information) for request ${JSON.stringify(request)}}`);
     return output;

package/r-bridge/shell.d.ts

@@ -1,4 +1,3 @@
-/// <reference types="node" />
 import { type MergeableRecord } from '../util/objects';
 import type { SemVer } from 'semver';
 import type { AsyncOrSync } from 'ts-essentials';

package/r-bridge/shell.js

@@ -333,7 +333,12 @@ class RShellSession {
         if (filesToUnlink !== undefined) {
             log_1.log.info(`unlinking ${filesToUnlink.length} files (${JSON.stringify(filesToUnlink)})`);
             for (const f of filesToUnlink) {
-                fs_1.default.rmSync(f, { recursive: true, force: true });
+                try {
+                    fs_1.default.rmSync(f, { recursive: true, force: true });
+                }
+                catch (e) {
+                    log_1.log.error(`failed to unlink file ${f}`);
+                }
             }
         }
         const killResult = this.bareSession.kill();

package/reconstruct/auto-select/auto-select-defaults.js

@@ -1,11 +1,10 @@
 "use strict";
 Object.defineProperty(exports, "__esModule", { value: true });
-exports.doNotAutoSelect = void 0;
+exports.doNotAutoSelect = doNotAutoSelect;
 /**
  * A variant of the {@link AutoSelectPredicate} which does not select any additional statements (~> false)
  */
 function doNotAutoSelect(_node) {
     return false;
 }
-exports.doNotAutoSelect = doNotAutoSelect;
 //# sourceMappingURL=auto-select-defaults.js.map

package/reconstruct/auto-select/magic-comments.js

@@ -1,7 +1,8 @@
 "use strict";
 Object.defineProperty(exports, "__esModule", { value: true });
-exports.makeMagicCommentHandler = void 0;
+exports.makeMagicCommentHandler = makeMagicCommentHandler;
 const visitor_1 = require("../../r-bridge/lang-4.x/ast/model/processing/visitor");
+const type_1 = require("../../r-bridge/lang-4.x/ast/model/type");
 const assert_1 = require("../../util/assert");
 function getLoc({ location, info: { fullRange } }) {
     const loc = location ?? fullRange;
@@ -58,7 +59,7 @@ function makeMagicCommentHandler(and) {
                     return;
                 }
                 for (const c of comments) {
-                    if (c.type !== "RComment" /* RType.Comment */ || !c.content.startsWith(' flowr@')) {
+                    if (c.type !== type_1.RType.Comment || !c.content.startsWith(' flowr@')) {
                         continue;
                     }
                     const match = commentTriggerRegex.exec(c.content);
@@ -82,5 +83,4 @@ function makeMagicCommentHandler(and) {
         return and?.(node, normalizedAst) ?? false;
     };
 }
-exports.makeMagicCommentHandler = makeMagicCommentHandler;
 //# sourceMappingURL=magic-comments.js.map

package/reconstruct/reconstruct.js

@@ -5,9 +5,11 @@
  * @module
  */
 Object.defineProperty(exports, "__esModule", { value: true });
-exports.reconstructToCode = exports.reconstructLogger = void 0;
+exports.reconstructLogger = void 0;
+exports.reconstructToCode = reconstructToCode;
 const log_1 = require("../util/log");
 const assert_1 = require("../util/assert");
+const type_1 = require("../r-bridge/lang-4.x/ast/model/type");
 const r_function_call_1 = require("../r-bridge/lang-4.x/ast/model/nodes/r-function-call");
 const stateful_fold_1 = require("../r-bridge/lang-4.x/ast/model/processing/stateful-fold");
 const auto_select_defaults_1 = require("./auto-select/auto-select-defaults");
@@ -102,7 +104,7 @@ function reconstructBinaryOp(n, lhs, rhs, config) {
             return lhs;
         }
     }
-    return reconstructRawBinaryOperator(lhs, n.type === "RPipe" /* RType.Pipe */ ? '|>' : n.operator, rhs);
+    return reconstructRawBinaryOperator(lhs, n.type === type_1.RType.Pipe ? '|>' : n.operator, rhs);
 }
 function reconstructForLoop(loop, variable, vector, body, config) {
     if (!isSelected(config, loop) && variable.length === 0 && vector.length === 0) {
@@ -444,5 +446,4 @@ function reconstructToCode(ast, selection, autoSelectIf = auto_select_defaults_1
     (0, log_1.expensiveTrace)(exports.reconstructLogger, () => `reconstructed ast before string conversion: ${JSON.stringify(result)}`);
     return removeOuterExpressionListIfApplicable(result, linesWithAutoSelected.size);
 }
-exports.reconstructToCode = reconstructToCode;
 //# sourceMappingURL=reconstruct.js.map

package/slicing/criterion/collect-all.js

@@ -1,6 +1,6 @@
 "use strict";
 Object.defineProperty(exports, "__esModule", { value: true });
-exports.collectAllSlicingCriteria = void 0;
+exports.collectAllSlicingCriteria = collectAllSlicingCriteria;
 const assert_1 = require("../../util/assert");
 const arrays_1 = require("../../util/arrays");
 const r_function_call_1 = require("../../r-bridge/lang-4.x/ast/model/nodes/r-function-call");
@@ -23,5 +23,4 @@ function* collectAllSlicingCriteria(ast, filter) {
         }
     }
 }
-exports.collectAllSlicingCriteria = collectAllSlicingCriteria;
 //# sourceMappingURL=collect-all.js.map

package/slicing/criterion/parse.d.ts

@@ -1,7 +1,7 @@
 import { type NodeId } from '../../r-bridge/lang-4.x/ast/model/processing/node-id';
 import type { AstIdMap } from '../../r-bridge/lang-4.x/ast/model/processing/decorate';
 /** Either `line:column`, `line@variable-name`, or `$id` */
-export type SingleSlicingCriterion = `${number}:${number}` | `${number}@${string}` | `$${number}`;
+export type SingleSlicingCriterion = `${number}:${number}` | `${number}@${string}` | `$${NodeId}`;
 export type SlicingCriteria = SingleSlicingCriterion[];
 /**
  * Thrown if the given slicing criteria can not be found