Use more specific type for string length

src/compiler/irgen.js

@@ -344,7 +344,7 @@ class ScriptTreeGenerator {
                 right: this.descendInputOfBlock(block, 'STRING2').toType(InputType.STRING)
             });
         case 'operator_length':
-            return new IntermediateInput(InputOpcode.OP_LENGTH, InputType.NUMBER_REAL, {
+            return new IntermediateInput(InputOpcode.OP_LENGTH, InputType.NUMBER_POS_INT | InputType.NUMBER_ZERO, {
                 string: this.descendInputOfBlock(block, 'STRING').toType(InputType.STRING)
             });
         case 'operator_letter_of':

test/snapshot/__snapshots__/tw-simple-string-operations.sb3.tw-snapshot

@@ -0,0 +1,36 @@
+// TW Snapshot
+// Input SHA-256: e6a6f5ea252886949eab2f4b5608526dc3686160d65f6e07c2d864c82db24326
+
+// Sprite1 script
+(function factoryXYZ(thread) { const target = thread.target; const runtime = target.runtime; const stage = runtime.getTargetForStage();
+const b0 = runtime.getOpcodeFunction("looks_say");
+const b1 = stage.variables["PJl9-2GypE.OstQk*B_*"];
+return function* genXYZ () {
+yield* executeInCompatibilityLayer({"MESSAGE":"plan 1",}, b0, false, false, "d", null);
+thread.procedures["Wa"]();
+if ((b1.value.toLowerCase() === "babab".toLowerCase())) {
+yield* executeInCompatibilityLayer({"MESSAGE":"pass",}, b0, false, false, "s", null);
+}
+yield* executeInCompatibilityLayer({"MESSAGE":"end",}, b0, false, false, "q", null);
+retire(); return;
+}; })
+
+// Sprite1 Wa
+(function factoryXYZ(thread) { const target = thread.target; const runtime = target.runtime; const stage = runtime.getTargetForStage();
+const b0 = stage.variables["uEt-Ix{%|r3`}-W%+kdm"];
+const b1 = stage.variables["PJl9-2GypE.OstQk*B_*"];
+const b2 = stage.variables["`jEk@4|i[#Fk?(8x)AV.-my variable"];
+return function funXYZ_a () {
+b0.value = "ababa";
+b1.value = "";
+b2.value = 1;
+for (var a0 = ("" + b0.value).length; a0 > 0; a0--) {
+if ((((("" + b0.value))[(b2.value | 0) - 1] || "").toLowerCase() === "a".toLowerCase())) {
+b1.value = (("" + b1.value) + "b");
+} else {
+b1.value = (("" + b1.value) + "a");
+}
+b2.value = (b2.value + 1);
+}
+return "";
+}; })

test/snapshot/__snapshots__/warp-timer/tw-simple-string-operations.sb3.tw-snapshot

@@ -0,0 +1,37 @@
+// TW Snapshot
+// Input SHA-256: e6a6f5ea252886949eab2f4b5608526dc3686160d65f6e07c2d864c82db24326
+
+// Sprite1 script
+(function factoryXYZ(thread) { const target = thread.target; const runtime = target.runtime; const stage = runtime.getTargetForStage();
+const b0 = runtime.getOpcodeFunction("looks_say");
+const b1 = stage.variables["PJl9-2GypE.OstQk*B_*"];
+return function* genXYZ () {
+yield* executeInCompatibilityLayer({"MESSAGE":"plan 1",}, b0, false, false, "d", null);
+yield* thread.procedures["Wa"]();
+if ((("" + b1.value).toLowerCase() === "babab".toLowerCase())) {
+yield* executeInCompatibilityLayer({"MESSAGE":"pass",}, b0, false, false, "s", null);
+}
+yield* executeInCompatibilityLayer({"MESSAGE":"end",}, b0, false, false, "q", null);
+retire(); return;
+}; })
+
+// Sprite1 Wa
+(function factoryXYZ(thread) { const target = thread.target; const runtime = target.runtime; const stage = runtime.getTargetForStage();
+const b0 = stage.variables["uEt-Ix{%|r3`}-W%+kdm"];
+const b1 = stage.variables["PJl9-2GypE.OstQk*B_*"];
+const b2 = stage.variables["`jEk@4|i[#Fk?(8x)AV.-my variable"];
+return function* genXYZ_a () {
+b0.value = "ababa";
+b1.value = "";
+b2.value = 1;
+for (var a0 = ("" + b0.value).length; a0 > 0; a0--) {
+if ((((("" + b0.value))[((+b2.value) | 0) - 1] || "").toLowerCase() === "a".toLowerCase())) {
+b1.value = (("" + b1.value) + "b");
+} else {
+b1.value = (("" + b1.value) + "a");
+}
+b2.value = ((+b2.value || 0) + 1);
+if (isStuck()) yield;
+}
+return "";
+}; })