ranger - mirror of ranger - a simple, vim-like file manager

diff options

Diffstat (limited to 'test')

0 files changed, 0 insertions, 0 deletions

<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd"> <html> <head> <meta http-equiv="content-type" content="text/html; charset=UTF-8"> <title>Mu - linux/404stream.mu</title> <meta name="Generator" content="Vim/8.1"> <meta name="plugin-version" content="vim8.1_v1"> <meta name="syntax" content="none"> <meta name="settings" content="number_lines,use_css,pre_wrap,no_foldcolumn,expand_tabs,line_ids,prevent_copy="> <meta name="colorscheme" content="minimal-dark"> <style type="text/css">  </style> <script type='text/javascript'>  </script> </head> <body onload='JumpToLine();'> <a href='https://github.com/akkartik/mu/blob/main/linux/404stream.mu'>https://github.com/akkartik/mu/blob/main/linux/404stream.mu</a> <pre id='vimCodeElement'> 1 # Tests for Mu's stream primitives. 2 3 fn <a href='404stream.mu.html#L3'>test-stream</a> { 4 # - write an int to a stream, then read it back 5 # step 1: initialize 6 var s: (stream int 4) 7 var s2/ecx: (addr stream int) <- address s 8 var tmp/eax: boolean <- <a href='309stream.subx.html#L6'>stream-empty?</a> s2 9 <a href='401test.mu.html#L3'>check</a> tmp, "F - <a href='404stream.mu.html#L3'>test-stream</a>/empty?/0" 10 tmp <- <a href='309stream.subx.html#L30'>stream-full?</a> s2 11 <a href='401test.mu.html#L8'>check-not</a> tmp, "F - <a href='404stream.mu.html#L3'>test-stream</a>/full?/0" 12 # step 2: write to stream 13 var x: int 14 copy-to x, 0x34 15 var x2/edx: (addr int) <- address x 16 <a href='309stream.subx.html#L54'>write-to-stream</a> s2, x2 17 tmp <- <a href='309stream.subx.html#L6'>stream-empty?</a> s2 18 <a href='401test.mu.html#L8'>check-not</a> tmp, "F - <a href='404stream.mu.html#L3'>test-stream</a>/empty?/1" 19 tmp <- <a href='309stream.subx.html#L30'>stream-full?</a> s2 20 <a href='401test.mu.html#L8'>check-not</a> tmp, "F - <a href='404stream.mu.html#L3'>test-stream</a>/full?/1" 21 # step 3: modify the value written (should make no difference) 22 copy-to x, 0 23 # step 4: read back 24 var y: int 25 var y2/ebx: (addr int) <- address y 26 <a href='309stream.subx.html#L107'>read-from-stream</a> s2, y2 27 tmp <- <a href='309stream.subx.html#L6'>stream-empty?</a> s2 28 <a href='401test.mu.html#L3'>check</a> tmp, "F - <a href='404stream.mu.html#L3'>test-stream</a>/empty?/2" 29 tmp <- <a href='309stream.subx.html#L30'>stream-full?</a> s2 30 <a href='401test.mu.html#L8'>check-not</a> tmp, "F - <a href='404stream.mu.html#L3'>test-stream</a>/full?/2" 31 # we read back what was written 32 <a href='102test.subx.html#L23'>check-ints-equal</a> y, 0x34, "F - test-stream" 33 } 34 35 fn <a href='404stream.mu.html#L35'>test-stream-full</a> { 36 # write an int to a stream of capacity 1 37 var s: (stream int 1) 38 var s2/ecx: (addr stream int) <- address s 39 var tmp/eax: boolean <- <a href='309stream.subx.html#L30'>stream-full?</a> s2 40 <a href='401test.mu.html#L8'>check-not</a> tmp, "F - test-stream-full?/pre" 41 var x: int 42 var x2/edx: (addr int) <- address x 43 <a href='309stream.subx.html#L54'>write-to-stream</a> s2, x2 44 tmp <- <a href='309stream.subx.html#L30'>stream-full?</a> s2 45 <a href='401test.mu.html#L3'>check</a> tmp, "F - test-stream-full?" 46 } 47 48 fn <a href='404stream.mu.html#L48'>test-fake-input-buffered-file</a> { 49 var foo: (handle buffered-file) 50 var foo-ah/eax: (addr handle buffered-file) <- address foo 51 <a href='306files.subx.html#L89'>populate-buffered-file-containing</a> "abc", foo-ah 52 var foo-addr/eax: (addr buffered-file) <- <a href='120allocate.subx.html#L258'>lookup</a> foo 53 var s: (stream byte 0x100) 54 var result/ecx: (addr stream byte) <- address s 55 <a href='122read-line.subx.html#L9'>read-line-buffered</a> foo-addr, result 56 <a href='109stream-equal.subx.html#L194'>check-stream-equal</a> result, "abc", "F - test-fake-input-buffered-file" 57 } 58 59 fn <a href='404stream.mu.html#L59'>test-fake-output-buffered-file</a> { 60 var foo: (handle buffered-file) 61 var foo-ah/eax: (addr handle buffered-file) <- address foo 62 <a href='306files.subx.html#L135'>new-buffered-file</a> foo-ah 63 var foo-addr/eax: (addr buffered-file) <- <a href='120allocate.subx.html#L258'>lookup</a> foo 64 <a href='116write-buffered.subx.html#L8'>write-buffered</a> foo-addr, "abc" 65 var s: (stream byte 0x100) 66 var result/ecx: (addr stream byte) <- address s 67 <a href='122read-line.subx.html#L9'>read-line-buffered</a> foo-addr, result 68 <a href='109stream-equal.subx.html#L194'>check-stream-equal</a> result, "abc", "F - test-fake-output-buffered-file" 69 } </pre> </body> </html>


context:
space:
mode: