4 lines
64 B
Standard ML
4 lines
64 B
Standard ML
let swapref x y =
|
|
let temp = !x in
|
|
x := !y;
|
|
y := temp
|