diff options
Diffstat (limited to 'subx/apps/subx-common.subx')
-rw-r--r-- | subx/apps/subx-common.subx | 4 |
1 files changed, 2 insertions, 2 deletions
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 |