Commit b70274be authored by Mart Lubbers's avatar Mart Lubbers

resolv discussion about uselect

parent 18eff4b5
Pipeline #15398 passed with stage
in 1 minute and 41 seconds
......@@ -10,6 +10,8 @@ unsafeCreateArray size = code {
unsafeUselect :: u:(a v:b) Int -> *(v:b,u:(a v:b)) | Array a b, [u<=v]
unsafeUselect arr index = code {
push_a 0
select _ 1 0
update_a 3 7
pop_a 7
jsr_ap 2
repl_args 2 2
}
Markdown is supported
0%
or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment