sig
  val print_fonts : ?json:bool -> Pdf.t -> int list -> unit
  val list_fonts :
    Pdf.t -> int list -> (int * string * string * string * string) list
  val json_fonts : Pdf.t -> int list -> Cpdfyojson.Safe.t
  val embed_missing_fonts : string -> bool -> string -> string -> unit
  val copy_font : Pdf.t -> string -> int -> int list -> Pdf.t -> Pdf.t
  val missing_fonts : Pdf.t -> int list -> unit
  val print_font_table : Pdf.t -> string -> int -> unit
  val extract_fontfile : int -> string -> string -> Pdf.t -> unit
  val remove_fonts : Pdf.t -> Pdf.t
end