Changeset 91

Show
Ignore:
Timestamp:
02/09/10 16:43:03 (10 years ago)
Author:
MrLapinot
Message:

cleancsv: rend toutes les lignes de la même longueur

Files:
1 modified

Legend:

Unmodified
Added
Removed
  • elections/trunk/tools/cleancsv.ml

    r87 r91  
    1414 
    1515let doc = load_in ~separator:';' stdin in 
    16 let copy = List.map (List.map clean) doc in 
     16let copy = List.map (List.map clean) (square doc) in 
    1717print ~separator:';' copy