Module Main

module Main: sig .. end

main ()

val input_file_list : (Directfifowatcher.directory * Directfifowatcher.slice_name) list
       Pervasives.ref

val cur_dir : Directfifowatcher.directory Pervasives.ref

val cur_slice : Directfifowatcher.slice_name Pervasives.ref

val daemonize : bool Pervasives.ref

val cmdspeclist : (string * Arg.spec * string) list