This commit is contained in:
John Whitington 2023-05-12 22:54:08 +01:00
parent 1efdca2abe
commit 37d968c39f

View File

@ -72,7 +72,7 @@ let rec string_of_drawop = function
and string_of_drawops l = and string_of_drawops l =
fold_left (fun x y -> x ^ " " ^ y) "" (map string_of_drawop l) fold_left (fun x y -> x ^ " " ^ y) "" (map string_of_drawop l)
(* Per page resources *) (* Per page / xobject resources *)
type res = type res =
{images : (string, (string * int)) Hashtbl.t; (* (name, (pdf name, objnum)) *) {images : (string, (string * int)) Hashtbl.t; (* (name, (pdf name, objnum)) *)
extgstates : ((string * float), string) Hashtbl.t; (* (kind, value), name *) extgstates : ((string * float), string) Hashtbl.t; (* (kind, value), name *)