about summary refs log tree commit diff stats
diff options
context:
space:
mode:
-rwxr-xr-xapps/mubin576603 -> 576872 bytes
-rw-r--r--apps/mu.subx31
2 files changed, 24 insertions, 7 deletions
diff --git a/apps/mu b/apps/mu
index 37ca3772..f159323b 100755
--- a/apps/mu
+++ b/apps/mu
Binary files differdiff --git a/apps/mu.subx b/apps/mu.subx
index 909dbfc5..7390edac 100644
--- a/apps/mu.subx
+++ b/apps/mu.subx
@@ -7594,7 +7594,7 @@ test-copy-invalid-value-to-address:
     5d/pop-to-ebp
     c3/return
 
-test-copy-null-value-to-addr:
+test-copy-null-value-to-address:
     # . prologue
     55/push-ebp
     89/<- %ebp 4/r32/esp
@@ -7610,12 +7610,6 @@ test-copy-null-value-to-addr:
     # convert
     (convert-mu _test-input-buffered-file _test-output-buffered-file Stderr 0)
     (flush _test-output-buffered-file)
-#?     # dump _test-error-stream {{{
-#?     (write 2 "^")
-#?     (write-stream 2 _test-error-stream)
-#?     (write 2 "$\n")
-#?     (rewind-stream _test-error-stream)
-#?     # }}}
     # no errors
     # . epilogue
     89/<- %esp 5/r32/ebp
@@ -8085,6 +8079,29 @@ test-copy-to-invalid-value-to-address:
     5d/pop-to-ebp
     c3/return
 
+test-copy-to-null-value-to-address:
+    # . prologue
+    55/push-ebp
+    89/<- %ebp 4/r32/esp
+    # setup
+    (clear-stream _test-input-stream)
+    (clear-stream $_test-input-buffered-file->buffer)
+    (clear-stream _test-output-stream)
+    (clear-stream $_test-output-buffered-file->buffer)
+    #
+    (write _test-input-stream "fn foo {\n")
+    (write _test-input-stream "  var y: (addr int)\n")
+    (write _test-input-stream "  copy-to y, 0\n")
+    (write _test-input-stream "}\n")
+    # convert
+    (convert-mu _test-input-buffered-file _test-output-buffered-file Stderr 0)
+    (flush _test-output-buffered-file)
+    # no errors
+    # . epilogue
+    89/<- %esp 5/r32/ebp
+    5d/pop-to-ebp
+    c3/return
+
 test-copy-to-deref-address:
     # . prologue
     55/push-ebp