Late Binding

class AccountWithFee

from Account

attr fee : 5

meth transf(X)

Account , transf(X-@fee)

end

end

class Account

attr balance

meth transf(X)

balance <- @balance+X

end

meth transfWithRec(X)

Konto , überw(X)

{Receipt @balance}

end

end

Previous slide

Next slide

Back to first slide

View graphic version