main: minor edit - ranger - mirror of ranger - a simple, vim-like file manager

diff options

author	hut <hut@lavabit.com>	2010-06-05 04:28:23 +0200
committer	hut <hut@lavabit.com>	2010-06-05 04:28:55 +0200
commit	142a312727071bd07cc2dcac6e3920eb0e19fb37 (patch)
tree	0c560ae3a04371a4f0b87dddf2ec1fac2f87723b /doc/pydoc/ranger.ext.shutil_generatorized.html
parent	2749081931a2c86cac2b8e37920006843f06e246 (diff)
download	ranger-142a312727071bd07cc2dcac6e3920eb0e19fb37.tar.gz

main: minor edit

Diffstat (limited to 'doc/pydoc/ranger.ext.shutil_generatorized.html')

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 - apps/rpn.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-light"> <style type="text/css">  </style> <script type='text/javascript'>  </script> </head> <body onload='JumpToLine();'> <a href='https://github.com/akkartik/mu/blob/master/apps/rpn.mu'>https://github.com/akkartik/mu/blob/master/apps/rpn.mu</a> <pre id='vimCodeElement'> 1 # Integer arithmetic using postfix notation 2 # 3 # Limitations: 4 # No division yet. 5 # 6 # To build: 7 # $ ./translate_mu apps/rpn.mu 8 # 9 # Example session: 10 # $ ./a.elf 11 # press ctrl-c or ctrl-d to exit 12 # > 1 13 # 1 14 # > 1 1 + 15 # 2 16 # > 1 2 3 + + 17 # 6 18 # > 1 2 3 * + 19 # 7 20 # > 1 2 + 3 * 21 # 9 22 # > 1 3 4 * + 23 # 13 24 # > ^D 25 # $ 26 # 27 # Error handling is non-existent. This is just a prototype. 28 29 fn <a href='rpn.mu.html#L29'>main</a> -> exit-status/ebx: int { 30 var in-storage: (stream byte 0x100) 31 var in/esi: (addr stream byte) <- address in-storage 32 <a href='../405screen.mu.html#L179'>print-string</a> 0, "press ctrl-c or ctrl-d to exit\n" 33 # read-eval-print loop 34 { 35 # print prompt 36 <a href='../405screen.mu.html#L179'>print-string</a> 0, "> " 37 # read line 38 <a href='../106stream.subx.html#L17'>clear-stream</a> in 39 <a href='../305keyboard.subx.html#L158'>read-line-from-real-keyboard</a> in 40 var done?/eax: boolean <- <a href='../309stream.subx.html#L6'>stream-empty?</a> in 41 compare done?, 0 42 break-if-!= 43 # parse and eval 44 var out/eax: int <- <a href='rpn.mu.html#L59'>simplify</a> in 45 # print 46 <a href='../405screen.mu.html#L481'>print-int32-decimal</a> 0, out 47 <a href='../405screen.mu.html#L179'>print-string</a> 0, "\n" 48 # 49 loop 50 } 51 exit-status <- copy 0 52 } 53 54 type <a href='rpn.mu.html#L54'>int-stack</a> { 55 data: (handle array int) 56 <a href='../203stack.subx.html#L338'>top</a>: int 57 } 58 59 fn <a href='rpn.mu.html#L59'>simplify</a> in: (addr stream byte) -> result/eax: int { 60 var word-storage: slice 61 var word/ecx: (addr slice) <- address word-storage 62 var stack-storage: <a href='rpn.mu.html#L54'>int-stack</a> 63 var stack/esi: (addr <a href='rpn.mu.html#L54'>int-stack</a>) <- address stack-storage 64 <a href='rpn.mu.html#L112'>initialize-int-stack</a> stack, 0x10 65 $simplify:word-loop: { 66 <a href='../127next-word.subx.html#L10'>next-word</a> in, word 67 var done?/eax: boolean <- <a href='../123slice.subx.html#L9'>slice-empty?</a> word 68 compare done?, 0 69 break-if-!= 70 # if word is an operator, perform it 71 { 72 var is-add?/eax: boolean <- <a href='../123slice.subx.html#L120'>slice-equal?</a> word, "+" 73 compare is-add?, 0 74 break-if-= 75 var _b/eax: int <- <a href='rpn.mu.html#L132'>pop-int-stack</a> stack 76 var b/edx: int <- copy _b 77 var a/eax: int <- <a href='rpn.mu.html#L132'>pop-int-stack</a> stack 78 a <- add b 79 <a href='rpn.mu.html#L120'>push-int-stack</a> stack, a 80 loop $simplify:word-loop 81 } 82 { 83 var is-sub?/eax: boolean <- <a href='../123slice.subx.html#L120'>slice-equal?</a> word, "-" 84 compare is-sub?, 0 85 break-if-= 86 var _b/eax: int <- <a href='rpn.mu.html#L132'>pop-int-stack</a> stack 87 var b/edx: int <- copy _b 88 var a/eax: int <- <a href='rpn.mu.html#L132'>pop-int-stack</a> stack 89 a <- subtract b 90 <a href='rpn.mu.html#L120'>push-int-stack</a> stack, a 91 loop $simplify:word-loop 92 } 93 { 94 var is-mul?/eax: boolean <- <a href='../123slice.subx.html#L120'>slice-equal?</a> word, "*" 95 compare is-mul?, 0 96 break-if-= 97 var _b/eax: int <- <a href='rpn.mu.html#L132'>pop-int-stack</a> stack 98 var b/edx: int <- copy _b 99 var a/eax: int <- <a href='rpn.mu.html#L132'>pop-int-stack</a> stack 100 a <- multiply b 101 <a href='rpn.mu.html#L120'>push-int-stack</a> stack, a 102 loop $simplify:word-loop 103 } 104 # otherwise it's an int 105 var n/eax: int <- <a href='../311decimal-int.subx.html#L3'>parse-decimal-int-from-slice</a> word 106 <a href='rpn.mu.html#L120'>push-int-stack</a> stack, n 107 loop 108 } 109 result <- <a href='rpn.mu.html#L132'>pop-int-stack</a> stack 110 } 111 112 fn <a href='rpn.mu.html#L112'>initialize-int-stack</a> _self: (addr <a href='rpn.mu.html#L54'>int-stack</a>), n: int { 113 var self/esi: (addr <a href='rpn.mu.html#L54'>int-stack</a>) <- copy _self 114 var d/edi: (addr handle array int) <- <a href='../131table.subx.html#L26'>get</a> self, data 115 populate d, n 116 var <a href='../203stack.subx.html#L338'>top</a>/eax: (addr int) <- <a href='../131table.subx.html#L26'>get</a> self, <a href='../203stack.subx.html#L338'>top</a> 117 copy-to *top, 0 118 } 119 120 fn <a href='rpn.mu.html#L120'>push-int-stack</a> _self: (addr <a href='rpn.mu.html#L54'>int-stack</a>), _val: int { 121 var self/esi: (addr <a href='rpn.mu.html#L54'>int-stack</a>) <- copy _self 122 var top-addr/ecx: (addr int) <- <a href='../131table.subx.html#L26'>get</a> self, <a href='../203stack.subx.html#L338'>top</a> 123 var data-ah/edx: (addr handle array int) <- <a href='../131table.subx.html#L26'>get</a> self, data 124 var data/eax: (addr array int) <- <a href='../120allocate.subx.html#L256'>lookup</a> *data-ah 125 var <a href='../203stack.subx.html#L338'>top</a>/edx: int <- copy *top-addr 126 var dest-addr/edx: (addr int) <- index data, <a href='../203stack.subx.html#L338'>top</a> 127 var val/eax: int <- copy _val 128 copy-to *dest-addr, val 129 add-to *top-addr, 1 130 } 131 132 fn <a href='rpn.mu.html#L132'>pop-int-stack</a> _self: (addr <a href='rpn.mu.html#L54'>int-stack</a>) -> val/eax: int { 133 $pop-int-stack:body: { 134 var self/esi: (addr <a href='rpn.mu.html#L54'>int-stack</a>) <- copy _self 135 var top-addr/ecx: (addr int) <- <a href='../131table.subx.html#L26'>get</a> self, <a href='../203stack.subx.html#L338'>top</a> 136 { 137 compare *top-addr, 0 138 break-if-> 139 val <- copy 0 140 break $pop-int-stack:body 141 } 142 subtract-from *top-addr, 1 143 var data-ah/edx: (addr handle array int) <- <a href='../131table.subx.html#L26'>get</a> self, data 144 var data/eax: (addr array int) <- <a href='../120allocate.subx.html#L256'>lookup</a> *data-ah 145 var <a href='../203stack.subx.html#L338'>top</a>/edx: int <- copy *top-addr 146 var result-addr/eax: (addr int) <- index data, <a href='../203stack.subx.html#L338'>top</a> 147 val <- copy *result-addr 148 } 149 } </pre> </body> </html>


context:
space:
mode: