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