30 lines
863 B
OCaml
30 lines
863 B
OCaml
(** PDF/UA *)
|
|
|
|
(** Print matterhorn test results ("" = all tests) *)
|
|
val test_matterhorn_print : Pdf.t -> string -> unit
|
|
|
|
(** Return JSON results of a matterhorn test ("" = all tests *)
|
|
val test_matterhorn_json : Pdf.t -> string -> Cpdfyojson.Safe.t
|
|
|
|
(** Mark PDF as PDF/UA-1 compliant. *)
|
|
val mark : Pdf.t -> unit
|
|
|
|
(** Mark PDF as PDF/UA-2 compliant. *)
|
|
val mark2 : int -> Pdf.t -> unit
|
|
|
|
(** Remove any PDF/UA-* marker *)
|
|
val remove_mark : Pdf.t -> unit
|
|
|
|
(** Print the structure tree to standard output, graphically. *)
|
|
val print_struct_tree : Pdf.t -> unit
|
|
|
|
(** Extract structure tree to JSON *)
|
|
val extract_struct_tree : Pdf.t -> Cpdfyojson.Safe.t
|
|
|
|
(** Reapply an edited JSON structure tree to its PDF. *)
|
|
val replace_struct_tree : Pdf.t -> Cpdfyojson.Safe.t -> unit
|
|
|
|
(** / **)
|
|
val cpdfua_args : string -> string list
|
|
val cpdfua2_args : string -> string list
|