[comp.sys.mac.programmer] AppleShare blues & Random Think Pascal Q

es2q+@andrew.cmu.edu (Erik Warren Selberg) (05/25/90)

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