@abaplint/runtime 2.1.86 → 2.1.88

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

@@ -11,6 +11,9 @@ export * from "./gt";
 export * from "./initial";
 export * from "./le";
 export * from "./lt";
+export * from "./o";
+export * from "./z";
+export * from "./m";
 export * from "./ne";
 export * from "./na";
 export * from "./ns";

package/build/src/compare/index.js

@@ -28,6 +28,9 @@ __exportStar(require("./gt"), exports);
 __exportStar(require("./initial"), exports);
 __exportStar(require("./le"), exports);
 __exportStar(require("./lt"), exports);
+__exportStar(require("./o"), exports);
+__exportStar(require("./z"), exports);
+__exportStar(require("./m"), exports);
 __exportStar(require("./ne"), exports);
 __exportStar(require("./na"), exports);
 __exportStar(require("./ns"), exports);

package/build/src/compare/m.d.ts

@@ -0,0 +1,3 @@
+import { Hex, XString } from "../types";
+export declare function hexToBinary(input: Hex | XString): string;
+export declare function m(operand1: Hex | XString, operand2: Hex | XString): boolean;

package/build/src/compare/m.js

@@ -0,0 +1,38 @@
+"use strict";
+Object.defineProperty(exports, "__esModule", { value: true });
+exports.m = exports.hexToBinary = void 0;
+function hexToBinary(input) {
+    let ret = "";
+    const hex = input.get();
+    for (let index = 0; index < hex.length / 2; index++) {
+        const byte = hex.substring(index * 2, index * 2 + 2);
+        ret += parseInt(byte, 16).toString(2).padStart(8, "0");
+    }
+    return ret;
+}
+exports.hexToBinary = hexToBinary;
+// bitwise compare
+function m(operand1, operand2) {
+    let operand1Bits = hexToBinary(operand1);
+    const operand2Bits = hexToBinary(operand2);
+    if (operand1Bits.length < operand2Bits.length) {
+        operand1Bits = operand1Bits.padEnd(operand2Bits.length, "0");
+    }
+    let oneFound = false;
+    let zeroFound = false;
+    for (let index = 0; index < operand2Bits.length; index++) {
+        const o1bit = operand1Bits.substring(index, index + 1);
+        const o2bit = operand2Bits.substring(index, index + 1);
+        if (o2bit === "1") {
+            if (o1bit === "1") {
+                oneFound = true;
+            }
+            else {
+                zeroFound = true;
+            }
+        }
+    }
+    return oneFound && zeroFound;
+}
+exports.m = m;
+//# sourceMappingURL=m.js.map

package/build/src/compare/o.d.ts

@@ -0,0 +1,2 @@
+import { Hex, XString } from "../types";
+export declare function o(operand1: Hex | XString, operand2: Hex | XString): boolean;

package/build/src/compare/o.js

@@ -0,0 +1,29 @@
+"use strict";
+Object.defineProperty(exports, "__esModule", { value: true });
+exports.o = void 0;
+const m_1 = require("./m");
+// bitwise compare
+function o(operand1, operand2) {
+    let operand1Bits = (0, m_1.hexToBinary)(operand1);
+    const operand2Bits = (0, m_1.hexToBinary)(operand2);
+    if (operand1Bits.length < operand2Bits.length) {
+        operand1Bits = operand1Bits.padEnd(operand2Bits.length, "0");
+    }
+    //  let oneFound = false;
+    let zeroFound = false;
+    for (let index = 0; index < operand2Bits.length; index++) {
+        const o1bit = operand1Bits.substring(index, index + 1);
+        const o2bit = operand2Bits.substring(index, index + 1);
+        if (o2bit === "1") {
+            if (o1bit === "1") {
+                //        oneFound = true;
+            }
+            else {
+                zeroFound = true;
+            }
+        }
+    }
+    return zeroFound === false;
+}
+exports.o = o;
+//# sourceMappingURL=o.js.map

package/build/src/compare/z.d.ts

@@ -0,0 +1,2 @@
+import { Hex, XString } from "../types";
+export declare function z(operand1: Hex | XString, operand2: Hex | XString): boolean;

package/build/src/compare/z.js

@@ -0,0 +1,29 @@
+"use strict";
+Object.defineProperty(exports, "__esModule", { value: true });
+exports.z = void 0;
+const m_1 = require("./m");
+// bitwise compare
+function z(operand1, operand2) {
+    let operand1Bits = (0, m_1.hexToBinary)(operand1);
+    const operand2Bits = (0, m_1.hexToBinary)(operand2);
+    if (operand1Bits.length < operand2Bits.length) {
+        operand1Bits = operand1Bits.padEnd(operand2Bits.length, "0");
+    }
+    let oneFound = false;
+    //  let zeroFound = false;
+    for (let index = 0; index < operand2Bits.length; index++) {
+        const o1bit = operand1Bits.substring(index, index + 1);
+        const o2bit = operand2Bits.substring(index, index + 1);
+        if (o2bit === "1") {
+            if (o1bit === "1") {
+                oneFound = true;
+            }
+            else {
+                //        zeroFound = true;
+            }
+        }
+    }
+    return oneFound === false;
+}
+exports.z = z;
+//# sourceMappingURL=z.js.map

package/package.json

@@ -1,6 +1,6 @@
 {
   "name": "@abaplint/runtime",
-  "version": "2.1.86",
+  "version": "2.1.88",
   "description": "Transpiler - Runtime",
   "main": "build/src/index.js",
   "typings": "build/src/index.d.ts",