home *** CD-ROM | disk | FTP | other *** search
/ AmigActive 3 / AACD03.BIN / AACD / Programming / sofa / archive / SmallEiffel.lha / SmallEiffel / lib_show / animal / sample1.e < prev    next >
Text File  |  1999-06-05  |  306b  |  24 lines
  1. class SAMPLE1
  2.  
  3. creation {ANY}
  4.    make
  5.  
  6. feature {ANY}
  7.  
  8.    chien: CHIEN;
  9.  
  10.    chat: CHAT;
  11.  
  12.    mille_pattes: MILLE_PATTES;
  13.  
  14.    make is
  15.       do
  16.          !!chat;
  17.          !!chien;
  18.          !!mille_pattes;
  19.          chat.felicitations(chien);
  20.          mille_pattes.felicitations(chat);
  21.       end;
  22.  
  23. end -- SAMPLE1
  24.