Path: news.daimi.aau.dk!glad
From: pahe@daimi.aau.dk (Peter von der Ahe)
Newsgroups: daimi.beta,daimi.dsa
Subject: Et program, som skriver et S på skærmen.
Date: 22 Apr 1996 04:20:41 +0200
Organization: DAIMI, Computer Science Dept. of Aarhus Univ.
Lines: 31
Sender: pahe@cedi.daimi.aau.dk
Message-ID: <yc0pw91579i.fsf@cedi.daimi.aau.dk>
Reply-To: pahe (Peter von der Ahe)
NNTP-Posting-Host: cedi.daimi.aau.dk
cc: support@mjolner.dk
X-Newsreader: Gnus v5.1
Xref: news.daimi.aau.dk daimi.beta:10210 daimi.dsa:10249


Hej!

Jeg har lavet et program, som kan skrive et S ud på stdout. Problemet
er bare at det skulle skrive SØREN:

ORIGIN '~beta/basiclib/current/betaenv';
INCLUDE '~beta/basiclib/current/file';
--PROGRAM: descriptor--
(# T: ^Text;
   aFile: @File;
do 
   'testfil'->aFile.name;
   aFile.openWrite;
   'SØREN'->aFile.puttext;
   aFile.close;
   aFile.openRead;
   aFile.GetAtom->PutLine;
   aFile.close;
#)

Det er dog en fejl, som umuligt kan opstå da 'Ø'->ascii.isWhiteSpace
exit'er false. Meget mystisk... ;-)

Mvh Peter Ahé

-- 
			  Peter von der Ahe
	   Ny Munkegade 101,1 tv, DK 8000  Aarhus C,Denmark
	   Phone: +45 8613 2634, E-mail: pahe@daimi.aau.dk
		 www: http://www.daimi.aau.dk/~pahe/