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

diff options

Diffstat (limited to 'x.mu')

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/406int32.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/406int32.mu'>https://github.com/akkartik/mu/blob/main/linux/406int32.mu</a> <pre id='vimCodeElement'> 1 # Some slow but convenient helpers 2 3 # slow, iterative shift-left instruction 4 # preconditions: _nr >= 0, _dr > 0 5 fn <a href='406int32.mu.html#L5'>repeated-shift-left</a> nr: int, dr: int -> _/eax: int { 6 var result/eax: int <- copy nr 7 { 8 compare dr, 0 9 break-if-<= 10 result <- shift-left 1 11 decrement dr 12 loop 13 } 14 return result 15 } 16 17 # slow, iterative shift-right instruction 18 # preconditions: _nr >= 0, _dr > 0 19 fn <a href='406int32.mu.html#L19'>repeated-shift-right</a> nr: int, dr: int -> _/eax: int { 20 var result/eax: int <- copy nr 21 { 22 compare dr, 0 23 break-if-<= 24 result <- shift-right 1 25 decrement dr 26 loop 27 } 28 return result 29 } 30 31 fn <a href='406int32.mu.html#L31'>abs</a> n: int -> _/eax: int { 32 var result/eax: int <- copy n 33 { 34 compare n, 0 35 break-if->= 36 result <- negate 37 } 38 return result 39 } </pre> </body> </html>


context:
space:
mode: