Module Cobol_preproc.Input

type t =
  1. | String of {
    1. contents : string;
    2. filename : string;
    }
  2. | Channel of {
    1. ic : Stdlib.in_channel;
    2. filename : string;
    }
val string : filename:string -> string -> t
val channel : filename:string -> Stdlib.in_channel -> t
val from : filename:string -> f:(t -> 'a) -> 'a

from ~filename ~f feeds f with the contents of a file named filename; uses stdin if filename = "".