module CurrentLoc:A reference to the current location. If you are careful to set this to the current location then you can use some built-in logging functions that will print the location.Computation.REF_OUTPUT
with type data = location
include Project.Computation.OUTPUT
type
data
val set : data -> unit
val get : unit -> data
val clear : unit -> unit