RosettaCodeData/Task/Move-to-front-algorithm/Zkl/move-to-front-algorithm-2.zkl

7 lines
190 B
Plaintext

fcn decode(list){ //-->String
st:=["a".."z"].pump(String); //"abcd..z"
sink:=Sink(String);
list.reduce('wrap(st,n){ c:=st[n]; sink.write(c); c+st.del(n); },st);
sink.close();
}