RosettaCodeData/Task/Constrained-genericity/Eiffel/constrained-genericity-3.e

15 lines
163 B
Text
Raw Permalink Normal View History

2023-07-01 11:58:00 -04:00
class
PEAR
inherit
EATABLE
feature -- Basic operations
eat
-- Consume
do
print ("One pear eaten%N")
end
end