25 lines
310 B
Plaintext
25 lines
310 B
Plaintext
class Camera
|
|
string cbuf
|
|
method TakePhoto()
|
|
end method
|
|
method ViewPhoto()
|
|
end method
|
|
end class
|
|
|
|
class MobilePhone
|
|
string pbuf
|
|
method MakeCall()
|
|
end method
|
|
method TakeCall()
|
|
end method
|
|
end class
|
|
|
|
class CameraPhone
|
|
has Camera,MobilePhone
|
|
end class
|
|
|
|
CameraPhone cp
|
|
|
|
cp.ViewPhoto
|
|
cp.MakeCall
|