Example 5.190. Class MONITOR
.local~setentry("output",.monitor~new(.stream~new("my.new")~~command("open nobuffer")))
/* The following sets the destination */
previous_destination=.output~destination(.stream~new("my.out")~~command("open write"))
/* The following resets the destination */
.output~destination
.output~destination(.Stdout)
current_output_destination_stream_object=.output~current