diff options
Diffstat (limited to 'apps')
-rwxr-xr-x | apps/assort | bin | 40720 -> 40786 bytes | |||
-rwxr-xr-x | apps/braces | bin | 42414 -> 42480 bytes | |||
-rwxr-xr-x | apps/calls | bin | 47075 -> 47141 bytes | |||
-rwxr-xr-x | apps/crenshaw2-1 | bin | 40128 -> 40194 bytes | |||
-rwxr-xr-x | apps/crenshaw2-1b | bin | 40675 -> 40741 bytes | |||
-rwxr-xr-x | apps/dquotes | bin | 44370 -> 44436 bytes | |||
-rwxr-xr-x | apps/factorial | bin | 39147 -> 39213 bytes | |||
-rwxr-xr-x | apps/handle | bin | 40045 -> 40111 bytes | |||
-rwxr-xr-x | apps/hex | bin | 42967 -> 43033 bytes | |||
-rwxr-xr-x | apps/mu | bin | 175011 -> 175077 bytes | |||
-rwxr-xr-x | apps/pack | bin | 53112 -> 53178 bytes | |||
-rw-r--r-- | apps/pack.subx | 32 | ||||
-rwxr-xr-x | apps/sigils | bin | 54799 -> 54865 bytes | |||
-rwxr-xr-x | apps/survey | bin | 49961 -> 50027 bytes | |||
-rw-r--r-- | apps/survey.subx | 8 | ||||
-rwxr-xr-x | apps/tests | bin | 39518 -> 39584 bytes |
16 files changed, 20 insertions, 20 deletions
diff --git a/apps/assort b/apps/assort index 413fd903..ad67e870 100755 --- a/apps/assort +++ b/apps/assort Binary files differdiff --git a/apps/braces b/apps/braces index 541ea51f..75b5bb60 100755 --- a/apps/braces +++ b/apps/braces Binary files differdiff --git a/apps/calls b/apps/calls index 7f81b966..f3a19461 100755 --- a/apps/calls +++ b/apps/calls Binary files differdiff --git a/apps/crenshaw2-1 b/apps/crenshaw2-1 index 38762989..42014298 100755 --- a/apps/crenshaw2-1 +++ b/apps/crenshaw2-1 Binary files differdiff --git a/apps/crenshaw2-1b b/apps/crenshaw2-1b index edd330ff..545f40dc 100755 --- a/apps/crenshaw2-1b +++ b/apps/crenshaw2-1b Binary files differdiff --git a/apps/dquotes b/apps/dquotes index 8edb4c6d..c80d9a68 100755 --- a/apps/dquotes +++ b/apps/dquotes Binary files differdiff --git a/apps/factorial b/apps/factorial index 5fd210cd..a20ad54b 100755 --- a/apps/factorial +++ b/apps/factorial Binary files differdiff --git a/apps/handle b/apps/handle index 8ec603e8..90c03d05 100755 --- a/apps/handle +++ b/apps/handle Binary files differdiff --git a/apps/hex b/apps/hex index 7fe1537d..53408364 100755 --- a/apps/hex +++ b/apps/hex Binary files differdiff --git a/apps/mu b/apps/mu index bdc8bc4f..2683e057 100755 --- a/apps/mu +++ b/apps/mu Binary files differdiff --git a/apps/pack b/apps/pack index 44f51c28..3aa8caa3 100755 --- a/apps/pack +++ b/apps/pack Binary files differdiff --git a/apps/pack.subx b/apps/pack.subx index f9f81127..076c880c 100644 --- a/apps/pack.subx +++ b/apps/pack.subx @@ -2259,13 +2259,13 @@ emit-modrm: # line: (addr stream byte), out: (addr buffered-file) # if (slice-empty?(word-slice)) break # if (slice-starts-with?(word-slice, "#")) break # if (has-metadata?(word-slice, "mod")) - # mod = parse-hex-int(next-token-from-slice(word-slice, "/")) + # mod = parse-hex-int-from-slice(next-token-from-slice(word-slice, "/")) # has-modrm? = true # else if (has-metadata?(word-slice, "rm32")) - # rm32 = parse-hex-int(next-token-from-slice(word-slice, "/")) + # rm32 = parse-hex-int-from-slice(next-token-from-slice(word-slice, "/")) # has-modrm? = true # else if (has-metadata?(word-slice, "r32") or has-metadata?(word-slice, "subop")) - # r32 = parse-hex-int(next-token-from-slice(word-slice, "/")) + # r32 = parse-hex-int-from-slice(next-token-from-slice(word-slice, "/")) # has-modrm? = true # if has-modrm? # var modrm = mod & 0b11 @@ -2426,7 +2426,7 @@ $emit-modrm:check-for-mod: 3d/compare-eax-and 0/imm32/false 74/jump-if-= $emit-modrm:check-for-rm32/disp8 $emit-modrm:mod: - # mod = parse-hex-int(next-token-from-slice(word-slice->start, word-slice->end, '/')) + # mod = parse-hex-int-from-slice(next-token-from-slice(word-slice->start, word-slice->end, '/')) # . eax = parse-datum-of-word(word-slice) # . . push args 51/push-ecx @@ -2454,7 +2454,7 @@ $emit-modrm:check-for-rm32: 3d/compare-eax-and 0/imm32/false 74/jump-if-= $emit-modrm:check-for-r32/disp8 $emit-modrm:rm32: - # rm32 = parse-hex-int(next-token-from-slice(word-slice->start, word-slice->end, '/')) + # rm32 = parse-hex-int-from-slice(next-token-from-slice(word-slice->start, word-slice->end, '/')) # . eax = parse-datum-of-word(word-slice) # . . push args 51/push-ecx @@ -2482,7 +2482,7 @@ $emit-modrm:check-for-r32: 3d/compare-eax-and 0/imm32/false 74/jump-if-= $emit-modrm:check-for-subop/disp8 $emit-modrm:r32: - # r32 = parse-hex-int(next-token-from-slice(word-slice->start, word-slice->end, '/')) + # r32 = parse-hex-int-from-slice(next-token-from-slice(word-slice->start, word-slice->end, '/')) # . eax = parse-datum-of-word(word-slice) # . . push args 51/push-ecx @@ -2510,7 +2510,7 @@ $emit-modrm:check-for-subop: 3d/compare-eax-and 0/imm32/false 0f 84/jump-if-= $emit-modrm:loop/disp32 $emit-modrm:subop: - # r32 = parse-hex-int(next-token-from-slice(word-slice->start, word-slice->end, '/')) + # r32 = parse-hex-int-from-slice(next-token-from-slice(word-slice->start, word-slice->end, '/')) # . eax = parse-datum-of-word(word-slice) # . . push args 51/push-ecx @@ -2575,13 +2575,13 @@ emit-sib: # line: (addr stream byte), out: (addr buffered-file) # if (slice-empty?(word-slice)) break # if (slice-starts-with?(word-slice, "#")) break # if (has-metadata?(word-slice, "base") - # base = parse-hex-int(next-token-from-slice(word-slice, "/")) + # base = parse-hex-int-from-slice(next-token-from-slice(word-slice, "/")) # has-sib? = true # else if (has-metadata?(word-slice, "index") - # index = parse-hex-int(next-token-from-slice(word-slice, "/")) + # index = parse-hex-int-from-slice(next-token-from-slice(word-slice, "/")) # has-sib? = true # else if (has-metadata?(word-slice, "scale") - # scale = parse-hex-int(next-token-from-slice(word-slice, "/")) + # scale = parse-hex-int-from-slice(next-token-from-slice(word-slice, "/")) # has-sib? = true # if has-sib? # var sib = scale & 0b11 @@ -2735,7 +2735,7 @@ $emit-sib:check-for-scale: 3d/compare-eax-and 0/imm32/false 74/jump-if-= $emit-sib:check-for-base/disp8 $emit-sib:scale: - # scale = parse-hex-int(next-token-from-slice(word-slice->start, word-slice->end, '/')) + # scale = parse-hex-int-from-slice(next-token-from-slice(word-slice->start, word-slice->end, '/')) # . eax = parse-datum-of-word(word-slice) # . . push args 51/push-ecx @@ -2763,7 +2763,7 @@ $emit-sib:check-for-base: 3d/compare-eax-and 0/imm32/false 74/jump-if-= $emit-sib:check-for-index/disp8 $emit-sib:base: - # base = parse-hex-int(next-token-from-slice(word-slice->start, word-slice->end, '/')) + # base = parse-hex-int-from-slice(next-token-from-slice(word-slice->start, word-slice->end, '/')) # . eax = parse-datum-of-word(word-slice) # . . push args 51/push-ecx @@ -2791,7 +2791,7 @@ $emit-sib:check-for-index: 3d/compare-eax-and 0/imm32/false 0f 84/jump-if-= $emit-sib:loop/disp32 $emit-sib:index: - # index = parse-hex-int(next-token-from-slice(word-slice->start, word-slice->end, '/')) + # index = parse-hex-int-from-slice(next-token-from-slice(word-slice->start, word-slice->end, '/')) # . eax = parse-datum-of-word(word-slice) # . . push args 51/push-ecx @@ -5836,7 +5836,7 @@ test-convert-instruction-handles-imm8-operand: 5d/pop-to-ebp c3/return -# shortcut for parse-hex-int(next-token-from-slice(word->start, word->end, '/')) +# shortcut for parse-hex-int-from-slice(next-token-from-slice(word->start, word->end, '/')) parse-datum-of-word: # word: (addr slice) -> value/eax: int # . prologue 55/push-ebp @@ -5860,11 +5860,11 @@ parse-datum-of-word: # word: (addr slice) -> value/eax: int e8/call next-token-from-slice/disp32 # . . discard args 81 0/subop/add 3/mod/direct 4/rm32/esp . . . . . 0x10/imm32 # add to esp - # return parse-hex-int(slice) + # return parse-hex-int-from-slice(slice) # . . push args 51/push-ecx # . . call - e8/call parse-hex-int/disp32 + e8/call parse-hex-int-from-slice/disp32 # . . discard args 81 0/subop/add 3/mod/direct 4/rm32/esp . . . . . 4/imm32 # add to esp $parse-datum-of-word:end: diff --git a/apps/sigils b/apps/sigils index 8160e494..808ddcb5 100755 --- a/apps/sigils +++ b/apps/sigils Binary files differdiff --git a/apps/survey b/apps/survey index 21706977..0e38c0f8 100755 --- a/apps/survey +++ b/apps/survey Binary files differdiff --git a/apps/survey.subx b/apps/survey.subx index 488b066f..06f6625d 100644 --- a/apps/survey.subx +++ b/apps/survey.subx @@ -654,7 +654,7 @@ compute-offsets: # in: (addr stream byte), segments: (addr stream {string, segm # if slice-empty?(segment-tmp) # abort # seg = get-or-insert(segments, curr-segment-name) - # seg->starting-address = parse-hex-int(segment-tmp) + # seg->starting-address = parse-hex-int-from-slice(segment-tmp) # seg->file-offset = *file-offset # trace("segment '", curr-segment-name, "' is at file offset ", seg->file-offset) # segment-offset = 0 @@ -987,10 +987,10 @@ $compute-offsets:update-curr-segment-name: 81 0/subop/add 3/mod/direct 4/rm32/esp . . . . . 0xc/imm32 # add to esp # . ebx = eax 89/copy 3/mod/direct 3/rm32/ebx . . . 0/r32/eax . . # copy eax to ebx - # seg->address = parse-hex-int(segment-tmp) - # . eax = parse-hex-int(segment-tmp) + # seg->address = parse-hex-int-from-slice(segment-tmp) + # . eax = parse-hex-int-from-slice(segment-tmp) 68/push compute-offsets:segment-tmp/imm32 - e8/call parse-hex-int/disp32 + e8/call parse-hex-int-from-slice/disp32 # . . discard args 81 0/subop/add 3/mod/direct 4/rm32/esp . . . . . 4/imm32 # add to esp # . seg->address = eax diff --git a/apps/tests b/apps/tests index 24e6b812..504595d7 100755 --- a/apps/tests +++ b/apps/tests Binary files differ |