2013-10-20 12 views
5

मैं एक फ़ाइल में दो int एस लिखने का एक तरीका खोज रहा हूं। दो int एस के कई जोड़े होंगे। दो संख्याओं के बीच एक जगह होनी चाहिए (मेरा मतलब है '')। उदाहरण के लिए, कुछ इस तरह:ओकैम फ़ाइल में कैसे लिखें?

1 2 
6 896 
243 865 
.... 

उत्तर

5

आप कुछ इस तरह का उपयोग कर सकते हैं:

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; 

यह आपके डेटा मान लिया गया जोड़े की एक सूची है।

2

आप Core का उपयोग करते हैं, तो आप ऐसा कर सकते हैं:

open Core.Std 
let() = Out_channel.write_all "your_file.txt" ~data:"Your text" 
संबंधित मुद्दे