about summary refs log tree commit diff stats
path: root/apps
diff options
context:
space:
mode:
Diffstat (limited to 'apps')
-rwxr-xr-xapps/callsbin46567 -> 46572 bytes
-rw-r--r--apps/calls.subx9
2 files changed, 5 insertions, 4 deletions
diff --git a/apps/calls b/apps/calls
index d8e95bcd..ccac9c65 100755
--- a/apps/calls
+++ b/apps/calls
Binary files differdiff --git a/apps/calls.subx b/apps/calls.subx
index a1ab5ca1..7d7d560b 100644
--- a/apps/calls.subx
+++ b/apps/calls.subx
@@ -83,7 +83,7 @@ subx-calls:  # in : (addr buffered-file), out : (addr buffered-file)
     #     clear-stream(line)
     #     read-line-buffered(in, line)
     #     if (line->write == 0) break                           # end of file
-    #     skip-chars-matching-whitespace(line)
+    #     skip-chars-matching(line, ' ')
     #     if line->data[line->read] != '('
     #       write-stream-data(out, line)
     #       continue
@@ -137,13 +137,14 @@ $subx-calls:check0:
     # if (line->write == 0) break
     81 7/subop/compare *esi 0/imm32
     0f 84/jump-if-= $subx-calls:break/disp32
-    # skip-chars-matching-whitespace(line)
+    # skip-chars-matching(line, ' ')
     # . . push args
+    68/push 0x20/imm32/space
     56/push-esi
     # . . call
-    e8/call skip-chars-matching-whitespace/disp32
+    e8/call skip-chars-matching/disp32
     # . . discard args
-    81 0/subop/add %esp 4/imm32
+    81 0/subop/add %esp 8/imm32
     # if (line->data[line->read] == '(') goto convert-call
     # . ecx = line->read
     8b/-> *(esi+4) 1/r32/ecx