Path: utzoo!utgpu!news-server.csri.toronto.edu!mailrus!tut.cis.ohio-state.edu!pt.cs.cmu.edu!andrew.cmu.edu!es2q+
From: es2q+@andrew.cmu.edu (Erik Warren Selberg)
Newsgroups: comp.sys.mac.programmer
Subject: AppleShare blues & Random Think Pascal Q
Message-ID: <saLB4lq00WB24QVEYV@andrew.cmu.edu>
Date: 25 May 90 06:31:13 GMT
Organization: Carnegie Mellon, Pittsburgh, PA
Lines: 35

Hi... IUm wondering for those who have TP (that looks so much like Turbo!) 3.0
if there is a way for it to make a generic linked list or tree structure.
What I'd like to do is make a structure that has the following methods:
Insert, Delete, Search, and Map (Map being a method that applies a function
to all the elements in the list).  What I'd like to have is some way to
declare the data as a generic object, and then override the data object.  Can
that be done?  (I don't have TP 3 yet, just 2).
(code ex.)
type
  TList = object(TObject)
    data:TObject;
    next:TList;
  procedure IList;
  procedure Insert(newData:TObject);
  procedure Delete(victim:TObject);
  function Search(target:TObject):TList;
  procedure Map(procedure f (item:TObject));
end;

TPlayerList = object
  data:TPlayer; override; {can this be done?}
  next:TPlayerList; override;
  {and on and on...}
end;

is there some neat way to do this (such as a class already defined for this use?

Now for the more interesting problem:  I'm trying to install an AppleShare
server on a single floppy disk (as it isn't liking my hard disk very much --
strange but true.  Is there a way I can put just the server system on a floppy
and have the administration disk work with it?

thanks much!

Erik