Path: utzoo!attcan!utgpu!jarvis.csri.toronto.edu!mailrus!wuarchive!gem.mps.ohio-state.edu!ginosko!uunet!pilchuck!seahcx!phred!brianr
From: brianr@phred.UUCP (Brian Reese)
Newsgroups: comp.lang.pascal
Subject: Re: Output to printer.
Message-ID: <2767@phred.UUCP>
Date: 2 Oct 89 14:49:55 GMT
References: <50331@tiger.oxy.edu> <2765@phred.UUCP>
Reply-To: brianr@phred.UUCP (Brian Reese)
Organization: <2765@phred.UUCP>o
Lines: 36

Attn: Joe Duval 

Joe, your mail bounced so here is my reply.

In reference to the following code:

>program Test(Output);
>
>begin
>  WriteLn('This is CRT output');
>  Assign(Output, 'prn');
>  ReWrite(Output);
>  WriteLn('This is PRN output');
>end.
>

you suggested that the second WriteLn should explicity use the standard device
Output, i.e.

	WriteLn(Output, 'This is PRN output');

Well, it's my understanding that when Write or WriteLn is called with no device
specification, it defaults to Output, whatever Output is defined to be.  In
this case, it is redefined as 'prn'.  I admit, this does not solve the original
posters problem because this doesn't work with Turbo 3.0,  (can't reassign a
standard device, which I figured out last weekend), but I did run it on 4.0 and
got the correct result.

Thanx for responding. 
Brian

 
-- 
Brian Reese                           uw-beaver!pilchuck!seahcx!phred!brianr
Physio Control Corp., Redmond, Wa.                         brianr@phred.UUCP
"Do not write on this line.  This line has been left blank intentionally."