diff options
| author | Kartik Agaram <vc@akkartik.com> | 2020-11-26 21:37:09 -0800 |
|---|---|---|
| committer | Kartik Agaram <vc@akkartik.com> | 2020-11-26 21:37:09 -0800 |
| commit | 896a353a7dadaeca02ff75a734bc2a43691f9383 (patch) | |
| tree | 827ed88fcfa4273255ed66a97732a0e648f0c72f /apps/mu.subx | |
| parent | 066014d4b4ad60aeb25ffbb7ec884c2a426b1a05 (diff) | |
| download | mu-896a353a7dadaeca02ff75a734bc2a43691f9383.tar.gz | |
7281
Diffstat (limited to 'apps/mu.subx')
| -rw-r--r-- | apps/mu.subx | 31 |
1 files changed, 24 insertions, 7 deletions
diff --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 |