Name: Anonymous 2011-10-08 0:04
fun outer (number) =
let
val n = ref number
fun inner (increment) =
let
val () = n := !n + increment
in
!n
end
in
inner
end
fun outer (number) =
let
val n = ref number
fun inner (increment) =
let
val () = n := !n + increment
in
!n
end
in
inner
end