Io Language

[108 デフォルトの名無しさん 2010/01/08(金) 00:53:05]

久しぶりにいじってみたんですが、いつのまにか、++ が実装できるようになっていますね。
call message previous　が実装されていました。

Number ++ := method(
varname := call message previous name
now := call sender getSlot(varname)
if (now, call sender setSlot(varname, now + 1))
self
)

a := 1
a println # => 1
a ++ println # => 1 (後置なので返ってくるのは 1 !)
a println # => 2

(a++ + 456 / 3) println # => 154
a println # => 3