* - tour - touring some programming systems

diff options

author	elioat <{ID}+{username}@users.noreply.github.com>	2024-06-13 15:58:39 -0400
committer	elioat <{ID}+{username}@users.noreply.github.com>	2024-06-13 15:58:39 -0400
commit	4b1fb59f84a586cab926dec491e75e3174bae541 (patch)
tree	84f0743bf8c652d0e7088b3081f83ecfa45e1f1a /js/magic-bird/imgs/extracted-1688-map/MapParts/towns/88.png
parent	7bc40a35ef259798c9e76b1cf084f5b52b4ec64a (diff)
download	tour-4b1fb59f84a586cab926dec491e75e3174bae541.tar.gz

Diffstat (limited to 'js/magic-bird/imgs/extracted-1688-map/MapParts/towns/88.png')

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/tile/grapheme-stack.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/tile/grapheme-stack.mu'>https://github.com/akkartik/mu/blob/master/apps/tile/grapheme-stack.mu</a> <pre id='vimCodeElement'> 1 type <a href='grapheme-stack.mu.html#L1'>grapheme-stack</a> { 2 data: (handle array grapheme) 3 <a href='../../203stack.subx.html#L338'>top</a>: int 4 } 5 6 fn <a href='grapheme-stack.mu.html#L6'>initialize-grapheme-stack</a> _self: (addr <a href='grapheme-stack.mu.html#L1'>grapheme-stack</a>), n: int { 7 var self/esi: (addr <a href='grapheme-stack.mu.html#L1'>grapheme-stack</a>) <- copy _self 8 var d/edi: (addr handle array grapheme) <- <a href='../../131table.subx.html#L26'>get</a> self, data 9 populate d, n 10 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> 11 copy-to *top, 0 12 } 13 14 fn <a href='grapheme-stack.mu.html#L14'>grapheme-stack-empty?</a> _self: (addr <a href='grapheme-stack.mu.html#L1'>grapheme-stack</a>) -> result/eax: boolean { 15 $grapheme-stack-empty?:body: { 16 var self/esi: (addr <a href='grapheme-stack.mu.html#L1'>grapheme-stack</a>) <- copy _self 17 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> 18 compare *top, 0 19 { 20 break-if-= 21 result <- copy 1 # false 22 break $grapheme-stack-empty?:body 23 } 24 result <- copy 0 # false 25 } 26 } 27 28 fn <a href='grapheme-stack.mu.html#L28'>push-grapheme-stack</a> _self: (addr <a href='grapheme-stack.mu.html#L1'>grapheme-stack</a>), _val: grapheme { 29 var self/esi: (addr <a href='grapheme-stack.mu.html#L1'>grapheme-stack</a>) <- copy _self 30 var top-addr/ecx: (addr int) <- <a href='../../131table.subx.html#L26'>get</a> self, <a href='../../203stack.subx.html#L338'>top</a> 31 var data-ah/edx: (addr handle array grapheme) <- <a href='../../131table.subx.html#L26'>get</a> self, data 32 var data/eax: (addr array grapheme) <- <a href='../../120allocate.subx.html#L256'>lookup</a> *data-ah 33 var <a href='../../203stack.subx.html#L338'>top</a>/edx: int <- copy *top-addr 34 var dest-addr/edx: (addr grapheme) <- index data, <a href='../../203stack.subx.html#L338'>top</a> 35 var val/eax: grapheme <- copy _val 36 copy-to *dest-addr, val 37 add-to *top-addr, 1 38 } 39 40 fn <a href='grapheme-stack.mu.html#L40'>pop-grapheme-stack</a> _self: (addr <a href='grapheme-stack.mu.html#L1'>grapheme-stack</a>) -> val/eax: grapheme { 41 $pop-grapheme-stack:body: { 42 var self/esi: (addr <a href='grapheme-stack.mu.html#L1'>grapheme-stack</a>) <- copy _self 43 var top-addr/ecx: (addr int) <- <a href='../../131table.subx.html#L26'>get</a> self, <a href='../../203stack.subx.html#L338'>top</a> 44 { 45 compare *top-addr, 0 46 break-if-> 47 val <- copy -1 48 break $pop-grapheme-stack:body 49 } 50 subtract-from *top-addr, 1 51 var data-ah/edx: (addr handle array grapheme) <- <a href='../../131table.subx.html#L26'>get</a> self, data 52 var data/eax: (addr array grapheme) <- <a href='../../120allocate.subx.html#L256'>lookup</a> *data-ah 53 var <a href='../../203stack.subx.html#L338'>top</a>/edx: int <- copy *top-addr 54 var result-addr/eax: (addr grapheme) <- index data, <a href='../../203stack.subx.html#L338'>top</a> 55 val <- copy *result-addr 56 } 57 } 58 59 # dump stack to screen from bottom to top 60 # don't move the cursor or anything 61 fn <a href='grapheme-stack.mu.html#L61'>render-stack-from-bottom</a> _self: (addr <a href='grapheme-stack.mu.html#L1'>grapheme-stack</a>), <a href='../../405screen.mu.html#L9'>screen</a>: (addr <a href='../../405screen.mu.html#L9'>screen</a>) { 62 var self/esi: (addr <a href='grapheme-stack.mu.html#L1'>grapheme-stack</a>) <- copy _self 63 var data-ah/edi: (addr handle array grapheme) <- <a href='../../131table.subx.html#L26'>get</a> self, data 64 var _data/eax: (addr array grapheme) <- <a href='../../120allocate.subx.html#L256'>lookup</a> *data-ah 65 var data/edi: (addr array grapheme) <- copy _data 66 var top-addr/ecx: (addr int) <- <a href='../../131table.subx.html#L26'>get</a> self, <a href='../../203stack.subx.html#L338'>top</a> 67 var i/eax: int <- copy 0 68 { 69 compare i, *top-addr 70 break-if->= 71 var g/edx: (addr grapheme) <- index data, i 72 <a href='../../405screen.mu.html#L206'>print-grapheme</a> <a href='../../405screen.mu.html#L9'>screen</a>, *g 73 i <- increment 74 loop 75 } 76 } 77 78 # dump stack to screen from top to bottom 79 # don't move the cursor or anything 80 fn <a href='grapheme-stack.mu.html#L80'>render-stack-from-top</a> _self: (addr <a href='grapheme-stack.mu.html#L1'>grapheme-stack</a>), <a href='../../405screen.mu.html#L9'>screen</a>: (addr <a href='../../405screen.mu.html#L9'>screen</a>) { 81 var self/esi: (addr <a href='grapheme-stack.mu.html#L1'>grapheme-stack</a>) <- copy _self 82 var data-ah/edi: (addr handle array grapheme) <- <a href='../../131table.subx.html#L26'>get</a> self, data 83 var _data/eax: (addr array grapheme) <- <a href='../../120allocate.subx.html#L256'>lookup</a> *data-ah 84 var data/edi: (addr array grapheme) <- copy _data 85 var top-addr/ecx: (addr int) <- <a href='../../131table.subx.html#L26'>get</a> self, <a href='../../203stack.subx.html#L338'>top</a> 86 var i/eax: int <- copy *top-addr 87 i <- decrement 88 { 89 compare i, 0 90 break-if-< 91 var g/edx: (addr grapheme) <- index data, i 92 <a href='../../405screen.mu.html#L206'>print-grapheme</a> <a href='../../405screen.mu.html#L9'>screen</a>, *g 93 i <- decrement 94 loop 95 } 96 } 97 98 # compare from bottom 99 # beware: modifies 'stream', which must be disposed of after a false result 100 fn <a href='grapheme-stack.mu.html#L100'>prefix-match?</a> _self: (addr <a href='grapheme-stack.mu.html#L1'>grapheme-stack</a>), s: (addr stream byte) -> result/eax: boolean { 101 $prefix-match?:body: { 102 var self/esi: (addr <a href='grapheme-stack.mu.html#L1'>grapheme-stack</a>) <- copy _self 103 var data-ah/edi: (addr handle array grapheme) <- <a href='../../131table.subx.html#L26'>get</a> self, data 104 var _data/eax: (addr array grapheme) <- <a href='../../120allocate.subx.html#L256'>lookup</a> *data-ah 105 var data/edi: (addr array grapheme) <- copy _data 106 var top-addr/ecx: (addr int) <- <a href='../../131table.subx.html#L26'>get</a> self, <a href='../../203stack.subx.html#L338'>top</a> 107 var i/ebx: int <- copy 0 108 { 109 compare i, *top-addr 110 break-if->= 111 # if curr != expected, return false 112 { 113 var curr-a/edx: (addr grapheme) <- index data, i 114 var expected/eax: grapheme <- <a href='../../403unicode.mu.html#L160'>read-grapheme</a> s 115 { 116 compare expected, *curr-a 117 break-if-= 118 result <- copy 0 # false 119 break $prefix-match?:body 120 } 121 } 122 i <- increment 123 loop 124 } 125 result <- copy 1 # true 126 } 127 } 128 129 # compare from bottom 130 # beware: modifies 'stream', which must be disposed of after a false result 131 fn <a href='grapheme-stack.mu.html#L131'>suffix-match?</a> _self: (addr <a href='grapheme-stack.mu.html#L1'>grapheme-stack</a>), s: (addr stream byte) -> result/eax: boolean { 132 $suffix-match?:body: { 133 var self/esi: (addr <a href='grapheme-stack.mu.html#L1'>grapheme-stack</a>) <- copy _self 134 var data-ah/edi: (addr handle array grapheme) <- <a href='../../131table.subx.html#L26'>get</a> self, data 135 var _data/eax: (addr array grapheme) <- <a href='../../120allocate.subx.html#L256'>lookup</a> *data-ah 136 var data/edi: (addr array grapheme) <- copy _data 137 var top-addr/eax: (addr int) <- <a href='../../131table.subx.html#L26'>get</a> self, <a href='../../203stack.subx.html#L338'>top</a> 138 var i/ebx: int <- copy *top-addr 139 i <- decrement 140 { 141 compare i, 0 142 break-if-< 143 { 144 var curr-a/edx: (addr grapheme) <- index data, i 145 var expected/eax: grapheme <- <a href='../../403unicode.mu.html#L160'>read-grapheme</a> s 146 # if curr != expected, return false 147 { 148 compare expected, *curr-a 149 break-if-= 150 result <- copy 0 # false 151 break $suffix-match?:body 152 } 153 } 154 i <- decrement 155 loop 156 } 157 result <- copy 1 # true 158 } 159 } </pre> </body> </html>


context:
space:
mode: