fenix/cpdf-source
1
0
Fork 0
mirror of https://github.com/johnwhitington/cpdf-source.git synced 2025-06-05 22:09:39 +02:00
Code Issues Packages Projects Releases Wiki Activity

Testing G4

Browse Source
This commit is contained in:
John Whitington
2025-04-11 14:11:49 +01:00
parent bc051db8fb
commit 698605ab33
1 changed files with 1 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
cpdfimage.ml
View File

@ -897,7 +897,7 @@ let recompress_1bpp_ccittg4_lossless ~pixel_threshold ~length_threshold pdf s di
let data = match s with Pdf.Stream {contents = _, Pdf.Got d} -> d | _ -> assert false in
let compressed = Pdfcodec.encode_ccittg4 w data in
let newsize = bytes_size compressed in
if newsize < size then
if true (* newsize < size *) then
begin
if !debug_image_processing then Printf.printf "1bpp to CCITT G4 %i -> %i (%i%%)\n%!" size newsize (int_of_float (float newsize /. float size *. 100.));
reference :=