about summary refs log tree commit diff stats
path: root/054string-equal.subx
diff options
context:
space:
mode:
authorKartik Agaram <vc@akkartik.com>2019-11-29 01:27:39 -0800
committerKartik Agaram <vc@akkartik.com>2019-11-29 01:27:39 -0800
commit8d5437838b46fef04d32864f3c294e78515c200b (patch)
tree44070e4df9ca4dce005a42e2809d6f712631a8fc /054string-equal.subx
parentcc253a74a2af967ea50d2036f6ca8d283554023e (diff)
downloadmu-8d5437838b46fef04d32864f3c294e78515c200b.tar.gz
5778
Diffstat (limited to '054string-equal.subx')
-rw-r--r--054string-equal.subx12
1 files changed, 6 insertions, 6 deletions
diff --git a/054string-equal.subx b/054string-equal.subx
index 2dfad4b5..70fa8901 100644
--- a/054string-equal.subx
+++ b/054string-equal.subx
@@ -175,7 +175,7 @@ test-compare-inequal-strings-equal-lengths:
     c3/return
 
 # helper for later tests
-check-string-equal:  # s : (address string), expected : (address string), msg : (address string)
+check-strings-equal:  # s : (address string), expected : (address string), msg : (address string)
     # . prologue
     55/push-ebp
     89/copy                         3/mod/direct    5/rm32/ebp    .           .             .           4/r32/esp   .               .                 # copy esp to ebp
@@ -198,7 +198,7 @@ check-string-equal:  # s : (address string), expected : (address string), msg :
     e8/call  check-ints-equal/disp32
     # . . discard args
     81          0/subop/add         3/mod/direct    4/rm32/esp    .           .             .           .           .               0xc/imm32         # add to esp
-$check-string-equal:end:
+$check-strings-equal:end:
     # . restore registers
     58/pop-to-eax
     # . epilogue
@@ -207,18 +207,18 @@ $check-string-equal:end:
     c3/return
 
 # test the helper
-test-check-string-equal:
-    # check-string-equal?("Abc", "Abc")
+test-check-strings-equal:
+    # check-strings-equal?("Abc", "Abc")
     # . . push args
     68/push  "Abc"/imm32
     68/push  "Abc"/imm32
     # . . call
-    e8/call  check-string-equal/disp32
+    e8/call  check-strings-equal/disp32
     # . . discard args
     81          0/subop/add         3/mod/direct    4/rm32/esp    .           .             .           .           .               8/imm32           # add to esp
     # check-ints-equal(eax, 1, msg)
     # . . push args
-    68/push  "F - test-check-string-equal"/imm32
+    68/push  "F - test-check-strings-equal"/imm32
     68/push  0/imm32/false
     50/push-eax
     # . . call