home *** CD-ROM | disk | FTP | other *** search
/ Solo Programadores 22 / SOLO_22.iso / docs / lovelace / creature.ads < prev    next >
Encoding:
Text File  |  1995-10-24  |  241 b   |  11 lines

  1.  
  2. with Occupants;
  3. use  Occupants;
  4.  
  5. package Creatures is
  6.  type Creature is abstract new Occupant with private;
  7.  type Creature_Access   is access Creature'Class;
  8. private
  9.  type Creature is abstract new Occupant with null record;
  10. end Creatures;
  11.