// ĠOriginal Ġbug : ĠK T - 1 1 5 5 7 Ċ Ċ open Ġclass ĠBase Ġ{ ĊĠĠĠ Ġopen Ġfun Ġfoo () Ġ{ ĊĠĠĠĠĠĠĠ Ġprintln (" Base :: foo ") ĊĠĠĠ Ġ} Ċ } Ċ Ċ interface ĠIF oo Ġ{ ĊĠĠĠ Ġfun Ġfoo () Ċ } Ċ Ċ object ĠFoo Impl Ġ: ĠIF oo Ġ{ ĊĠĠĠ Ġoverride Ġfun Ġfoo () Ġ{ ĊĠĠĠĠĠĠĠ Ġprintln (" Foo Impl :: foo ") ĊĠĠĠ Ġ} Ċ } Ċ Ċ class ĠDerived Ġ: ĠBase (), ĠIF oo Ġby ĠFoo Impl Ġ{ ĊĠĠĠ Ġ// Ġdelegate Ġto ĠFoo Impl :: foo () Ġoverrides Ġunrelated ĠBase :: foo () Ġ Ċ } Ċ Ċ fun Ġmain ( args : ĠArray < String >) Ġ{ ĊĠĠĠ ĠDerived (). foo () Ġ// ĠFoo Impl :: foo Ċ } Ċ