Mercurial > repos > rhope
comparison string.rhope @ 87:3c4325e6298f
Add First@Dictionary (need to find mem man bug)
| author | Mike Pavone <pavone@retrodev.com> |
|---|---|
| date | Fri, 30 Jul 2010 01:48:59 -0400 |
| parents | 27bb051d631c |
| children | c25d75c2440b |
comparison
equal
deleted
inserted
replaced
| 83:27bb051d631c | 87:3c4325e6298f |
|---|---|
| 557 { | 557 { |
| 558 ,invalid <- [string]Byte[index] | 558 ,invalid <- [string]Byte[index] |
| 559 { out <- UInt32[~] } | 559 { out <- UInt32[~] } |
| 560 } | 560 } |
| 561 | 561 |
| 562 _From Dict String[arr,el:out] | |
| 563 { | |
| 564 out <- [arr]Append[Trunc UInt8[el]] | |
| 565 } | |
| 566 | |
| 567 From Dict Key@String[string,data:out] | |
| 568 { | |
| 569 out <- String[Fold[_From Dict String[?], Array[], data]] | |
| 570 } | |
| 571 |