about summary refs log tree commit diff stats
path: root/subx
diff options
context:
space:
mode:
authorKartik Agaram <vc@akkartik.com>2019-05-17 18:08:50 -0700
committerKartik Agaram <vc@akkartik.com>2019-05-17 18:08:50 -0700
commit72853d07bb3cfed09f57ee36b582f8f35fee74e4 (patch)
treeb50278e43ffb7920bb9de44e8fb356152b311d69 /subx
parent209ffb7fdbf7cc5e9739561a2e8ef1ffecf73966 (diff)
downloadmu-72853d07bb3cfed09f57ee36b582f8f35fee74e4.tar.gz
5181
Test for the bugfix of commit 2f49a27504.
Diffstat (limited to 'subx')
-rwxr-xr-xsubx/apps/dquotesbin25014 -> 22932 bytes
-rw-r--r--subx/apps/dquotes.subx20
2 files changed, 20 insertions, 0 deletions
diff --git a/subx/apps/dquotes b/subx/apps/dquotes
index d9970727..ac7072c9 100755
--- a/subx/apps/dquotes
+++ b/subx/apps/dquotes
Binary files differdiff --git a/subx/apps/dquotes.subx b/subx/apps/dquotes.subx
index db1073cf..e44a2c41 100644
--- a/subx/apps/dquotes.subx
+++ b/subx/apps/dquotes.subx
@@ -1707,6 +1707,16 @@ test-next-word:
     e8/call  next-word/disp32
     # . . discard args
     81          0/subop/add         3/mod/direct    4/rm32/ESP    .           .             .           .           .               8/imm32           # add to ESP
+    # check-ints-equal(_test-input-stream->read, 4, msg)
+    # . . push args
+    68/push  "F - test-next-word/updates-stream-read-correctly"/imm32
+    68/push  4/imm32
+    b8/copy-to-EAX  _test-input-stream/imm32
+    ff          6/subop/push        1/mod/*+disp8   0/rm32/EAX    .           .             .           .           4/disp8         .                 # push *(EAX+4)
+    # . . call
+    e8/call  check-ints-equal/disp32
+    # . . discard args
+    81          0/subop/add         3/mod/direct    4/rm32/ESP    .           .             .           .           .               0xc/imm32         # add to ESP
     # check-ints-equal(slice->start - _test-input-stream->data, 2, msg)
     # . check-ints-equal(slice->start - _test-input-stream, 14, msg)
     # . . push args
@@ -1770,6 +1780,16 @@ test-next-word-returns-whole-comment:
     e8/call  next-word/disp32
     # . . discard args
     81          0/subop/add         3/mod/direct    4/rm32/ESP    .           .             .           .           .               8/imm32           # add to ESP
+    # check-ints-equal(_test-input-stream->read, 5, msg)
+    # . . push args
+    68/push  "F - test-next-word-returns-whole-comment/updates-stream-read-correctly"/imm32
+    68/push  5/imm32
+    b8/copy-to-EAX  _test-input-stream/imm32
+    ff          6/subop/push        1/mod/*+disp8   0/rm32/EAX    .           .             .           .           4/disp8         .                 # push *(EAX+4)
+    # . . call
+    e8/call  check-ints-equal/disp32
+    # . . discard args
+    81          0/subop/add         3/mod/direct    4/rm32/ESP    .           .             .           .           .               0xc/imm32         # add to ESP
     # check-ints-equal(slice->start - _test-input-stream->data, 2, msg)
     # . check-ints-equal(slice->start - _test-input-stream, 14, msg)
     # . . push args