/usr/local/lsws/phpbuild/php-8.0.7/ext/gd/tests/ Current File: //usr/local/lsws/phpbuild/php-8.0.7/ext/gd/tests/bug27582_1.phpt

--TEST--
Bug #27582 (ImageFillToBorder() on alphablending image looses alpha on fill color)
--SKIPIF--
<?php
        if (!extension_loaded('gd')) die("skip gd extension not available\n");
?>
--FILE--
<?php
$dest = dirname(realpath(__FILE__)) . '/bug27582.png';
@unlink($dest);
$im = ImageCreateTrueColor(10, 10);
imagealphablending($im, true);
imagesavealpha($im, true);
$bordercolor=ImageColorAllocateAlpha($im, 0, 0, 0, 2);
$color = ImageColorAllocateAlpha($im, 0, 0, 0, 1);
ImageFillToBorder($im, 5, 5, $bordercolor, $color);
imagepng($im, $dest);

$im2 = imagecreatefrompng($dest);
$col = imagecolorat($im2, 5, 5);
$color = imagecolorsforindex($im2, $col);
echo $color['alpha'];
@unlink($dest);
?>
--EXPECT--
1