(* $Id: seqdb_fsys_helpers.mli 16180 2008-01-18 20:57:28Z gerd $ *) (** Additional functions for filesystems *) open Netchannels open Seqdb_fsys_types class input_channel : 'fd file_system -> 'fd -> in_obj_channel (** [let ch = new input_channel fsys file]: Creates an input channel [ch] that reads from the file *) class output_channel : 'fd file_system -> 'fd -> out_obj_channel (** [let ch = new output_channel fsys file]: Creates an output channel [ch] that writes to the file *)