6083

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