Another update from ingydotnet^djgoku
This commit is contained in:
parent
91df62d461
commit
948b86eafa
7604 changed files with 108452 additions and 22726 deletions
|
|
@ -1,8 +1,8 @@
|
|||
#define system.
|
||||
#define extensions.
|
||||
|
||||
#class Extender
|
||||
#class Extender :: BaseExtender
|
||||
{
|
||||
#field theObject.
|
||||
#field theField.
|
||||
|
||||
#constructor new : anObject
|
||||
|
|
@ -16,20 +16,18 @@
|
|||
[
|
||||
theField := aValue.
|
||||
]
|
||||
|
||||
#method => theObject.
|
||||
}
|
||||
|
||||
#symbol program =
|
||||
[
|
||||
#var anObject := 234.
|
||||
|
||||
// adding a field
|
||||
// extending an object with a field
|
||||
anObject := Extender new:anObject.
|
||||
|
||||
anObject set &foo:"bar".
|
||||
|
||||
console << anObject << ".foo=" << anObject foo.
|
||||
console writeLine:anObject:".foo=":(anObject foo).
|
||||
|
||||
console readChar.
|
||||
].
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue