fenix
/
cpdf-source
mirror of https://github.com/johnwhitington/cpdf-source.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

Fix (1, 0) cmap

This commit is contained in:
John Whitington 2023-07-05 13:22:25 +01:00
parent fff1c96037
commit 0628cb0251
1 changed files with 4 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
cpdftruetype.ml
View File

@ -322,7 +322,7 @@ let write_cmap_table subset cmap bs =
putval bs 16 0l; (* table version number *)
putval bs 16 1l; (* number of encoding tables *)
putval bs 16 1l; (* platform ID *)
putval bs 16 1l; (* platform encoding ID *)
putval bs 16 0l; (* platform encoding ID *)
putval bs 32 12l; (* subtable offset = 12 bytes from beginning of table *)
putval bs 16 6l; (* Table format 6 *)
putval bs 16 (i32ofi (10 + 2 * length glyphindexes)); (* subtable length *)
@ -518,10 +518,11 @@ let write_font filename data =
close_out fh
let find_main encoding subset =
let encoding_table = Pdftext.table_of_encoding encoding in
cleave subset 3
(*let encoding_table = Pdftext.table_of_encoding encoding in
List.partition
(fun u -> try ignore (Hashtbl.find encoding_table u); true with Not_found -> false)
subset
subset*)
let parse ?(subset=[]) data encoding =
if !dbg then