val args : (string * Stdlib.Arg.spec * string) listval init : unit -> unitval exit : unit -> _val process_file : file_name:string -> file_contents:string -> (unit -> unit) -> unitval copy_input : int -> int -> unitval input_sub : int -> int -> stringval read_file : string -> string