Sort using a custom comparator: Difference between revisions
m
→{{header|ATS}}
m (→{{header|ATS}}) |
|||
Line 1,022:
:<cloref> int =
let
(* Merely to demonstrate this is a closure instead of
regular function, get the value of "one" from a global
variable. *)
val @(pf, fpf | p) = $UN.ptr_vtake{int} p_one
val one = !p
Line 1,053 ⟶ 1,054:
:<cloref> int =
let
(* Merely to demonstrate this is a closure instead of
regular function, get the value of "one" from a global
variable. *)
val @(pf, fpf | p) = $UN.ptr_vtake{int} p_one
val one = !p
|