Mercurial > repos > tabletprog
comparison modules/dict.tp @ 253:697c2c562af2
Fix infinite loop in hash dict
author | Michael Pavone <pavone@retrodev.com> |
---|---|
date | Sat, 31 May 2014 21:27:03 -0700 |
parents | c58e17f5c0f6 |
children | bb4723fec05e |
comparison
equal
deleted
inserted
replaced
252:004946743678 | 253:697c2c562af2 |
---|---|
125 if: bucket = key { | 125 if: bucket = key { |
126 ret <- bucket | 126 ret <- bucket |
127 notdone <- false | 127 notdone <- false |
128 } | 128 } |
129 } | 129 } |
130 i <- i + 1 | |
130 } | 131 } |
131 if: (ret empty?) ifnot else: { | 132 if: (ret empty?) ifnot else: { |
132 ifpres: (ret v) | 133 ifpres: (ret v) |
133 } | 134 } |
134 } | 135 } |