RosettaCodeData/Task/Inheritance-Multiple/Phix/inheritance-multiple-1.phix

13 lines
268 B
Plaintext

class Camra
string name = "nikkon"
end class
class Mobile
-- string name = "nokia" -- oops!
string mane = "nokia" -- ok!
end class
class CamraPhone extends Camra,Mobile
procedure show() ?{name,mane} end procedure
end class
CamraPhone cp = new()
cp.show()