Module Platform.TYPES

type source_format_id =
  1. | SFFree
  2. | SFFixed
  3. | SFCOBOL85
  4. | SFVariable
  5. | SFXOpen
  6. | SFxCard
  7. | SFCRT
  8. | SFTrm
  9. | SFCOBOLX
type platform = {
  1. mutable verbosity : int;
  2. mutable eprintf : 'a. ('a, Stdlib.out_channel, unit) Stdlib.format -> 'a;
  3. mutable error : 'a. ('a, Stdlib.Format.formatter, unit) Stdlib.format -> 'a;
  4. mutable getcwd : unit -> string;
  5. mutable read_text_file : string -> string;
  6. mutable getenv_opt : string -> string option;
  7. mutable mk_temp_dir : ?mode:int -> ?dir:string -> string -> string;
  8. mutable remove_dir : ?all:bool -> string -> unit;
  9. mutable autodetect_format : ?source_contents:string -> string -> source_format_id;
  10. mutable find_lib : lookup_config:Copybook.TYPES.lookup_config -> ?fromfile:string -> ?libname:Copybook.TYPES.fileloc -> Copybook.TYPES.fileloc -> (string, Copybook.TYPES.lookup_error) Stdlib.result;
}