about summary refs log blame commit diff stats
path: root/html/063array.mu.html
blob: 0a604f12f2525e6f0ee2114533f82fb0e25eda21 (plain) (tree) 
672e3e50 ^




298f8065 ^

c762564b ^

a654e4ec ^

672e3e50 ^

e5c11a51 ^

ac07e589 ^

672e3e50 ^


ac07e589 ^


08a0eed6 ^

e4ac3c9e ^

ac07e589 ^

5fe060d5 ^

c762564b ^

ac07e589 ^





672e3e50 ^


a654e4ec ^




e5c11a51 ^























a654e4ec ^


672e3e50 ^

e5c11a51 ^

e4ac3c9e ^

a654e4ec ^

204dae92 ^


805d58c6 ^

b301e0c0 ^

805d58c6 ^

204dae92 ^


805d58c6 ^




204dae92 ^




b301e0c0 ^

204dae92 generated by cgit-pink 1.4.1-2-gfad0 (git 2.36.2.497.gbbea4dcf42) at 2024-12-30 20:13:46 +0000
/div>
16

17

18

19

20
21
22
23
24

25
26

27
28
29
30

31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53

54
55

56

57

58

59

60
61

62

63

64

65
66

67
68
69
70

71
72
73
74

75

76

77

78

79
80
81

82

83

84

85

86

87
88

89

90

91
92
93
94
95
96

97

98

99
100
101
102

103

104

105

106
107
108

109
110
111
112
113
114
115

116
117
118
119
120
121
122

123

124

125
126

127
128
129
130

131
132
133
134
135
136
137
138

139

140

141
142

143
144
145
146

147
148
149

150

151
152
153

154

155

156
157

158
159
160
161

162
163
164
165
166

167

168

169

170
171
172
173
174
175
176
177
178

179

180

181

182
183

184
185

186
187

188
189
190
191
192
193
194

195

196
197
198
199

200
201

202

203
204
205

206
207
208
209
210
211

212

213

214
215

216
217

218
219
220
221

222
223
224
225
226
227

228

229

230
231

232
233

234
235
236
237
238

239
240

241
242
243

244




                                                                                          
                               
                                         
                                                
                                   
                                                                                                               
                                                 

                       

                                                                                                 
                    
                                     
                              
                             
                               




                              

        



                               






















                                                                                 

         
       
                             
                                                                                                                           
                         

                                                                                                  
                                                                                     
                                                                                                                                                                                                                                           
                                                                                                                                

                                                                 



                                                                                                                                                                                            



                                                                                                             
                                                                                                                                                                                  
                                                                                    
                                                                                                                                                                     
                                                                           


                                                                                                                                                       
                                                                                                                                                                                                                  
                                                                                
                                                                           
                                                                                                                                                                                 
                                                                                      

                                                                                                                        
                                                                                                 
                                                                                                                                                             





                                                                                                                                                       
                                                                           
                                                                                       



                                                                                                                    
                                                                                                                                                                                            
                                                                                    
                                                                                    


                                                                                                                            






                                                                                                                                                       






                                                                                                                                                                              
                                                                                                                                                                        
                                                                                                                                     

                                                                  



                                                                                                                                                







                                                                                                                                                                              
                                                                                                                                                                        
                                                                                                                                     

                                                                  



                                                                                                                                                


                                            
                                                                                                                              


                                                                                                                                                                              
                                                                                                                                   
                                                                                                                                     

                                                                  



                                                                                                                                                 




                                                                                                      
                                                                                                                                                                                                                      
                                                                                     
                                                                                     








                                                                                                                                                                               
                                                                                                                                                                         
                                                 
                                                                                                                                                                                                       

                                                                                                                                                                      

                                                                   

                                                                                                                                                 






                                                                                                                                                                 
                                                                                     



                                                                                                                                       

                                                                                                                       
                                                                                                                                                 


                                                                                                                                  





                                                                                                                                                                               
                                                                                                                                                                       
                                                 

                                                                                                                                      

                                                                   



                                                                                                                                                 





                                                                                                                                                                               
                                                                                                                                                                         
                                                 

                                                                                                                                      

                                                                   




                                                                                                                                                 

                                             


       
                                     
<!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 - 063array.mu</title>
<meta name="Generator" content="Vim/8.0">
<meta name="plugin-version" content="vim7.4_v2">
<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">
<!--
pre { white-space: pre-wrap; font-family: monospace; color: #000000; background-color: #c6c6c6; }
body { font-size:12pt; font-family: monospace; color: #000000; background-color: #c6c6c6; }
a { color:inherit; }
* { font-size:12pt; font-size: 1em; }
.muControl { color: #804000; }
.muRecipe { color: #ff8700; }
.muScenario { color: #00af00; }
.LineNr { }
.Delimiter { color: #c000c0; }
.Constant { color: #008787; }
.Special { color: #ff6060; }
.Comment { color: #005faf; }
-->
</style>

<script type='text/javascript'>
<!--

/* function to open any folds containing a jumped-to line before jumping to it */
function JumpToLine()
{
  var lineNum;
  lineNum = window.location.hash;
  lineNum = lineNum.substr(1); /* strip off '#' */

  if (lineNum.indexOf('L') == -1) {
    lineNum = 'L'+lineNum;
  }
  lineElem = document.getElementById(lineNum);
  /* Always jump to new location even if the line was hidden inside a fold, or
   * we corrected the raw number to a line ID.
   */
  if (lineElem) {
    lineElem.scrollIntoView(true);
  }
  return true;
}
if ('onhashchange' in window) {
  window.onhashchange = JumpToLine;
}

-->
</script>
</head>
<body onload='JumpToLine();'>
<a href='https://github.com/akkartik/mu/blob/master/063array.mu'>https://github.com/akkartik/mu/blob/master/063array.mu</a>
<pre id='vimCodeElement'>
<span id="L1" class="LineNr">  1 </span><span class="muScenario">scenario</span> array-from-args [
<span id="L2" class="LineNr">  2 </span>  run [
<span id="L3" class="LineNr">  3 </span>    <span class="Constant">local-scope</span>
<span id="L4" class="LineNr">  4 </span>    x:&amp;:@:num <span class="Special">&lt;-</span> <a href='063array.mu.html#L16'>new-array</a><span class="Constant"> 0</span>,<span class="Constant"> 1</span>,<span class="Constant"> 2</span>
<span id="L5" class="LineNr">  5 </span>    10:@:num/<span class="Special">raw</span> <span class="Special">&lt;-</span> copy *x
<span id="L6" class="LineNr">  6 </span>  ]
<span id="L7" class="LineNr">  7 </span>  memory-should-contain [
<span id="L8" class="LineNr">  8 </span>   <span class="Constant"> 10</span> <span class="Special">&lt;-</span><span class="Constant"> 3</span>  <span class="Comment"># array length</span>
<span id="L9" class="LineNr">  9 </span>   <span class="Constant"> 11</span> <span class="Special">&lt;-</span><span class="Constant"> 0</span>
<span id="L10" class="LineNr"> 10 </span>   <span class="Constant"> 12</span> <span class="Special">&lt;-</span><span class="Constant"> 1</span>
<span id="L11" class="LineNr"> 11 </span>   <span class="Constant"> 13</span> <span class="Special">&lt;-</span><span class="Constant"> 2</span>
<span id="L12" class="LineNr"> 12 </span>  ]
<span id="L13" class="LineNr"> 13 </span>]
<span id="L14" class="LineNr"> 14 </span>
<span id="L15" class="LineNr"> 15 </span><span class="Comment"># create an array out of a list of args</span>
<span id="L16" class="LineNr"> 16 </span><span class="muRecipe">def</span> <a href='063array.mu.html#L16'>new-array</a><span class="muRecipe"> -&gt; </span>result:&amp;:@:_elem [
<span id="L17" class="LineNr"> 17 </span>  <span class="Constant">local-scope</span>
<span id="L18" class="LineNr"> 18 </span>  <a href='075channel.mu.html#L391'>capacity</a>:num <span class="Special">&lt;-</span> copy<span class="Constant"> 0</span>
<span id="L19" class="LineNr"> 19 </span>  <span class="Delimiter">{</span>
<span id="L20" class="LineNr"> 20 </span>    <span class="Comment"># while read curr-value</span>
<span id="L21" class="LineNr"> 21 </span>    curr-value:_elem, exists?:bool <span class="Special">&lt;-</span> <span class="Constant">next-input</span>
<span id="L22" class="LineNr"> 22 </span>    <span class="muControl">break-unless</span> exists?
<span id="L23" class="LineNr"> 23 </span>    <a href='075channel.mu.html#L391'>capacity</a> <span class="Special">&lt;-</span> add <a href='075channel.mu.html#L391'>capacity</a>,<span class="Constant"> 1</span>
<span id="L24" class="LineNr"> 24 </span>   <span class="muControl"> loop</span>
<span id="L25" class="LineNr"> 25 </span>  <span class="Delimiter">}</span>
<span id="L26" class="LineNr"> 26 </span>  result <span class="Special">&lt;-</span> new <span class="Constant">_elem:type</span>, <a href='075channel.mu.html#L391'>capacity</a>
<span id="L27" class="LineNr"> 27 </span>  <span class="Constant">rewind-inputs</span>
<span id="L28" class="LineNr"> 28 </span>  i:num <span class="Special">&lt;-</span> copy<span class="Constant"> 0</span>
<span id="L29" class="LineNr"> 29 </span>  <span class="Delimiter">{</span>
<span id="L30" class="LineNr"> 30 </span>    <span class="Comment"># while read curr-value</span>
<span id="L31" class="LineNr"> 31 </span>    done?:bool <span class="Special">&lt;-</span> greater-or-equal i, <a href='075channel.mu.html#L391'>capacity</a>
<span id="L32" class="LineNr"> 32 </span>    <span class="muControl">break-if</span> done?
<span id="L33" class="LineNr"> 33 </span>    curr-value:_elem, exists?:bool <span class="Special">&lt;-</span> <span class="Constant">next-input</span>
<span id="L34" class="LineNr"> 34 </span>    assert exists?, <span class="Constant">[error in rewinding inputs to new-array]</span>
<span id="L35" class="LineNr"> 35 </span>    *result <span class="Special">&lt;-</span> put-index *result, i, curr-value
<span id="L36" class="LineNr"> 36 </span>    i <span class="Special">&lt;-</span> add i,<span class="Constant"> 1</span>
<span id="L37" class="LineNr"> 37 </span>   <span class="muControl"> loop</span>
<span id="L38" class="LineNr"> 38 </span>  <span class="Delimiter">}</span>
<span id="L39" class="LineNr"> 39 </span> <span class="muControl"> return</span> result
<span id="L40" class="LineNr"> 40 </span>]
<span id="L41" class="LineNr"> 41 </span>
<span id="L42" class="LineNr"> 42 </span><span class="Comment"># fill an existing array with a set of numbers</span>
<span id="L43" class="LineNr"> 43 </span><span class="Comment"># (contributed by Caleb Couch)</span>
<span id="L44" class="LineNr"> 44 </span><span class="muRecipe">def</span> <a href='063array.mu.html#L44'>fill</a> array:&amp;:@:num<span class="muRecipe"> -&gt; </span>array:&amp;:@:num [
<span id="L45" class="LineNr"> 45 </span>  <span class="Constant">local-scope</span>
<span id="L46" class="LineNr"> 46 </span>  <span class="Constant">load-inputs</span>
<span id="L47" class="LineNr"> 47 </span>  loopn:num <span class="Special">&lt;-</span> copy<span class="Constant"> 0</span>
<span id="L48" class="LineNr"> 48 </span>  length:num <span class="Special">&lt;-</span> length *array
<span id="L49" class="LineNr"> 49 </span>  <span class="Delimiter">{</span>
<span id="L50" class="LineNr"> 50 </span>    length?:bool <span class="Special">&lt;-</span> equal loopn, length
<span id="L51" class="LineNr"> 51 </span>    <span class="muControl">break-if</span> length?
<span id="L52" class="LineNr"> 52 </span>    object:num, arg-received?:bool <span class="Special">&lt;-</span> <span class="Constant">next-input</span>
<span id="L53" class="LineNr"> 53 </span>    <span class="muControl">break-unless</span> arg-received?
<span id="L54" class="LineNr"> 54 </span>    *array <span class="Special">&lt;-</span> put-index *array, loopn, object
<span id="L55" class="LineNr"> 55 </span>    loopn <span class="Special">&lt;-</span> add loopn,<span class="Constant"> 1</span>
<span id="L56" class="LineNr"> 56 </span>   <span class="muControl"> loop</span>
<span id="L57" class="LineNr"> 57 </span>  <span class="Delimiter">}</span>
<span id="L58" class="LineNr"> 58 </span>]
<span id="L59" class="LineNr"> 59 </span>
<span id="L60" class="LineNr"> 60 </span><span class="muScenario">scenario</span> fill-on-an-empty-array [
<span id="L61" class="LineNr"> 61 </span>  <span class="Constant">local-scope</span>
<span id="L62" class="LineNr"> 62 </span>  array:&amp;:@:num <span class="Special">&lt;-</span> new <span class="Constant">number:type</span>,<span class="Constant"> 3</span>
<span id="L63" class="LineNr"> 63 </span>  run [
<span id="L64" class="LineNr"> 64 </span>    array <span class="Special">&lt;-</span> <a href='063array.mu.html#L44'>fill</a> array,<span class="Constant"> 1 2 3</span>
<span id="L65" class="LineNr"> 65 </span>    10:@:num/<span class="Special">raw</span> <span class="Special">&lt;-</span> copy *array
<span id="L66" class="LineNr"> 66 </span>  ]
<span id="L67" class="LineNr"> 67 </span>  memory-should-contain [
<span id="L68" class="LineNr"> 68 </span>   <span class="Constant"> 10</span> <span class="Special">&lt;-</span><span class="Constant"> 3</span>
<span id="L69" class="LineNr"> 69 </span>   <span class="Constant"> 11</span> <span class="Special">&lt;-</span><span class="Constant"> 1</span>
<span id="L70" class="LineNr"> 70 </span>   <span class="Constant"> 12</span> <span class="Special">&lt;-</span><span class="Constant"> 2</span>
<span id="L71" class="LineNr"> 71 </span>   <span class="Constant"> 13</span> <span class="Special">&lt;-</span><span class="Constant"> 3</span>
<span id="L72" class="LineNr"> 72 </span>  ]
<span id="L73" class="LineNr"> 73 </span>]
<span id="L74" class="LineNr"> 74 </span>
<span id="L75" class="LineNr"> 75 </span><span class="muScenario">scenario</span> fill-overwrites-existing-values [
<span id="L76" class="LineNr"> 76 </span>  <span class="Constant">local-scope</span>
<span id="L77" class="LineNr"> 77 </span>  array:&amp;:@:num <span class="Special">&lt;-</span> new <span class="Constant">number:type</span>,<span class="Constant"> 3</span>
<span id="L78" class="LineNr"> 78 </span>  *array <span class="Special">&lt;-</span> put-index *array,<span class="Constant"> 0</span>,<span class="Constant"> 4</span>
<span id="L79" class="LineNr"> 79 </span>  run [
<span id="L80" class="LineNr"> 80 </span>    array <span class="Special">&lt;-</span> <a href='063array.mu.html#L44'>fill</a> array,<span class="Constant"> 1 2 3</span>
<span id="L81" class="LineNr"> 81 </span>    10:@:num/<span class="Special">raw</span> <span class="Special">&lt;-</span> copy *array
<span id="L82" class="LineNr"> 82 </span>  ]
<span id="L83" class="LineNr"> 83 </span>  memory-should-contain [
<span id="L84" class="LineNr"> 84 </span>   <span class="Constant"> 10</span> <span class="Special">&lt;-</span><span class="Constant"> 3</span>
<span id="L85" class="LineNr"> 85 </span>   <span class="Constant"> 11</span> <span class="Special">&lt;-</span><span class="Constant"> 1</span>
<span id="L86" class="LineNr"> 86 </span>   <span class="Constant"> 12</span> <span class="Special">&lt;-</span><span class="Constant"> 2</span>
<span id="L87" class="LineNr"> 87 </span>   <span class="Constant"> 13</span> <span class="Special">&lt;-</span><span class="Constant"> 3</span>
<span id="L88" class="LineNr"> 88 </span>  ]
<span id="L89" class="LineNr"> 89 </span>]
<span id="L90" class="LineNr"> 90 </span>
<span id="L91" class="LineNr"> 91 </span><span class="muScenario">scenario</span> fill-exits-gracefully-when-given-no-inputs [
<span id="L92" class="LineNr"> 92 </span>  <span class="Constant">local-scope</span>
<span id="L93" class="LineNr"> 93 </span>  array:&amp;:@:num <span class="Special">&lt;-</span> new <span class="Constant">number:type</span>,<span class="Constant"> 3</span>
<span id="L94" class="LineNr"> 94 </span>  run [
<span id="L95" class="LineNr"> 95 </span>    array <span class="Special">&lt;-</span> <a href='063array.mu.html#L44'>fill</a> array
<span id="L96" class="LineNr"> 96 </span>    10:@:num/<span class="Special">raw</span> <span class="Special">&lt;-</span> copy *array
<span id="L97" class="LineNr"> 97 </span>  ]
<span id="L98" class="LineNr"> 98 </span>  memory-should-contain [
<span id="L99" class="LineNr"> 99 </span>   <span class="Constant"> 10</span> <span class="Special">&lt;-</span><span class="Constant"> 3</span>
<span id="L100" class="LineNr">100 </span>   <span class="Constant"> 11</span> <span class="Special">&lt;-</span><span class="Constant"> 0</span>
<span id="L101" class="LineNr">101 </span>   <span class="Constant"> 12</span> <span class="Special">&lt;-</span><span class="Constant"> 0</span>
<span id="L102" class="LineNr">102 </span>   <span class="Constant"> 13</span> <span class="Special">&lt;-</span><span class="Constant"> 0</span>
<span id="L103" class="LineNr">103 </span>  ]
<span id="L104" class="LineNr">104 </span>]
<span id="L105" class="LineNr">105 </span>
<span id="L106" class="LineNr">106 </span><span class="Comment"># swap two elements of an array</span>
<span id="L107" class="LineNr">107 </span><span class="Comment"># (contributed by Caleb Couch)</span>
<span id="L108" class="LineNr">108 </span><span class="muRecipe">def</span> <a href='063array.mu.html#L108'>swap</a> array:&amp;:@:num, index1:num, index2:num<span class="muRecipe"> -&gt; </span>array:&amp;:@:num [
<span id="L109" class="LineNr">109 </span>  <span class="Constant">local-scope</span>
<span id="L110" class="LineNr">110 </span>  <span class="Constant">load-inputs</span>
<span id="L111" class="LineNr">111 </span>  object1:num <span class="Special">&lt;-</span> index *array, index1
<span id="L112" class="LineNr">112 </span>  object2:num <span class="Special">&lt;-</span> index *array, index2
<span id="L113" class="LineNr">113 </span>  *array <span class="Special">&lt;-</span> put-index *array, index1, object2
<span id="L114" class="LineNr">114 </span>  *array <span class="Special">&lt;-</span> put-index *array, index2, object1
<span id="L115" class="LineNr">115 </span>]
<span id="L116" class="LineNr">116 </span>
<span id="L117" class="LineNr">117 </span><span class="muScenario">scenario</span> swap-works [
<span id="L118" class="LineNr">118 </span>  <span class="Constant">local-scope</span>
<span id="L119" class="LineNr">119 </span>  array:&amp;:@:num <span class="Special">&lt;-</span> new <span class="Constant">number:type</span>,<span class="Constant"> 4</span>
<span id="L120" class="LineNr">120 </span>  array <span class="Special">&lt;-</span> <a href='063array.mu.html#L44'>fill</a> array,<span class="Constant"> 4 3 2 1</span>
<span id="L121" class="LineNr">121 </span>  run [
<span id="L122" class="LineNr">122 </span>    array <span class="Special">&lt;-</span> <a href='063array.mu.html#L108'>swap</a> array,<span class="Constant"> 0</span>,<span class="Constant"> 2</span>
<span id="L123" class="LineNr">123 </span>    10:num/<span class="Special">raw</span> <span class="Special">&lt;-</span> index *array,<span class="Constant"> 0</span>
<span id="L124" class="LineNr">124 </span>    11:num/<span class="Special">raw</span> <span class="Special">&lt;-</span> index *array,<span class="Constant"> 2</span>
<span id="L125" class="LineNr">125 </span>  ]
<span id="L126" class="LineNr">126 </span>  memory-should-contain [
<span id="L127" class="LineNr">127 </span>   <span class="Constant"> 10</span> <span class="Special">&lt;-</span><span class="Constant"> 2</span>
<span id="L128" class="LineNr">128 </span>   <span class="Constant"> 11</span> <span class="Special">&lt;-</span><span class="Constant"> 4</span>
<span id="L129" class="LineNr">129 </span>  ]
<span id="L130" class="LineNr">130 </span>]
<span id="L131" class="LineNr">131 </span>
<span id="L132" class="LineNr">132 </span><span class="Comment"># reverse the elements of an array</span>
<span id="L133" class="LineNr">133 </span><span class="Comment"># (contributed by Caleb Couch)</span>
<span id="L134" class="LineNr">134 </span><span class="muRecipe">def</span> reverse array:&amp;:@:_elem<span class="muRecipe"> -&gt; </span>array:&amp;:@:_elem [
<span id="L135" class="LineNr">135 </span>  <span class="Constant">local-scope</span>
<span id="L136" class="LineNr">136 </span>  <span class="Constant">load-inputs</span>
<span id="L137" class="LineNr">137 </span>  start:num <span class="Special">&lt;-</span> copy<span class="Constant"> 0</span>
<span id="L138" class="LineNr">138 </span>  length:num <span class="Special">&lt;-</span> length *array
<span id="L139" class="LineNr">139 </span>  end:num <span class="Special">&lt;-</span> subtract length,<span class="Constant"> 1</span>
<span id="L140" class="LineNr">140 </span>  <span class="Delimiter">{</span>
<span id="L141" class="LineNr">141 </span>    done?:bool <span class="Special">&lt;-</span> greater-or-equal start, end
<span id="L142" class="LineNr">142 </span>    <span class="muControl">break-if</span> done?
<span id="L143" class="LineNr">143 </span>    array <span class="Special">&lt;-</span> <a href='063array.mu.html#L108'>swap</a> array, start, end
<span id="L144" class="LineNr">144 </span>    start <span class="Special">&lt;-</span> add start,<span class="Constant"> 1</span>
<span id="L145" class="LineNr">145 </span>    end <span class="Special">&lt;-</span> subtract end,<span class="Constant"> 1</span>
<span id="L146" class="LineNr">146 </span>   <span class="muControl"> loop</span>
<span id="L147" class="LineNr">147 </span>  <span class="Delimiter">}</span>
<span id="L148" class="LineNr">148 </span>]
<span id="L149" class="LineNr">149 </span>
<span id="L150" class="LineNr">150 </span><span class="muScenario">scenario</span> reverse-array-odd-length [
<span id="L151" class="LineNr">151 </span>  <span class="Constant">local-scope</span>
<span id="L152" class="LineNr">152 </span>  array:&amp;:@:num <span class="Special">&lt;-</span> new <span class="Constant">number:type</span>,<span class="Constant"> 3</span>
<span id="L153" class="LineNr">153 </span>  array <span class="Special">&lt;-</span> <a href='063array.mu.html#L44'>fill</a> array,<span class="Constant"> 3 2 1</span>
<span id="L154" class="LineNr">154 </span>  run [
<span id="L155" class="LineNr">155 </span>    array <span class="Special">&lt;-</span> reverse array
<span id="L156" class="LineNr">156 </span>    10:@:num/<span class="Special">raw</span> <span class="Special">&lt;-</span> copy *array
<span id="L157" class="LineNr">157 </span>  ]
<span id="L158" class="LineNr">158 </span>  memory-should-contain [
<span id="L159" class="LineNr">159 </span>   <span class="Constant"> 10</span> <span class="Special">&lt;-</span><span class="Constant"> 3</span>
<span id="L160" class="LineNr">160 </span>   <span class="Constant"> 11</span> <span class="Special">&lt;-</span><span class="Constant"> 1</span>
<span id="L161" class="LineNr">161 </span>   <span class="Constant"> 12</span> <span class="Special">&lt;-</span><span class="Constant"> 2</span>
<span id="L162" class="LineNr">162 </span>   <span class="Constant"> 13</span> <span class="Special">&lt;-</span><span class="Constant"> 3</span>
<span id="L163" class="LineNr">163 </span>  ]
<span id="L164" class="LineNr">164 </span>]
<span id="L165" class="LineNr">165 </span>
<span id="L166" class="LineNr">166 </span><span class="muScenario">scenario</span> reverse-array-even-length [
<span id="L167" class="LineNr">167 </span>  <span class="Constant">local-scope</span>
<span id="L168" class="LineNr">168 </span>  array:&amp;:@:num <span class="Special">&lt;-</span> new <span class="Constant">number:type</span>,<span class="Constant"> 4</span>
<span id="L169" class="LineNr">169 </span>  array <span class="Special">&lt;-</span> <a href='063array.mu.html#L44'>fill</a> array,<span class="Constant"> 4 3 2 1</span>
<span id="L170" class="LineNr">170 </span>  run [
<span id="L171" class="LineNr">171 </span>    array <span class="Special">&lt;-</span> reverse array
<span id="L172" class="LineNr">172 </span>    10:@:num/<span class="Special">raw</span> <span class="Special">&lt;-</span> copy *array
<span id="L173" class="LineNr">173 </span>  ]
<span id="L174" class="LineNr">174 </span>  memory-should-contain [
<span id="L175" class="LineNr">175 </span>   <span class="Constant"> 10</span> <span class="Special">&lt;-</span><span class="Constant"> 4</span>
<span id="L176" class="LineNr">176 </span>   <span class="Constant"> 11</span> <span class="Special">&lt;-</span><span class="Constant"> 1</span>
<span id="L177" class="LineNr">177 </span>   <span class="Constant"> 12</span> <span class="Special">&lt;-</span><span class="Constant"> 2</span>
<span id="L178" class="LineNr">178 </span>   <span class="Constant"> 13</span> <span class="Special">&lt;-</span><span class="Constant"> 3</span>
<span id="L179" class="LineNr">179 </span>   <span class="Constant"> 14</span> <span class="Special">&lt;-</span><span class="Constant"> 4</span>
<span id="L180" class="LineNr">180 </span>  ]
<span id="L181" class="LineNr">181 </span>]
</pre>
</body>
</html>
<!-- vim: set foldmethod=manual : -->
generated by cgit-pink 1.4.1-2-gfad0 (git 2.36.2.497.gbbea4dcf42) at 2024-12-30 20:13:50 +0000