RosettaCodeData/Task/Inheritance-Single/Phix/inheritance-single.phix

13 lines
280 B
Plaintext

without js -- (class)
class Animal
private string species
end class
class Dog extends Animal
public procedure bark()
puts(1,"woof\n")
end procedure
end class
class Lab extends Dog end class
class Collie extends Dog end class
class Cat extends Animal end class