Mercurial > repos > tabletprog
comparison modules/dict.tp @ 192:a868a2aec930
Add contains? method to linear dictionary
| author | Mike Pavone <pavone@retrodev.com> |
|---|---|
| date | Mon, 26 Aug 2013 19:50:17 -0700 |
| parents | 75be44ed9df5 |
| children | cea671c4056c |
comparison
equal
deleted
inserted
replaced
| 191:abde5d2918cf | 192:a868a2aec930 |
|---|---|
| 52 } else: { | 52 } else: { |
| 53 (els get: idx) val | 53 (els get: idx) val |
| 54 } | 54 } |
| 55 } | 55 } |
| 56 | 56 |
| 57 contains? <- :k { | |
| 58 (find: k) >= 0 | |
| 59 } | |
| 60 | |
| 57 foreach <- :l { | 61 foreach <- :l { |
| 58 foreach: els :idx el { | 62 foreach: els :idx el { |
| 59 l: (el key) (el val) | 63 l: (el key) (el val) |
| 60 } | 64 } |
| 61 } | 65 } |