Path: news.cs.au.dk!not-for-mail
From: "Jørgen Lindskov Knudsen" <jlk@mjolner.dk>
Newsgroups: comp.lang.beta
Subject: Re: program 'cat.bet': Suggested implementation?
Date: Mon, 19 Jun 2000 16:16:17 +0200
Organization: University of Aarhus, Department of Computer Science (DAIMI)
Lines: 31
Message-ID: <8ila1j$8ksd$1@xinwen.cs.au.dk>
References: <394D2663.37AB97D4@skynet.be> <8ijcf8$7o4o$1@xinwen.cs.au.dk> <394D6332.D6C6CFB5@skynet.be>
NNTP-Posting-Host: nott.mjolner.dk
X-Trace: xinwen.cs.au.dk 961424243 283533 255.255.255.255 (19 Jun 2000 14:17:23 GMT)
X-Complaints-To: news@cs.au.dk
NNTP-Posting-Date: 19 Jun 2000 14:17:23 GMT
X-Priority: 3
X-MSMail-Priority: Normal
X-Newsreader: Microsoft Outlook Express 5.00.2615.200
X-MimeOLE: Produced By Microsoft MimeOLE V5.00.2615.200
Xref: news.cs.au.dk comp.lang.beta:12429


Atle <trollet@skynet.be> wrote in message
news:394D6332.D6C6CFB5@skynet.be...
> Jorgen Lindskov Knudsen wrote:
> >
> > ...
> > The correct program part is:
> >
> >    fil: @file(# accesserror:: (# do false->OK #);
> >                 nosucherror:: (# do false->OK #);
> >                 othererror:: (# do false->OK #);
> >              #);
> >    ...
> >    true->OK;
> >    fil. openread;
> So, OK is internal to the file object, I guess.

No, You have yourselves declared OK in your program - I just used that
definition :-)

> Thanx.
> In fact, I guess the way to do it is to check the definitions of file in
the interface ...

Right :-)

Regards,
Jørgen