let brtx_to_html ~writer
?make_section_links ?(doc=false) ?title ?css_link ?(print_comments=false)
?(filename="<IN>") ?class_hook ?img_hook ?url_hook ~input_char
?separate_header ?(deny_bypass=false) () =
if doc then (
writer.w_write (Bracetax_HTML_printer.header
~comment:"Generated with BraceTax" ?title
?stylesheet_link:css_link ());
);
let printer =
Bracetax_HTML_printer.build
?make_section_links ?class_hook ?img_hook ?url_hook ?separate_header
~writer ~print_comments () in
Parser.do_transformation ~deny_bypass printer input_char filename;
if doc then writer.w_write (Bracetax_HTML_printer.footer ());
()