Skip to content
Find file
Fetching contributors…
Cannot retrieve contributors at this time
28 lines (22 sloc) 380 Bytes
foo = "captured"
@NSObject {
include: TQObject
accessor: #test
}
@Klass {
test: foo
accessor: #prop
+ test: arg {
"«~foo»" print
"init: «arg»" print
}
}
@Sub < Klass {
}
inst = Klass new
"setting" print
inst prop = "hay"
"prop: «inst prop» «inst prop»" print
Sub new print
t = NSObject new setTest: "foobar"; self
t test print
Something went wrong with that request. Please try again.