about summary refs log tree commit diff stats
path: root/subx
diff options
context:
space:
mode:
authorKartik Agaram <vc@akkartik.com>2019-05-20 00:18:23 -0700
committerKartik Agaram <vc@akkartik.com>2019-05-20 00:18:23 -0700
commitfc6605de48f3221efdbde1d363a202c336b2b919 (patch)
tree533709a83574ba65a4b925fbebf1f7770e99c7e8 /subx
parent7fd1881e228f2552285eff9a1193893adefad23e (diff)
downloadmu-fc6605de48f3221efdbde1d363a202c336b2b919.tar.gz
.
Diffstat (limited to 'subx')
-rw-r--r--subx/058stream-equal.subx1
1 files changed, 1 insertions, 0 deletions
diff --git a/subx/058stream-equal.subx b/subx/058stream-equal.subx
index 9bb36cf9..64ea7d4c 100644
--- a/subx/058stream-equal.subx
+++ b/subx/058stream-equal.subx
@@ -33,6 +33,7 @@ stream-data-equal?:  # f : (address stream), s : (address string) -> EAX : boole
     # EDI = s
     8b/copy                         1/mod/*+disp8   5/rm32/EBP    .           .             .           7/r32/EDI   0xc/disp8       .                 # copy *(EBP+12) to EDI
     # if (f->write != s->length) return false
+$stream-data-equal?:compare-lengths:
     39/compare                      0/mod/indirect  7/rm32/EDI    .           .             .           0/r32/EAX   .               .                 # compare *EDI and EAX
     75/jump-if-not-equal  $stream-data-equal?:false/disp8
     # currs/EDI = s->data