Mercurial > repos > tabletprog
diff 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 |
line wrap: on
line diff
--- a/modules/dict.tp Wed Jan 08 19:27:19 2014 -0800 +++ b/modules/dict.tp Sun Mar 30 18:17:56 2014 -0700 @@ -42,11 +42,17 @@ } get:elseSet <- :k :else { - idx <- find: k - if: idx < 0 { + get: k else: { v <- else: els append: (key: k val: v) v + } + } + + get:else <- :k :else { + idx <- find: k + if: idx < 0 { + else: } else: { (els get: idx) val }