오보에블로그

[웹어셈블리] wat 파일 sexp list 변환 본문

STEADYSTUDY/넓고 얕게

[웹어셈블리] wat 파일 sexp list 변환

(OBO) 2020. 7. 3. 10:21
728x90

**Ocaml 사용***

 

필요한 패키지

package(bin_prot),package(sexplib), package(core_kernel)

main 코드

open Sexplib

let rec print_list l =
  match l with
  | [] -> ""
  | hd::tl -> 
            (
              match hd with
              | Core_kernel.Sexp.Atom hd' -> hd'^" "^(print_list tl)
              | Core_kernel.Sexp.List hd' -> "( "^(print_list hd')^ " ) " ^(print_list tl)
            )

let main() = 
  let a = Sexp.load_sexps "basic.wat" in
    let p_a = print_list a in
      prerr_endline p_a


let _ = main ()

 

 

그외 Sexp 자세할 라이브러리 참 고 : http://batteries.forge.ocamlcore.org/doc.preview:batteries-beta1/html/api/SExpr.html

 

728x90