
16 Oct
2013
16 Oct
'13
2:16 p.m.
On Thu, Oct 17, 2013 at 12:41 AM, Thiago Negri
The only hit I get in DuckDuckGo was this: http://sigkill.dk/programs/arrows/
I've tried things like this, and I couldn't make it work. Yet I've copy&pasted the code, and it worked! Even with the "loop_bufid" test!
If it's any consolation, feed 'er this: arrswap2 :: SP (a,b) (b,a) arrswap2 = let r = Get(\(a1,b1) -> Get(\(a2,b2) -> Put (b1,a1) (Put (b2,a2) r))) in r -- Kim-Ee