Mercurial > repos > tabletprog

annotate samples/testdict.tp @ 164:75be44ed9df5

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Dict improvements
author Mike Pavone <pavone@retrodev.com>
date Sat, 10 Aug 2013 22:26:26 -0700
parents 6735db9b44ba
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
94
6735db9b44ba Fixed my foreach on dict. Added test for it.
William Morgan <bill@mrgn.org>
parents:
diff changeset
1 #{
6735db9b44ba Fixed my foreach on dict. Added test for it.
William Morgan <bill@mrgn.org>
parents:
diff changeset
2 main <- {
6735db9b44ba Fixed my foreach on dict. Added test for it.
William Morgan <bill@mrgn.org>
parents:
diff changeset
3 foo <- dict linear:
6735db9b44ba Fixed my foreach on dict. Added test for it.
William Morgan <bill@mrgn.org>
parents:
diff changeset
4 foo set: "key1" "val1"
6735db9b44ba Fixed my foreach on dict. Added test for it.
William Morgan <bill@mrgn.org>
parents:
diff changeset
5 foo set: "key2" "val2"
6735db9b44ba Fixed my foreach on dict. Added test for it.
William Morgan <bill@mrgn.org>
parents:
diff changeset
6 foreach: foo :k :v {
6735db9b44ba Fixed my foreach on dict. Added test for it.
William Morgan <bill@mrgn.org>
parents:
diff changeset
7 print: k . ", " . v . "\n"
6735db9b44ba Fixed my foreach on dict. Added test for it.
William Morgan <bill@mrgn.org>
parents:
diff changeset
8 }
6735db9b44ba Fixed my foreach on dict. Added test for it.
William Morgan <bill@mrgn.org>
parents:
diff changeset
9
6735db9b44ba Fixed my foreach on dict. Added test for it.
William Morgan <bill@mrgn.org>
parents:
diff changeset
10 }
6735db9b44ba Fixed my foreach on dict. Added test for it.
William Morgan <bill@mrgn.org>
parents:
diff changeset
11 }