about summary refs log tree commit diff stats
diff options
context:
space:
mode:
authorKartik Agaram <vc@akkartik.com>2020-10-28 23:25:05 -0700
committerKartik Agaram <vc@akkartik.com>2020-10-28 23:25:05 -0700
commit216af9cc1c2758f0d9cbfb13eeee963d280abd1a (patch)
tree8af94eab1b916f296621f75cb8674318c5e12eba
parent33b1e9a89430ce744d01b7a95cf43aff23212052 (diff)
downloadmu-216af9cc1c2758f0d9cbfb13eeee963d280abd1a.tar.gz
7136
-rwxr-xr-xapps/mubin441312 -> 441282 bytes
-rw-r--r--apps/mu.subx20
2 files changed, 10 insertions, 10 deletions
diff --git a/apps/mu b/apps/mu
index d57c95bc..da08277f 100755
--- a/apps/mu
+++ b/apps/mu
Binary files differdiff --git a/apps/mu.subx b/apps/mu.subx
index 2dfd0aba..269c37e3 100644
--- a/apps/mu.subx
+++ b/apps/mu.subx
@@ -6436,7 +6436,7 @@ test-get-with-wrong-output-type-2:
 #?     # }}}
     # check output
     (check-stream-equal _test-output-stream  ""  "F - test-get-with-wrong-output-type-2: output should be empty")
-    (check-next-stream-line-equal _test-error-stream  "fn foo: stmt get: output must be an address"  "F - test-get-with-wrong-output-type-2: error message")
+    (check-next-stream-line-equal _test-error-stream  "fn foo: stmt get: output must be an addr"  "F - test-get-with-wrong-output-type-2: error message")
     # check that stop(1) was called
     (check-ints-equal *(edx+4) 2 "F - test-get-with-wrong-output-type-2: exit status")
     # don't restore from ebp
@@ -6484,7 +6484,7 @@ test-get-with-wrong-output-type-3:
 #?     # }}}
     # check output
     (check-stream-equal _test-output-stream  ""  "F - test-get-with-wrong-output-type-3: output should be empty")
-    (check-next-stream-line-equal _test-error-stream  "fn foo: stmt get: output must be an address"  "F - test-get-with-wrong-output-type-3: error message")
+    (check-next-stream-line-equal _test-error-stream  "fn foo: stmt get: output must be an addr"  "F - test-get-with-wrong-output-type-3: error message")
     # check that stop(1) was called
     (check-ints-equal *(edx+4) 2 "F - test-get-with-wrong-output-type-3: exit status")
     # don't restore from ebp
@@ -7564,7 +7564,7 @@ test-index-with-output-not-address:
 #?     # }}}
     # check output
     (check-stream-equal _test-output-stream  ""  "F - test-index-with-output-not-address: output should be empty")
-    (check-next-stream-line-equal _test-error-stream  "fn foo: stmt index: output 'o' must be an address"  "F - test-index-with-output-not-address: error message")
+    (check-next-stream-line-equal _test-error-stream  "fn foo: stmt index: output 'o' must be an addr"  "F - test-index-with-output-not-address: error message")
     # check that stop(1) was called
     (check-ints-equal *(edx+4) 2 "F - test-index-with-output-not-address: exit status")
     # don't restore from ebp
@@ -7609,7 +7609,7 @@ test-index-with-output-not-address-2:
 #?     # }}}
     # check output
     (check-stream-equal _test-output-stream  ""  "F - test-index-with-output-not-address-2: output should be empty")
-    (check-next-stream-line-equal _test-error-stream  "fn foo: stmt index: output 'o' must be an address"  "F - test-index-with-output-not-address-2: error message")
+    (check-next-stream-line-equal _test-error-stream  "fn foo: stmt index: output 'o' must be an addr"  "F - test-index-with-output-not-address-2: error message")
     # check that stop(1) was called
     (check-ints-equal *(edx+4) 2 "F - test-index-with-output-not-address-2: exit status")
     # don't restore from ebp
@@ -8257,7 +8257,7 @@ test-read-from-stream-with-wrong-index-type:
 #?     # }}}
     # check output
     (check-stream-equal _test-output-stream  ""  "F - test-read-from-stream-with-wrong-index-type: output should be empty")
-    (check-next-stream-line-equal _test-error-stream  "fn foo: stmt read-from-stream: target 'b' must be an address"  "F - test-read-from-stream-with-wrong-index-type: error message")
+    (check-next-stream-line-equal _test-error-stream  "fn foo: stmt read-from-stream: target 'b' must be an addr"  "F - test-read-from-stream-with-wrong-index-type: error message")
     # check that stop(1) was called
     (check-ints-equal *(edx+4) 2 "F - test-read-from-stream-with-wrong-index-type: exit status")
     # don't restore from ebp
@@ -8770,7 +8770,7 @@ test-write-to-stream-with-wrong-index-type:
 #?     # }}}
     # check output
     (check-stream-equal _test-output-stream  ""  "F - test-write-to-stream-with-wrong-index-type: output should be empty")
-    (check-next-stream-line-equal _test-error-stream  "fn foo: stmt write-to-stream: target 'b' must be an address"  "F - test-write-to-stream-with-wrong-index-type: error message")
+    (check-next-stream-line-equal _test-error-stream  "fn foo: stmt write-to-stream: target 'b' must be an addr"  "F - test-write-to-stream-with-wrong-index-type: error message")
     # check that stop(1) was called
     (check-ints-equal *(edx+4) 2 "F - test-write-to-stream-with-wrong-index-type: exit status")
     # don't restore from ebp
@@ -15014,7 +15014,7 @@ $check-mu-get-stmt:error-output-type-not-address:
     8b/-> *(ebp+0xc) 0/r32/eax
     (lookup *eax *(eax+4))  # Function-name Function-name => eax
     (write-buffered *(ebp+0x10) %eax)
-    (write-buffered *(ebp+0x10) ": stmt get: output must be an address\n")
+    (write-buffered *(ebp+0x10) ": stmt get: output must be an addr\n")
     (flush *(ebp+0x10))
     (stop *(ebp+0x14) 1)
     # never gets here
@@ -15399,7 +15399,7 @@ $check-mu-index-stmt:error-output-type-not-address:
     (write-buffered *(ebp+0x10) ": stmt index: output '")
     (lookup *edi *(edi+4))  # Var-name Var-name => eax
     (write-buffered *(ebp+0x10) %eax)
-    (write-buffered *(ebp+0x10) "' must be an address\n")
+    (write-buffered *(ebp+0x10) "' must be an addr\n")
     (flush *(ebp+0x10))
     (stop *(ebp+0x14) 1)
     # never gets here
@@ -15618,7 +15618,7 @@ $check-mu-read-from-stream-stmt:error-target-type-not-address:
     (write-buffered *(ebp+0x10) ": stmt read-from-stream: target '")
     (lookup *ecx *(ecx+4))  # Var-name Var-name => eax
     (write-buffered *(ebp+0x10) %eax)
-    (write-buffered *(ebp+0x10) "' must be an address\n")
+    (write-buffered *(ebp+0x10) "' must be an addr\n")
     (flush *(ebp+0x10))
     (stop *(ebp+0x14) 1)
     # never gets here
@@ -15785,7 +15785,7 @@ $check-mu-write-to-stream-stmt:error-target-type-not-address:
     (write-buffered *(ebp+0x10) ": stmt write-to-stream: target '")
     (lookup *ecx *(ecx+4))  # Var-name Var-name => eax
     (write-buffered *(ebp+0x10) %eax)
-    (write-buffered *(ebp+0x10) "' must be an address\n")
+    (write-buffered *(ebp+0x10) "' must be an addr\n")
     (flush *(ebp+0x10))
     (stop *(ebp+0x14) 1)
     # never gets here