let cudf_load_list file = let _, pkglist, _ = parse_cudf file in let from_cudf (p,i) = (p,string_of_int i) in let to_cudf (p,v) = (p,int_of_string v) in (Cudf.default_preamble,[pkglist;[]],from_cudf,to_cudf)