7

我正在寻找一种将两个ints 写入文件的方法。会有很多对的两个ints。两个数字之间应该有一个空格(我的意思是' ')。例如,像这样:

1 2
6 896
243 865
....
4

2 回答 2

7

你可以使用这样的东西:

let rec print_numbers oc = function 
  | [] -> ()
  | e::tl -> Printf.fprintf oc "%d %d\n" (fst e) (snd e); print_numbers oc tl

let () =
  let nums = [(1, 2); (6, 896); (243, 865)] in
  let oc = open_out "filename.txt" in
  print_numbers oc nums;
  close_out oc;

这假设您的数据是一对列表。

于 2013-10-20T20:27:44.837 回答
5

如果你使用Core,你可以这样做:

open Core.Std
let () = Out_channel.write_all "your_file.txt" ~data:"Your text"
于 2015-10-08T13:57:12.567 回答