🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: comp.lang.oberon
Article #779

Re: Collections for Oberon/F (source)

#779
From: John Landahl
Date: Fri, 05 Jan 1996 18:12
33 lines
1630 bytes
Could someone say a few words about the typical 
applications of Collections, or indicate a reference that 
discusses them?  I am new to object-oriented programming 
and have not heard of collections as a construct before, 
and I do not have the appropriate TurboPascal manual.  Of 
course I can get an idea of the functionality from the 
routines, but I am still not sure what problems they are a 
solution for.

When I compiled Collections and the example program using 
Oberon/F 1.1 for the Mac and tried to run it, an error trap 
appeared because of the null value for file type in the 
example program when f.Register executes.  Here is a method 
of making this section of the example program 
platform-independent:

	CONST (* values supplied by Oberon microsystems *)
		Win32s	= 11;
		Windows95	= 12;
		WindowsNT	= 13;
		Cairo	= 14;
		MacOS7	= 21;
			
	VAR type : Files.Type;

..
		 IF Dialog.platform = MacOS7 THEN 
				type := "DATA";
		 ELSE
				type := "";
		 END;  (* IF *)
   f.Register("TEST.DAT", type, res);
..
Technical Details
Message-ID: <4cjpn5$nvi@nntp5.u.washington.edu>
Path: arc1-ca.pugleaf.net!news.u.washington.edu!root
References: <1996Jan2.194237.1@fermi.nsrl.rochester.edu>

Show Full Headers
Complete Article Headers
Path: arc1-ca.pugleaf.net!news.u.washington.edu!root
From: John Landahl <jlandahl@sci.nwfsc.noaa.gov>
Newsgroups: comp.lang.oberon
Subject: Re: Collections for Oberon/F (source)
Date: 5 Jan 1996 18:12:53 GMT
Organization: NWFSC, NMFS, NOAA
Message-ID: <4cjpn5$nvi@nntp5.u.washington.edu>
References: <1996Jan2.194237.1@fermi.nsrl.rochester.edu>
NNTP-Posting-Host: jlppc.nwfsc.noaa.gov
Mime-Version: 1.0
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
X-Mailer: Mozilla 1.12(Macintosh; I; PPC)
X-URL: news:1996Jan2.194237.1@fermi.nsrl.rochester.edu