RosettaCodeData/Task/Delegates/Zkl/delegates-1.zkl

12 lines
226 B
Text
Raw Permalink Normal View History

2017-09-23 10:01:46 +02:00
class Thingable{ var thing; }
class Delegator{
var delegate;
fcn operation{
if (delegate) delegate.thing;
else "default implementation"
}
}
class Delegate(Thingable){ thing = "delegate implementation" }