Mercurial > repos > tabletprog
comparison modules/dict.tp @ 248:96fdc5b37ceb
Added get:else method to linear dict
author | Michael Pavone <pavone@retrodev.com> |
---|---|
date | Sun, 30 Mar 2014 18:17:56 -0700 |
parents | cea671c4056c |
children | c58e17f5c0f6 |
comparison
equal
deleted
inserted
replaced
247:b76f683d076e | 248:96fdc5b37ceb |
---|---|
40 (els get: idx) val | 40 (els get: idx) val |
41 } | 41 } |
42 } | 42 } |
43 | 43 |
44 get:elseSet <- :k :else { | 44 get:elseSet <- :k :else { |
45 idx <- find: k | 45 get: k else: { |
46 if: idx < 0 { | |
47 v <- else: | 46 v <- else: |
48 els append: (key: k val: v) | 47 els append: (key: k val: v) |
49 v | 48 v |
49 } | |
50 } | |
51 | |
52 get:else <- :k :else { | |
53 idx <- find: k | |
54 if: idx < 0 { | |
55 else: | |
50 } else: { | 56 } else: { |
51 (els get: idx) val | 57 (els get: idx) val |
52 } | 58 } |
53 } | 59 } |
54 | 60 |