Another update from ingydotnet^djgoku
This commit is contained in:
parent
91df62d461
commit
948b86eafa
7604 changed files with 108452 additions and 22726 deletions
|
|
@ -1,5 +1,7 @@
|
|||
#define system.
|
||||
#define system'collections.
|
||||
#define system'routines.
|
||||
#define extensions.
|
||||
|
||||
// --- Program ---
|
||||
|
||||
|
|
@ -7,13 +9,12 @@
|
|||
[
|
||||
// 1. Create
|
||||
#var aMap := Dictionary new.
|
||||
aMap set &key:"key" &value:"foox".
|
||||
aMap set &key:"key" &value:"foo".
|
||||
aMap set &key:"key2" &value:"foo2".
|
||||
aMap set &key:"key3" &value:"foo3".
|
||||
aMap set &key:"key4" &value:"foo4".
|
||||
aMap@"key" := "foox".
|
||||
aMap@"key2":= "foo2".
|
||||
aMap@"key3":= "foo3".
|
||||
aMap@"key4":= "foo4".
|
||||
|
||||
// Enumerate
|
||||
control foreach:aMap &do: aKeyValue
|
||||
[ console write:(aKeyValue key) write:" : " writeLine:(aKeyValue value) ].
|
||||
aMap run &each: aKeyValue
|
||||
[ console writeLine:(aKeyValue key):" : ":aKeyValue ].
|
||||
].
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue