From 1e4f110f075cd50fbf394c31bca70cb73d52a728 Mon Sep 17 00:00:00 2001 From: Kartik Agaram Date: Wed, 10 Jul 2019 09:54:21 -0700 Subject: . Another batch of incorrectly signed conditional jumps. (Follow-up to commit 5180.) --- subx/apps/assort | Bin 32098 -> 32098 bytes subx/apps/assort.subx | 2 +- subx/apps/dquotes | Bin 38451 -> 38451 bytes subx/apps/dquotes.subx | 4 ++-- subx/apps/pack | Bin 44464 -> 44464 bytes subx/apps/subx-common.subx | 4 ++-- subx/apps/survey | Bin 38602 -> 38602 bytes 7 files changed, 5 insertions(+), 5 deletions(-) (limited to 'subx/apps') diff --git a/subx/apps/assort b/subx/apps/assort index 0f9d62ac..dc437fba 100755 Binary files a/subx/apps/assort and b/subx/apps/assort differ diff --git a/subx/apps/assort.subx b/subx/apps/assort.subx index 372cf663..70d6a9e5 100644 --- a/subx/apps/assort.subx +++ b/subx/apps/assort.subx @@ -763,7 +763,7 @@ write-segments: # out : (address buffered-file), table : (address stream {strin $write-segments:loop: # if (curr >= max) break 39/compare 3/mod/direct 6/rm32/ESI . . . 2/r32/EDX . . # compare ESI with EDX - 7d/jump-if-greater-or-equal $write-segments:break/disp8 + 73/jump-if-greater-or-equal-unsigned $write-segments:break/disp8 # stream/EAX = table[i].stream 8b/copy 1/mod/*+disp8 6/rm32/ESI . . . 0/r32/EAX 4/disp8 . # copy *(ESI+4) to EAX # write-stream-data(out, stream) diff --git a/subx/apps/dquotes b/subx/apps/dquotes index 5eb5fac2..c803fa9e 100755 Binary files a/subx/apps/dquotes and b/subx/apps/dquotes differ diff --git a/subx/apps/dquotes.subx b/subx/apps/dquotes.subx index 0060e55c..85a42f53 100644 --- a/subx/apps/dquotes.subx +++ b/subx/apps/dquotes.subx @@ -908,7 +908,7 @@ $emit-string-literal-data:loop-init: $emit-string-literal-data:loop: # if (curr >= max) break 39/compare 3/mod/direct 2/rm32/EDX . . . 6/r32/ESI . . # compare EDX with ESI - 7d/jump-if-greater-or-equal $emit-string-literal-data:end/disp8 + 73/jump-if-greater-or-equal-unsigned $emit-string-literal-data:end/disp8 # CL = *curr 8a/copy-byte 0/mod/indirect 2/rm32/EDX . . . 1/r32/CL . . # copy byte at *EDX to CL # if (ECX == '"') break @@ -921,7 +921,7 @@ $emit-string-literal-data:loop: 42/increment-EDX # . if (curr >= max) break 39/compare 3/mod/direct 2/rm32/EDX . . . 6/r32/ESI . . # compare EDX with ESI - 7d/jump-if-greater-or-equal $emit-string-literal-data:end/disp8 + 73/jump-if-greater-or-equal-unsigned $emit-string-literal-data:end/disp8 # . CL = *curr 8a/copy-byte 0/mod/indirect 2/rm32/EDX . . . 1/r32/CL . . # copy byte at *EDX to CL $emit-string-literal-data:emit: diff --git a/subx/apps/pack b/subx/apps/pack index 4ab2bc00..8eff81dd 100755 Binary files a/subx/apps/pack and b/subx/apps/pack differ diff --git a/subx/apps/subx-common.subx b/subx/apps/subx-common.subx index 5ddc8cb2..e8b3140c 100644 --- a/subx/apps/subx-common.subx +++ b/subx/apps/subx-common.subx @@ -45,7 +45,7 @@ get-or-insert: # table : (address stream {string, _}), key : (address string), $get-or-insert:search-loop: # if (curr >= max) break 39/compare 3/mod/direct 1/rm32/ECX . . . 2/r32/EDX . . # compare ECX with EDX - 7d/jump-if-greater-or-equal $get-or-insert:not-found/disp8 + 73/jump-if-greater-or-equal-unsigned $get-or-insert:not-found/disp8 # if (string-equal?(key, *curr)) return curr+4 # . EAX = string-equal?(key, *curr) # . . push args @@ -1651,7 +1651,7 @@ is-valid-name?: # in : (address slice) -> EAX : boolean $is-valid-name?:check0: # if (start >= end) return false 39/compare 3/mod/direct 1/rm32/ECX . . . 0/r32/EAX . . # compare ECX with EAX - 7d/jump-if-greater-or-equal $is-valid-name?:false/disp8 + 73/jump-if-greater-or-equal-unsigned $is-valid-name?:false/disp8 $is-valid-name?:check1: # EAX -= ECX 29/subtract 3/mod/direct 0/rm32/EAX . . . 1/r32/ECX . . # subtract ECX from EAX diff --git a/subx/apps/survey b/subx/apps/survey index 8c22fd33..9290e1ae 100755 Binary files a/subx/apps/survey and b/subx/apps/survey differ -- cgit 1.4.1-2-gfad0