2016 Update

This commit is contained in:
Tina Müller 2016-12-05 22:15:40 +01:00
parent 948b86eafa
commit dcf5d15da3
7965 changed files with 139854 additions and 31002 deletions

View file

@ -0,0 +1,26 @@
#import system.
#symbol CameraFeature =
{
#method cameraMsg
= "camera".
}.
#class MobilePhone
{
#method mobileMsg
= "phone".
}
#class CameraPhone :: MobilePhone
{
#method => CameraFeature.
}
#symbol program =
[
#var cp := CameraPhone new.
console writeLine:(cp cameraMsg).
console writeLine:(cp mobileMsg).
].

View file

@ -0,0 +1,27 @@
#import system.
#import system'dynamic.
#class CameraFeature
{
#method cameraMsg
= "camera".
}
#class MobilePhone
{
#method mobileMsg
= "phone".
}
#symbol CameraPhone =
{
new = MobilePhone new mix &into:(CameraFeature new).
}.
#symbol program =
[
#var cp := CameraPhone new.
console writeLine:(cp cameraMsg).
console writeLine:(cp mobileMsg).
].