home *** CD-ROM | disk | FTP | other *** search
/ AmigActive 3 / AACD03.BIN / AACD / Programming / sofa / archive / SmallEiffel.lha / SmallEiffel / lib_show / animal / sample2.e < prev    next >
Text File  |  1999-06-05  |  270b  |  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.