Commits

camlspotter committed a6c4990

cr

Comments (0)

Files changed (1)

   map 0 l
 
 let from_to f t =
+  (* CR jfuruse: we should build from 'to' *)
   let rec from_to st f t =
     if f > t then rev st
     else from_to (f::st) (f+1) t