diff options
author | Kartik Agaram <vc@akkartik.com> | 2019-07-10 09:35:24 -0700 |
---|---|---|
committer | Kartik Agaram <vc@akkartik.com> | 2019-07-10 09:35:24 -0700 |
commit | 7e9cdf3c7a7c7b1c000d9847db7c198cd5ee1cb2 (patch) | |
tree | 2b00893b84f78eff7303aa2bc4009e8ecbeb3d21 | |
parent | 57714dd4fc385b51e879569f8df2eb61ff1f3154 (diff) | |
download | mu-7e9cdf3c7a7c7b1c000d9847db7c198cd5ee1cb2.tar.gz |
.
-rwxr-xr-x | subx/apps/survey | bin | 38623 -> 38602 bytes | |||
-rw-r--r-- | subx/apps/survey.subx | 13 |
2 files changed, 5 insertions, 8 deletions
diff --git a/subx/apps/survey b/subx/apps/survey index 0f7434f6..f33cafb9 100755 --- a/subx/apps/survey +++ b/subx/apps/survey Binary files differdiff --git a/subx/apps/survey.subx b/subx/apps/survey.subx index cd73bbf6..b4558754 100644 --- a/subx/apps/survey.subx +++ b/subx/apps/survey.subx @@ -392,13 +392,12 @@ compute-offsets: # in : (address buffered-file), segments : (address stream {st 56/push-ESI 57/push-EDI # curr-segment-name = {0, 0} - c7 0/subop/copy 0/mod/indirect 5/rm32/.disp32 . . . compute-offsets:curr-segment-name/disp32 0/imm32 # copy to *compute-offsets:word-slice - c7 0/subop/copy 0/mod/indirect 5/rm32/.disp32 . . . compute-offsets:curr-segment-name:end/disp32 0/imm32 # copy to *(compute-offsets:word-slice+4) + c7 0/subop/copy 0/mod/indirect 5/rm32/.disp32 . . . compute-offsets:curr-segment-name/disp32 0/imm32 # copy to *compute-offsets:curr-segment-name + c7 0/subop/copy 0/mod/indirect 5/rm32/.disp32 . . . compute-offsets:curr-segment-name:end/disp32 0/imm32 # copy to *(compute-offsets:curr-segment-name+4) # file-offset = 0 - b8/copy-to-EAX 0/imm32 - 89/copy 0/mod/indirect 5/rm32/.disp32 . . 0/r32/EAX compute-offsets:file-offset/disp32 # copy EAX to *file-offset + c7 0/subop/copy 0/mod/indirect 5/rm32/.disp32 . . . compute-offsets:file-offset/disp32 0/imm32 # copy to *compute-offsets:word-slice # segment-offset = 0 - c7 0/subop/copy 0/mod/indirect 5/rm32/.disp32 . . . compute-offsets:segment-offset/disp32 0/imm32 # copy to *compute-offsets:word-slice + c7 0/subop/copy 0/mod/indirect 5/rm32/.disp32 . . . compute-offsets:segment-offset/disp32 0/imm32 # copy to *compute-offsets:word-slice # line/ECX = new-stream(512, 1) # . EAX = new-stream(512, 1) # . . push args @@ -428,9 +427,7 @@ $compute-offsets:line-loop: 3d/compare-EAX-and 0/imm32 0f 84/jump-if-equal $compute-offsets:end/disp32 $compute-offsets:word-loop: - # var word-slice/EDX = {0, 0} - c7 0/subop/copy 0/mod/indirect 5/rm32/.disp32 . . . compute-offsets:word-slice/disp32 0/imm32 # copy to *compute-offsets:word-slice - c7 0/subop/copy 0/mod/indirect 5/rm32/.disp32 . . . compute-offsets:word-slice:end/disp32 0/imm32 # copy to *(compute-offsets:word-slice+4) + # EDX = word-slice ba/copy-to-EDX compute-offsets:word-slice/imm32 # next-word(line/ECX, word-slice/EDX) 52/push-EDX |