diff options
-rwxr-xr-x | apps/mu | bin | 576603 -> 576872 bytes | |||
-rw-r--r-- | apps/mu.subx | 31 |
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 |