home *** CD-ROM | disk | FTP | other *** search
/ Amiga ACS 1998 #4 / amigaacscoverdisc1998-041998.iso / utilities / shareware / dev / ppcsmalleiffel / lib_show / animal / sample2.e < prev    next >
Encoding:
Text File  |  1998-01-16  |  261 b   |  21 lines
  1. class SAMPLE2
  2.    
  3. creation {ANY}
  4.    make
  5.    
  6. feature {ANY}
  7.    
  8.    chat: CHAT;
  9.    
  10.    mille_pattes: MILLE_PATTES;
  11.    
  12.    make is
  13.       do
  14.      !!chat;
  15.      !!mille_pattes;
  16.      chat.felicitations(chien);
  17.      mille_pattes.felicitations(chat);
  18.       end; 
  19.    
  20. end -- SAMPLE2
  21.