RemoteViewersHostBackdoor.mesa
Copyright Ó 1990, 1992 by Xerox Corporation. All rights reserved.
Last tweaked by Mike Spreitzer on September 12, 1990 11:53 am PDT
DIRECTORY IO, NetAddressing;
RemoteViewersHostBackdoor:
CEDAR
DEFINITIONS = {
SetSpy:
PROC [spy:
PROC [
IO.
STREAM, NetAddressing.Address]];
Every time the host opens a Viewers stream, a forked call on the spy is made.
}.