@abaplint/transpiler 2.7.75 → 2.7.77

package/build/src/expressions/compare.js

@@ -43,10 +43,13 @@ class CompareTranspiler {
                 return new chunk_1.Chunk().appendString(pre + "INPUT && INPUT." + concat.replace(" IS NOT SUPPLIED", "").toLowerCase() + " === undefined");
             }
             if (concat.endsWith(" IS REQUESTED")) {
-                return new chunk_1.Chunk().appendString(pre + "INPUT && INPUT." + concat.replace(" IS REQUESTED", "").toLowerCase());
+                const field = concat.replace(" IS REQUESTED", "").toLowerCase();
+                // yea, for function modules the naming is revereed, using "importing"
+                return new chunk_1.Chunk().appendString(pre + "INPUT && (INPUT." + field + " || INPUT.importing." + field + ")");
             }
             else if (concat.endsWith(" IS NOT REQUESTED")) {
-                return new chunk_1.Chunk().appendString(pre + "INPUT && INPUT." + concat.replace(" IS NOT REQUESTED", "").toLowerCase() + " === undefined");
+                const field = concat.replace(" IS NOT REQUESTED", "").toLowerCase();
+                return new chunk_1.Chunk().appendString(pre + "INPUT && INPUT." + field + " === undefined && INPUT.importing." + field + " === undefined");
             }
             if (concat.startsWith("NOT ") || concat.includes(" IS NOT INSTANCE OF ")) {
                 const cname = (_a = node.findDirectExpression(core_1.Expressions.ClassName)) === null || _a === void 0 ? void 0 : _a.concatTokens();

package/build/src/statements/compute.d.ts

@@ -0,0 +1,7 @@
+import * as abaplint from "@abaplint/core";
+import { IStatementTranspiler } from "./_statement_transpiler";
+import { Traversal } from "../traversal";
+import { Chunk } from "../chunk";
+export declare class ComputeTranspiler implements IStatementTranspiler {
+    transpile(node: abaplint.Nodes.StatementNode, traversal: Traversal): Chunk;
+}

package/build/src/statements/compute.js

@@ -0,0 +1,25 @@
+"use strict";
+Object.defineProperty(exports, "__esModule", { value: true });
+exports.ComputeTranspiler = void 0;
+const abaplint = require("@abaplint/core");
+const chunk_1 = require("../chunk");
+class ComputeTranspiler {
+    transpile(node, traversal) {
+        let source = traversal.traverse(node.findDirectExpression(abaplint.Expressions.Source));
+        const targets = [];
+        for (const t of node.findDirectExpressions(abaplint.Expressions.Target)) {
+            targets.push(traversal.traverse(t));
+        }
+        const ret = new chunk_1.Chunk();
+        for (const target of targets.reverse()) {
+            ret.appendChunk(target)
+                .appendString(".set(")
+                .appendChunk(source)
+                .append(");", node.getLastToken(), traversal);
+            source = target;
+        }
+        return ret;
+    }
+}
+exports.ComputeTranspiler = ComputeTranspiler;
+//# sourceMappingURL=compute.js.map

package/build/src/statements/index.d.ts

@@ -15,6 +15,7 @@ export * from "./call_transformation";
 export * from "./call";
 export * from "./case";
 export * from "./check";
+export * from "./compute";
 export * from "./class_deferred";
 export * from "./class_definition_load";
 export * from "./class_implementation";

package/build/src/statements/index.js

@@ -31,6 +31,7 @@ __exportStar(require("./call_transformation"), exports);
 __exportStar(require("./call"), exports);
 __exportStar(require("./case"), exports);
 __exportStar(require("./check"), exports);
+__exportStar(require("./compute"), exports);
 __exportStar(require("./class_deferred"), exports);
 __exportStar(require("./class_definition_load"), exports);
 __exportStar(require("./class_implementation"), exports);

package/build/src/validation.js

@@ -69,7 +69,6 @@ exports.config = {
         "form_no_dash": true,
         "omit_preceding_zeros": true,
         "obsolete_statement": {
-            "compute": true,
             "setExtended": true,
         },
         "forbidden_identifier": {

package/package.json

@@ -1,6 +1,6 @@
 {
   "name": "@abaplint/transpiler",
-  "version": "2.7.75",
+  "version": "2.7.77",
   "description": "Transpiler",
   "main": "build/src/index.js",
   "typings": "build/src/index.d.ts",
@@ -29,7 +29,7 @@
   "author": "abaplint",
   "license": "MIT",
   "dependencies": {
-    "@abaplint/core": "^2.102.23",
+    "@abaplint/core": "^2.102.25",
     "source-map": "^0.7.4"
   },
   "devDependencies": {