RosettaCodeData/Task/Inheritance-Single/PureBasic/inheritance-single-1.purebasic

22 lines
277 B
Text
Raw Permalink Normal View History

2013-04-10 22:43:41 -07:00
Interface Animal
Eat()
Sleep()
EndInterface
Interface Cat Extends Animal
ChaseMouse()
EndInterface
Interface Dog Extends Animal
Bark()
WagTail()
EndInterface
Interface Lab Extends Dog
Swim()
EndInterface
Interface Collie Extends Dog
HeardSheep()
EndInterface