char

Question

की सूची में स्ट्रिंग मैं एक ऐसा फ़ंक्शन लिखना चाहता हूं जो स्ट्रिंग ले और चार की सूची लौटाए। यहां एक फ़ंक्शन है, लेकिन मुझे लगता है कि यह वही नहीं है जो मैं चाहता हूं (मैं एक स्ट्रिंग लेना चाहता हूं और पात्रों की एक सूची वापस करना चाहता हूं)।

let rec string_to_char_list s = 
    match s with 
     | "" -> [] 
     | n -> string_to_char_list n 

Answer 1

एक तरफ है, लेकिन बहुत महत्वपूर्ण: क्योंकि तुम एक पुनरावर्ती कॉल जिसके लिए सभी मापदंडों में ठीक उसी एक आप में मिल गया हैं

आपका कोड स्पष्ट रूप से गलत है यह एक अनंत अनुक्रम प्रेरित करने के लिए जा रहा है। एक ही मूल्य के साथ कॉल के लिए, इस प्रकार हमेशा के लिए लूपिंग (एक ढेर ओवरफ्लो पूंछ-आरईसी स्थिति में नहीं होगा)।

---

कोड करता है कि आप क्या होगा चाहते हैं:

let explode s = 
    let rec exp i l = 
    if i < 0 then l else exp (i - 1) (s.[i] :: l) in 
    exp (String.length s - 1) [] 

स्रोत: http://caml.inria.fr/pub/old_caml_site/FAQ/FAQ_EXPERT-eng.html#strings

---

वैकल्पिक रूप से, आप एक पुस्तकालय का उपयोग करने के लिए चुन सकते हैं: बैटरी String.to_list या extlib String.explode

Answer 2

नी ce और सरल:

let rec list_car ch = match ch with 
    | "" -> [] 
    | ch -> (String.get ch 0) :: (list_car (String.sub ch 1 ((String.length ch)-1))) ;; 

Answer 3

कैसे कुछ इस तरह के बारे में:

let string_to_list str = 
    let rec loop i limit = 
    if i = limit then [] 
    else (String.get str i) :: (loop (i + 1) limit) 
    in 
    loop 0 (String.length str);; 

let list_to_string s = 
    let rec loop s n = 
    match s with 
     [] -> String.make n '?' 
    | car :: cdr -> 
     let result = loop cdr (n + 1) in 
     String.set result n car; 
     result 
    in 
    loop s 0;;