Jump to content

Anagrams: Difference between revisions

13 bytes removed ,  14 years ago
Line 384:
let len = List.length li in
let s = String.create len in
let i = ref 0 in
ignore(
List.fold_leftiter (fun i c -> s.[!i] <- c; incr i) li;
s.[i] <- c; succ i
) 0 li);
(s)
 
Cookies help us deliver our services. By using our services, you agree to our use of cookies.