Stream Switches

To: srt@UCLA-LOCUS
Subject: Stream Switches
From: Jonathan A Rees <JAR@MIT-MC>
Date: Thu ,21 Feb 85 14:22:00 EDT
Cc: t-users@YALE.ARPA
In-reply-to: Msg of Wed 20 Feb 85 14:14:02 PST from Scott Turner <srt at UCLA-LOCUS>

(define tlog-output
  (object (lambda () *tlog-output*)
	  ((setter self)
	   (lambda (new-value)
	     (set *tlog-output* new-value)))))