42 - update Readme - mu - Soul of a tiny new machine. More thorough tests → More comprehensible and rewrite-friendly software → More resilient society.

diff options

author	Kartik K. Agaram <vc@akkartik.com>	2014-07-31 02:08:23 -0700
committer	Kartik K. Agaram <vc@akkartik.com>	2014-07-31 02:09:45 -0700
commit	fa234f9a861e15e439f649d8f0c9284e1bb46cfb (patch)
tree	454bf2bd3b97b06f3204c279e1e642d09ee91c5a
parent	66a52b5ff217de8035cb7829d33c630f1bb1462b (diff)
download	mu-fa234f9a861e15e439f649d8f0c9284e1bb46cfb.tar.gz

42 - update Readme

Broken since commit 11 on Jul 10.

Diffstat

-rw-r--r--

Readme

-rw-r--r--

x.mu

2 files changed, 6 insertions, 6 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/advent2020/2b.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/advent2020/2b.mu'>https://github.com/akkartik/mu/blob/master/apps/advent2020/2b.mu</a> <pre id='vimCodeElement'> 1 # <a href="https://adventofcode.com/2020/day/2">https://adventofcode.com/2020/day/2</a> 2 # 3 # To run (on Linux): 4 # $ git clone <a href="https://github.com/akkartik/mu">https://github.com/akkartik/mu</a> 5 # $ cd mu 6 # $ ./translate_mu apps/advent2020/2b.mu 7 # $ ./a.elf < input 8 # 9 # You'll need to register to download the 'input' file for yourself. 10 11 fn main -> _/ebx: int { 12 var valid-password-count/edi: int <- copy 0 13 var line-storage: (stream byte 0x100) # 256 bytes 14 var line/edx: (addr stream byte) <- address line-storage 15 var slice-storage: slice 16 var slice/ecx: (addr slice) <- address slice-storage 17 { 18 # read line from stdin 19 <a href='../../106stream.subx.html#L17'>clear-stream</a> line 20 <a href='../../305keyboard.subx.html#L158'>read-line-from-real-keyboard</a> line 21 # if line is empty (not even a newline), quit 22 var done?/eax: boolean <- <a href='../../309stream.subx.html#L6'>stream-empty?</a> line 23 compare done?, 0 # false 24 break-if-!= 25 <a href='../../304screen.subx.html#L147'>print-stream-to-real-screen</a> line 26 # slice = next-token(line, '-') 27 <a href='../../124next-token.subx.html#L10'>next-token</a> line, 0x2d, slice 28 # pos1 = parse-int(slice) 29 var _pos1/eax: int <- <a href='../../311decimal-int.subx.html#L4'>parse-decimal-int-from-slice</a> slice 30 var pos1/ebx: int <- copy _pos1 31 var dash/eax: byte <- <a href='../../112read-byte.subx.html#L273'>read-byte</a> line # skip '-' 32 # slice = next-token(line, ' ') 33 <a href='../../124next-token.subx.html#L10'>next-token</a> line, 0x20, slice 34 var _pos2/eax: int <- <a href='../../311decimal-int.subx.html#L4'>parse-decimal-int-from-slice</a> slice 35 var pos2/esi: int <- copy _pos2 36 <a href='../../405screen.mu.html#L480'>print-int32-decimal</a> 0, pos1 37 <a href='../../405screen.mu.html#L169'>print-string</a> 0, " " 38 <a href='../../405screen.mu.html#L480'>print-int32-decimal</a> 0, pos2 39 <a href='../../405screen.mu.html#L169'>print-string</a> 0, "\n" 40 compare pos1, pos2 41 { 42 break-if-<= 43 <a href='../../405screen.mu.html#L169'>print-string</a> 0, "out of order!\n" 44 return 1 45 } 46 # letter = next non-space 47 <a href='../../124next-token.subx.html#L464'>skip-chars-matching-whitespace</a> line 48 var letter/eax: byte <- <a href='../../112read-byte.subx.html#L273'>read-byte</a> line 49 # skip some stuff 50 { 51 var colon/eax: byte <- <a href='../../112read-byte.subx.html#L273'>read-byte</a> line # skip ':' 52 } 53 <a href='../../124next-token.subx.html#L464'>skip-chars-matching-whitespace</a> line 54 # now check the rest of the line 55 var is-valid?/eax: boolean <- is-valid? pos1, pos2, letter, line 56 compare is-valid?, 0 # false 57 { 58 break-if-= 59 <a href='../../405screen.mu.html#L169'>print-string</a> 0, "valid!\n" 60 valid-password-count <- increment 61 } 62 loop 63 } 64 <a href='../../405screen.mu.html#L480'>print-int32-decimal</a> 0, valid-password-count 65 <a href='../../405screen.mu.html#L169'>print-string</a> 0, "\n" 66 return 0 67 } 68 69 # ideally password would be a random-access array 70 # we'll just track an index 71 # one benefit: we can easily start at 1 72 fn is-valid? pos1: int, pos2: int, letter: byte, password: (addr stream byte) -> _/eax: boolean { 73 var i/esi: int <- copy 1 74 var letter-count/edi: int <- copy 0 75 # while password stream isn't empty 76 # c = read byte from password 77 # if (c == letter) 78 # if (i == pos1) 79 # ++letter-count 80 # if (i == pos2) 81 # ++letter-count 82 # ++i 83 { 84 #? print-string 0, " " 85 #? print-int32-decimal 0, i 86 #? print-string 0, "\n" 87 var done?/eax: boolean <- <a href='../../309stream.subx.html#L6'>stream-empty?</a> password 88 compare done?, 0 # false 89 break-if-!= 90 var c/eax: byte <- <a href='../../112read-byte.subx.html#L273'>read-byte</a> password 91 #? { 92 #? var c2/eax: int <- copy c 93 #? print-int32-decimal 0, c2 94 #? print-string 0, "\n" 95 #? } 96 compare c, letter 97 { 98 break-if-!= 99 compare i, pos1 100 { 101 break-if-!= 102 letter-count <- increment 103 #? print-string 0, " hit\n" 104 } 105 compare i, pos2 106 { 107 break-if-!= 108 letter-count <- increment 109 #? print-string 0, " hit\n" 110 } 111 } 112 i <- increment 113 loop 114 } 115 # return (letter-count == 1) 116 compare letter-count, 1 117 { 118 break-if-!= 119 return 1 # true 120 } 121 return 0 # false 122 } </pre> </body> </html>


context:
space:
mode: