sig
val commands : string list Pervasives.ref
val remaining : string list Pervasives.ref
val append_command : string -> unit
val init_commands : string list Pervasives.ref
val append_init_command : string -> unit
val add_option : string * Arg.spec * string -> unit
val parse : unit -> unit
end