(************************************************************
   testhtml.ml		Created      : Sun Nov  9 19:14:37 2003
  			Last modified: Sun Nov 09 19:17:07 2003
  Compile: ocamlc -dtypes unix.cma basics.ml html.ml testhtml.ml -o testhtml #
  FTP Directory: sources/ocaml #
************************************************************)
(**

  @author Takashi Masuyama <mamewo@dk9.so-net.ne.jp>

*)

let _ =
  Html.write print_string (Html.read_file "/home/tak/homepage/aki.html")