Generic swap: Difference between revisions
Content added Content deleted
No edit summary |
|||
Line 1,091: | Line 1,091: | ||
(swap (car lst) (cadr lst)) |
(swap (car lst) (cadr lst)) |
||
;; now lst is '(456 123)</syntaxhighlight> |
;; now lst is '(456 123)</syntaxhighlight> |
||
=={{header|EMal}}== |
|||
<syntaxhighlight lang="emal"> |
|||
fun swap = Pair by var a, var b do return var%var(b => a) end |
|||
int a = 1 |
|||
int b = 2 |
|||
writeLine("before swap: a=" + a + ", b=" + b) |
|||
Pair pair = swap(a, b) |
|||
a = pair[0] |
|||
b = pair[1] |
|||
writeLine(" after swap: a=" + a + ", b=" + b) |
|||
</syntaxhighlight> |
|||
{{out}} |
|||
<pre> |
|||
before swap: a=1, b=2 |
|||
after swap: a=2, b=1 |
|||
</pre> |
|||
=={{header|Erlang}}== |
=={{header|Erlang}}== |