DeviceGray lossless-to-jpeg now working

This commit is contained in:
John Whitington 2023-12-19 18:11:47 +00:00
parent 78dbe17b67
commit 8d64e1efd7
1 changed files with 1 additions and 1 deletions

View File

@ -29,7 +29,7 @@ let pnm_to_channel_24 ch w h s =
let pnm_to_channel_8 ch w h s = let pnm_to_channel_8 ch w h s =
pnm_output_string ch "P5"; pnm_output_string ch "P5";
pnm_header ch w h; pnm_header ch w h;
pnm_output_string ch "15"; pnm_output_string ch "255";
pnm_newline ch; pnm_newline ch;
let pos = ref 0 in let pos = ref 0 in
for y = 1 to h do for y = 1 to h do