コメントの削除 in OCaml DouKaku?

コメントの削除

ソースコードからコメント部分を削除するプログラム decomment を書いてください．
すくなくとも，decomment を記述したのと同じ言語で書かれているソースコードが
扱えるようにしてください．

post comment

Posted feedbacks - OCaml

付属の解析機を使ったあとに読み込んでいるだけです。
空白、改行、タブなどは捨てられてしまいます。

let decomment s = 
  Stream.iter (fun item ->
    print_string 
      (match item with
      | Kwd s | Ident s -> s
      | String s -> Printf.sprintf "\"%s\"" (String.escaped s)
      | Char c -> Printf.sprintf "'%s'" (Char.escaped c)
      | Int n -> string_of_int n
      | Float f -> string_of_float f
      ); print_char ' '
    ) (make_lexer [] (Stream.of_string s));;

(* decomment "aa\"(* bb \\\" cc *)\"dd '\\\\' (* zz *) ";; *)

DouKaku?

コメントの削除

Posted feedbacks - OCaml

Index

Feed

Other

Link

Pathtraq