From 33258e0ad2b5bbae249ca0558bdeb463af7b6148 Mon Sep 17 00:00:00 2001 From: Kartik Agaram Date: Sun, 19 Jan 2020 21:58:32 -0800 Subject: 5903 --- apps/calls | Bin 46567 -> 46572 bytes apps/calls.subx | 9 +++++---- 2 files changed, 5 insertions(+), 4 deletions(-) (limited to 'apps') diff --git a/apps/calls b/apps/calls index d8e95bcd..ccac9c65 100755 Binary files a/apps/calls and b/apps/calls differ diff --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 -- cgit 1.4.1-2-gfad0