2013-10-20 20 views
5

Tôi đang tìm cách viết hai số int s vào một tệp. Sẽ có nhiều cặp của hai số int s. Giữa hai số phải có một khoảng trắng (ý tôi là ''). Ví dụ, một cái gì đó như thế này:OCaml Làm thế nào để ghi vào tập tin?

1 2 
6 896 
243 865 
.... 

Trả lời

5

Bạn có thể sử dụng một cái gì đó như thế này:

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; 

này giả định dữ liệu của bạn là một danh sách các cặp.

2

Nếu bạn sử dụng Core, bạn có thể làm điều này:

open Core.Std 
let() = Out_channel.write_all "your_file.txt" ~data:"Your text" 
Các vấn đề liên quan