compress binary image

This commit is contained in:
Cristy
2022-11-19 16:10:31 -05:00
parent d4be27057b
commit 09442a54fd
7 changed files with 3 additions and 20 deletions
+1 -1
View File
@@ -16,5 +16,5 @@ require 't/subroutines.pl';
chdir 't/cgm' || die 'Cd failed';
testReadCompare('CGM:input.cgm', '../reference/cgm/read.miff', q//, 0.0 0.0);
testReadCompare('CGM:input.cgm', '../reference/cgm/read.gif', q//, 0.0 0.0);
Binary file not shown.

After

Width:  |  Height:  |  Size: 56 KiB

Binary file not shown.
Binary file not shown.

After

Width:  |  Height:  |  Size: 7.7 KiB

File diff suppressed because one or more lines are too long
+1 -1
View File
@@ -19,7 +19,7 @@ chdir 't/x11' || die 'Cd failed';
#
if ( 0 && defined($ENV{'DISPLAY'}) && ($^O ne 'MSWin32') ) {
$image=Image::Magick->new;
$x=$image->ReadImage('congrats.miff');
$x=$image->ReadImage('congrats.gif');
if( "$x" ) {
print "not ok $test\n";
} else {
+1 -1
View File
@@ -226,7 +226,7 @@ static MagickBooleanType ReadHEICExifProfile(Image *image,
offset|=(unsigned int) (*(exif_profile+2)) << 8;
offset|=(unsigned int) *(exif_profile+3);
offset+=4;
if (offset < length-4)
if (offset < (length-4))
{
length-=offset;
profile=BlobToStringInfo(exif_profile+offset,(size_t) length);