fix png loading
parent
eae646bfa0
commit
2ca0375dee
|
@ -291,7 +291,7 @@ ERROR: invalid-color-type/bit-depth loading-png ;
|
||||||
{ 8 16 } validate-bit-depth ;
|
{ 8 16 } validate-bit-depth ;
|
||||||
|
|
||||||
: pad-bitmap ( image -- image )
|
: pad-bitmap ( image -- image )
|
||||||
dup dim>> first 4 divisor? [
|
dup dim>> second 4 divisor? [
|
||||||
dup [ bytes-per-pixel ]
|
dup [ bytes-per-pixel ]
|
||||||
[ dim>> first * ]
|
[ dim>> first * ]
|
||||||
[ dim>> first 4 mod ] tri
|
[ dim>> first 4 mod ] tri
|
||||||
|
|
Loading…
Reference in New Issue