Nim - This repository contains the Nim compiler, Nim's stdlib, tools, and documentation. (mirror)

diff options

Diffstat (limited to 'compiler/plugins/itersgen.nim')

-rw-r--r--

1 files changed, 1 insertions, 3 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 - 406try-divide.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/406try-divide.mu'>https://github.com/akkartik/mu/blob/master/406try-divide.mu</a> <pre id='vimCodeElement'> 1 # slow, iterative divide instruction 2 # preconditions: _nr >= 0, _dr > 0 3 fn <a href='406try-divide.mu.html#L3'>try-divide</a> _nr: int, _dr: int -> _/eax: int { 4 # x = next power-of-2 multiple of _dr after _nr 5 var x/ecx: int <- copy 1 6 { 7 #? print-int32-hex 0, x 8 #? print-string 0, "\n" 9 var tmp/edx: int <- copy _dr 10 tmp <- multiply x 11 compare tmp, _nr 12 break-if-> 13 x <- shift-left 1 14 loop 15 } 16 #? print-string 0, "--\n" 17 # min, max = x/2, x 18 var max/ecx: int <- copy x 19 var min/edx: int <- copy max 20 min <- shift-right 1 21 # narrow down result between min and max 22 var i/eax: int <- copy min 23 { 24 #? print-int32-hex 0, i 25 #? print-string 0, "\n" 26 var foo/ebx: int <- copy _dr 27 foo <- multiply i 28 compare foo, _nr 29 break-if-> 30 i <- increment 31 loop 32 } 33 var result/eax: int <- copy i 34 result <- decrement 35 #? print-string 0, "=> " 36 #? print-int32-hex 0, result 37 #? print-string 0, "\n" 38 return result 39 } 40 41 fn <a href='406try-divide.mu.html#L41'>test-try-divide-1</a> { 42 var result/eax: int <- <a href='406try-divide.mu.html#L3'>try-divide</a> 0, 2 43 <a href='102test.subx.html#L23'>check-ints-equal</a> result, 0, "F - try-divide-1" 44 } 45 46 fn <a href='406try-divide.mu.html#L46'>test-try-divide-2</a> { 47 var result/eax: int <- <a href='406try-divide.mu.html#L3'>try-divide</a> 1, 2 48 <a href='102test.subx.html#L23'>check-ints-equal</a> result, 0, "F - try-divide-2" 49 } 50 51 fn <a href='406try-divide.mu.html#L51'>test-try-divide-3</a> { 52 var result/eax: int <- <a href='406try-divide.mu.html#L3'>try-divide</a> 2, 2 53 <a href='102test.subx.html#L23'>check-ints-equal</a> result, 1, "F - try-divide-3" 54 } 55 56 fn <a href='406try-divide.mu.html#L56'>test-try-divide-4</a> { 57 var result/eax: int <- <a href='406try-divide.mu.html#L3'>try-divide</a> 4, 2 58 <a href='102test.subx.html#L23'>check-ints-equal</a> result, 2, "F - try-divide-4" 59 } 60 61 fn <a href='406try-divide.mu.html#L61'>test-try-divide-5</a> { 62 var result/eax: int <- <a href='406try-divide.mu.html#L3'>try-divide</a> 6, 2 63 <a href='102test.subx.html#L23'>check-ints-equal</a> result, 3, "F - try-divide-5" 64 } 65 66 fn <a href='406try-divide.mu.html#L66'>test-try-divide-6</a> { 67 var result/eax: int <- <a href='406try-divide.mu.html#L3'>try-divide</a> 9, 3 68 <a href='102test.subx.html#L23'>check-ints-equal</a> result, 3, "F - try-divide-6" 69 } 70 71 fn <a href='406try-divide.mu.html#L71'>test-try-divide-7</a> { 72 var result/eax: int <- <a href='406try-divide.mu.html#L3'>try-divide</a> 0xc, 4 73 <a href='102test.subx.html#L23'>check-ints-equal</a> result, 3, "F - try-divide-7" 74 } 75 76 fn <a href='406try-divide.mu.html#L76'>test-try-divide-8</a> { 77 var result/eax: int <- <a href='406try-divide.mu.html#L3'>try-divide</a> 0x1b, 3 # 27/3 78 <a href='102test.subx.html#L23'>check-ints-equal</a> result, 9, "F - try-divide-8" 79 } 80 81 fn <a href='406try-divide.mu.html#L81'>test-try-divide-9</a> { 82 var result/eax: int <- <a href='406try-divide.mu.html#L3'>try-divide</a> 0x1c, 3 # 28/3 83 <a href='102test.subx.html#L23'>check-ints-equal</a> result, 9, "F - try-divide-9" 84 } 85 86 # only positive dr for now 87 fn <a href='406try-divide.mu.html#L87'>try-modulo</a> nr: int, dr: int -> _/eax: int { 88 var _positive-nr/eax: int <- <a href='406try-divide.mu.html#L102'>abs</a> nr 89 var positive-nr/ecx: int <- copy _positive-nr 90 var result/eax: int <- <a href='406try-divide.mu.html#L3'>try-divide</a> positive-nr, dr 91 result <- multiply dr 92 result <- subtract positive-nr 93 result <- negate 94 return result 95 } 96 97 fn <a href='406try-divide.mu.html#L97'>test-try-modulo-negative-nr</a> { 98 var result/eax: int <- <a href='406try-divide.mu.html#L87'>try-modulo</a> -0xa, 7 99 <a href='102test.subx.html#L23'>check-ints-equal</a> result, 3, "F - test-try-modulo-negative-nr" 100 } 101 102 fn <a href='406try-divide.mu.html#L102'>abs</a> n: int -> _/eax: int { 103 var result/eax: int <- copy n 104 { 105 compare n, 0 106 break-if->= 107 result <- negate 108 } 109 return result 110 } </pre> </body> </html>


context:
space:
mode: