type skeleton = (string * (string * section) list) listtype sections = (section, code_excerpt) Common.assocval parse_data_file : Common.filename -> sectionsval parse_skeleton_file : Common.filename -> skeletonval detect_comment_style : Common.filename -> comment_styleval gen_source_files :
skeleton ->
sections ->
comment_style ->
gen_mode:gen_mode ->
output_dir:Common.dirname ->
ext_file:string ->
hook_start_section2:(string -> string) ->
hook_line_body:(string -> string) ->
hook_end_section2:(string -> string) ->
unit