2012-11-23 7 views
2

이것은 바보 일지 모르지만 나는 단지 그것을 보지 못한다. 이건 내 코드입니다예기치 않은 토큰 ";;" ocaml

let rec lister old fixed = 
    let paren = Str.regexp "(|)" in 
    match old with 
    [] -> [] 
    | h::t -> if Str.string_match paren h 0 
       then iter t ((Str.split_delim paren h)@fixed) 
       else iter t (h::fixed) 
;; 

let stl string = 
    let r = Str.regexp " " in 
    let l = lister (Str.split r string) [] 
;; 

오류가 마지막에; 예상치 못한 토큰을 얻고 있습니다. ";;". 나는 약간 재 작업을 시도했다.

let stl string = 
    let l = lister (Str.split (Str.regexp " ") string) [] 
;; 

그래도 아무것도하려고 노력하지 않았다. 리스터 기능이 영향을 미칠 것이라고 생각하지 않지만 어쨌든 그것을 포함 시켰습니다. 생각?

답변

7

당신 가지고 렛에 표현 완료되지 못한 :

let stl string = 
    let r = Str.regexp " " in 
    let l = lister (Str.split r s) [] in 
    l 

가의 OCaml documentation을 확인하십시오

let stl string = 
    let r = Str.regexp " " in 
    lister (Str.split r s) [] 

또는 당신이 뭔가에 해당 작업을 수행 할 수 있습니다

let stl string = 
    let r = Str.regexp " " in 
    let l = lister (Str.split r s) [] 

이 시도 자세한 정보.

관련 문제