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 |