Celestin Apprentice 5/Apprentice-Release5.iso/Environments/SmallEiffel 0.3.3/SmallEiffel 68k/lib_test/aux_rename1.e

Text File | 1996-06-13 | 304 b | 19 lines | [TEXT/EDIT]

-- Part of SmallEiffel -- Read DISCLAIMER file -- Copyright (C)
-- Dominique COLNET and Suzanne COLLIN -- [e-mail]
--
class AUX_RENAME1

inherit
   TEST_RENAME1
      rename r as super_r
      end;

feature {ANY}

   r: INTEGER is
      do
     Result := 2;
      end;

end -- AUX_RENAME1