12 lines
395 B
OCaml
12 lines
395 B
OCaml
(* PNG files, represented only to the extent required to roundtrip PDF image objects *)
|
|
type t =
|
|
{width : int;
|
|
height : int;
|
|
idat : Pdfio.bytes}
|
|
|
|
(* Read a non-interlaced, non-transparent 24 bit PNG for inclusion in a PDF file. *)
|
|
val read_png : Pdfio.input -> t
|
|
|
|
(* Write a non-interlaced, non-transparent 24 bit PNG from PDF image contents *)
|
|
val write_png : t -> Pdfio.output -> unit
|