diff options
Diffstat (limited to 'apps/survey.subx')
| -rw-r--r-- | apps/survey.subx | 106 |
1 files changed, 26 insertions, 80 deletions
diff --git a/apps/survey.subx b/apps/survey.subx index 9c48e928..e4ebba13 100644 --- a/apps/survey.subx +++ b/apps/survey.subx @@ -166,19 +166,13 @@ subx-survey: # infile : (address buffered-file), out : (address buffered-file) #? e8/call write/disp32 #? # . . discard args #? 81 0/subop/add 3/mod/direct 4/rm32/esp . . . . . 8/imm32 # add to esp -#? # . clear-stream(Stderr+4) -#? # . . save eax -#? 50/push-eax +#? # . clear-stream(Stderr->buffer) #? # . . push args -#? b8/copy-to-eax Stderr/imm32 -#? 05/add-to-eax 4/imm32 -#? 50/push-eax +#? 68/push Stderr->buffer/imm32 #? # . . call #? e8/call clear-stream/disp32 #? # . . discard args #? 81 0/subop/add 3/mod/direct 4/rm32/esp . . . . . 4/imm32 # add to esp -#? # . . restore eax -#? 58/pop-to-eax #? # . print-int32-buffered(Stderr, labels->write) #? # . . push args #? $watch-1: @@ -230,19 +224,13 @@ subx-survey: # infile : (address buffered-file), out : (address buffered-file) #? e8/call write/disp32 #? # . . discard args #? 81 0/subop/add 3/mod/direct 4/rm32/esp . . . . . 8/imm32 # add to esp -#? # . clear-stream(Stderr+4) -#? # . . save eax -#? 50/push-eax +#? # . clear-stream(Stderr->buffer) #? # . . push args -#? b8/copy-to-eax Stderr/imm32 -#? 05/add-to-eax 4/imm32 -#? 50/push-eax +#? 68/push Stderr->buffer/imm32 #? # . . call #? e8/call clear-stream/disp32 #? # . . discard args #? 81 0/subop/add 3/mod/direct 4/rm32/esp . . . . . 4/imm32 # add to esp -#? # . . restore eax -#? 58/pop-to-eax #? # . print-int32-buffered(Stderr, labels->write) #? # . . push args #? ff 6/subop/push 0/mod/indirect 2/rm32/edx . . . . . . # push *edx @@ -386,19 +374,13 @@ subx-survey: # infile : (address buffered-file), out : (address buffered-file) #? e8/call write/disp32 #? # . . discard args #? 81 0/subop/add 3/mod/direct 4/rm32/esp . . . . . 8/imm32 # add to esp -#? # . clear-stream(Stderr+4) -#? # . . save eax -#? 50/push-eax +#? # . clear-stream(Stderr->buffer) #? # . . push args -#? b8/copy-to-eax Stderr/imm32 -#? 05/add-to-eax 4/imm32 -#? 50/push-eax +#? 68/push Stderr->buffer/imm32 #? # . . call #? e8/call clear-stream/disp32 #? # . . discard args #? 81 0/subop/add 3/mod/direct 4/rm32/esp . . . . . 4/imm32 # add to esp -#? # . . restore eax -#? 58/pop-to-eax #? # . print-int32-buffered(Stderr, labels) #? # . . push args #? ff 6/subop/push 0/mod/indirect 2/rm32/edx . . . . . . # push *edx @@ -478,11 +460,9 @@ test-subx-survey-computes-addresses: e8/call clear-stream/disp32 # . . discard args 81 0/subop/add 3/mod/direct 4/rm32/esp . . . . . 4/imm32 # add to esp - # . clear-stream(_test-input-buffered-file+4) + # . clear-stream(_test-input-buffered-file->buffer) # . . push args - b8/copy-to-eax _test-input-buffered-file/imm32 - 05/add-to-eax 4/imm32 - 50/push-eax + 68/push _test-input-buffered-file->buffer/imm32 # . . call e8/call clear-stream/disp32 # . . discard args @@ -494,11 +474,9 @@ test-subx-survey-computes-addresses: e8/call clear-stream/disp32 # . . discard args 81 0/subop/add 3/mod/direct 4/rm32/esp . . . . . 4/imm32 # add to esp - # . clear-stream(_test-output-buffered-file+4) + # . clear-stream(_test-output-buffered-file->buffer) # . . push args - b8/copy-to-eax _test-output-buffered-file/imm32 - 05/add-to-eax 4/imm32 - 50/push-eax + 68/push _test-output-buffered-file->buffer/imm32 # . . call e8/call clear-stream/disp32 # . . discard args @@ -789,19 +767,13 @@ $compute-offsets:word-loop: #? e8/call write/disp32 #? # . . discard args #? 81 0/subop/add 3/mod/direct 4/rm32/esp . . . . . 8/imm32 # add to esp -#? # . clear-stream(Stderr+4) -#? # . . save eax -#? 50/push-eax +#? # . clear-stream(Stderr->buffer) #? # . . push args -#? b8/copy-to-eax Stderr/imm32 -#? 05/add-to-eax 4/imm32 -#? 50/push-eax +#? 68/push Stderr->buffer/imm32 #? # . . call #? e8/call clear-stream/disp32 #? # . . discard args #? 81 0/subop/add 3/mod/direct 4/rm32/esp . . . . . 4/imm32 # add to esp -#? # . . restore eax -#? 58/pop-to-eax #? # . write-slice-buffered(Stderr, word-slice) #? # . . push args #? 52/push-edx @@ -946,11 +918,9 @@ $compute-offsets:construct-next-segment: #? e8/call write/disp32 #? # . . discard args #? 81 0/subop/add 3/mod/direct 4/rm32/esp . . . . . 8/imm32 # add to esp -#? # . clear-stream(Stderr+4) +#? # . clear-stream(Stderr->buffer) #? # . . push args -#? b8/copy-to-eax Stderr/imm32 -#? 05/add-to-eax 4/imm32 -#? 50/push-eax +#? 68/push Stderr->buffer/imm32 #? # . . call #? e8/call clear-stream/disp32 #? # . . discard args @@ -1129,19 +1099,13 @@ $compute-offsets:case-default: #? e8/call write/disp32 #? # . . discard args #? 81 0/subop/add 3/mod/direct 4/rm32/esp . . . . . 8/imm32 # add to esp -#? # . clear-stream(Stderr+4) -#? # . . save eax -#? 50/push-eax +#? # . clear-stream(Stderr->buffer) #? # . . push args -#? b8/copy-to-eax Stderr/imm32 -#? 05/add-to-eax 4/imm32 -#? 50/push-eax +#? 68/push Stderr->buffer/imm32 #? # . . call #? e8/call clear-stream/disp32 #? # . . discard args #? 81 0/subop/add 3/mod/direct 4/rm32/esp . . . . . 4/imm32 # add to esp -#? # . . restore eax -#? 58/pop-to-eax #? # . print-int32-buffered(Stderr, segment-offset) #? # . . push args #? 52/push-edx @@ -2611,11 +2575,9 @@ test-emit-segments-global-variable: e8/call clear-stream/disp32 # . . discard args 81 0/subop/add 3/mod/direct 4/rm32/esp . . . . . 4/imm32 # add to esp - # . clear-stream(_test-output-buffered-file+4) + # . clear-stream(_test-output-buffered-file->buffer) # . . push args - b8/copy-to-eax _test-output-buffered-file/imm32 - 05/add-to-eax 4/imm32 - 50/push-eax + 68/push _test-output-buffered-file->buffer/imm32 # . . call e8/call clear-stream/disp32 # . . discard args @@ -2850,11 +2812,9 @@ test-emit-segments-code-label: e8/call clear-stream/disp32 # . . discard args 81 0/subop/add 3/mod/direct 4/rm32/esp . . . . . 4/imm32 # add to esp - # . clear-stream(_test-output-buffered-file+4) + # . clear-stream(_test-output-buffered-file->buffer) # . . push args - b8/copy-to-eax _test-output-buffered-file/imm32 - 05/add-to-eax 4/imm32 - 50/push-eax + 68/push _test-output-buffered-file->buffer/imm32 # . . call e8/call clear-stream/disp32 # . . discard args @@ -3054,11 +3014,9 @@ test-emit-segments-code-label-absolute: e8/call clear-stream/disp32 # . . discard args 81 0/subop/add 3/mod/direct 4/rm32/esp . . . . . 4/imm32 # add to esp - # . clear-stream(_test-output-buffered-file+4) + # . clear-stream(_test-output-buffered-file->buffer) # . . push args - b8/copy-to-eax _test-output-buffered-file/imm32 - 05/add-to-eax 4/imm32 - 50/push-eax + 68/push _test-output-buffered-file->buffer/imm32 # . . call e8/call clear-stream/disp32 # . . discard args @@ -3275,19 +3233,13 @@ $emit-headers:loop: #? e8/call write/disp32 #? # . . discard args #? 81 0/subop/add 3/mod/direct 4/rm32/esp . . . . . 8/imm32 # add to esp -#? # . clear-stream(Stderr+4) -#? # . . save eax -#? 50/push-eax +#? # . clear-stream(Stderr->buffer) #? # . . push args -#? b8/copy-to-eax Stderr/imm32 -#? 05/add-to-eax 4/imm32 -#? 50/push-eax +#? 68/push Stderr->buffer/imm32 #? # . . call #? e8/call clear-stream/disp32 #? # . . discard args #? 81 0/subop/add 3/mod/direct 4/rm32/esp . . . . . 4/imm32 # add to esp -#? # . . restore eax -#? 58/pop-to-eax #? # . print-int32-buffered(Stderr, &curr-segment) #? # . . push args #? 50/push-eax @@ -4258,19 +4210,13 @@ $num-bytes:loop: #? e8/call write/disp32 #? # . . discard args #? 81 0/subop/add 3/mod/direct 4/rm32/esp . . . . . 8/imm32 # add to esp -#? # . clear-stream(Stderr+4) -#? # . . save eax -#? 50/push-eax +#? # . clear-stream(Stderr->buffer) #? # . . push args -#? b8/copy-to-eax Stderr/imm32 -#? 05/add-to-eax 4/imm32 -#? 50/push-eax +#? 68/push Stderr->buffer/imm32 #? # . . call #? e8/call clear-stream/disp32 #? # . . discard args #? 81 0/subop/add 3/mod/direct 4/rm32/esp . . . . . 4/imm32 # add to esp -#? # . . restore eax -#? 58/pop-to-eax #? # . write-slice-buffered(Stderr, word-slice) #? # . . push args #? 51/push-ecx |