diff --git a/basis/images/png/png-tests.factor b/basis/images/png/png-tests.factor index 858718e63f..25815c7017 100644 --- a/basis/images/png/png-tests.factor +++ b/basis/images/png/png-tests.factor @@ -7,6 +7,11 @@ IN: images.png.tests ! The subset of the suite that should work given the current implementation. "vocab:images/testing/png" [ + "basn0g01.png" decode-test + "basn0g02.png" decode-test + "basn0g04.png" decode-test + "basn0g08.png" decode-test + "basn0g16.png" decode-test "basn2c08.png" decode-test "basn6a08.png" decode-test "f00n2c08.png" decode-test diff --git a/basis/images/png/png.factor b/basis/images/png/png.factor index 6e8d7a6c1e..2135d3fc96 100644 --- a/basis/images/png/png.factor +++ b/basis/images/png/png.factor @@ -240,7 +240,7 @@ ERROR: unknown-component-type n ; : scale-factor ( n -- n' ) { { 1 [ 255 ] } - { 2 [ 127 ] } + { 2 [ 85 ] } { 4 [ 17 ] } } case ; diff --git a/extra/images/testing/png/basn0g01.fig b/extra/images/testing/png/basn0g01.fig new file mode 100644 index 0000000000..d79f71b469 Binary files /dev/null and b/extra/images/testing/png/basn0g01.fig differ diff --git a/extra/images/testing/png/basn0g01.png b/extra/images/testing/png/basn0g01.png new file mode 100644 index 0000000000..1d722423aa Binary files /dev/null and b/extra/images/testing/png/basn0g01.png differ diff --git a/extra/images/testing/png/basn0g02.fig b/extra/images/testing/png/basn0g02.fig new file mode 100644 index 0000000000..3953ef55c1 Binary files /dev/null and b/extra/images/testing/png/basn0g02.fig differ diff --git a/extra/images/testing/png/basn0g02.png b/extra/images/testing/png/basn0g02.png new file mode 100644 index 0000000000..508332418f Binary files /dev/null and b/extra/images/testing/png/basn0g02.png differ diff --git a/extra/images/testing/png/basn0g04.fig b/extra/images/testing/png/basn0g04.fig new file mode 100644 index 0000000000..1e45ed142b Binary files /dev/null and b/extra/images/testing/png/basn0g04.fig differ diff --git a/extra/images/testing/png/basn0g04.png b/extra/images/testing/png/basn0g04.png new file mode 100644 index 0000000000..0bf3687863 Binary files /dev/null and b/extra/images/testing/png/basn0g04.png differ diff --git a/extra/images/testing/png/basn0g08.fig b/extra/images/testing/png/basn0g08.fig new file mode 100644 index 0000000000..d185701c27 Binary files /dev/null and b/extra/images/testing/png/basn0g08.fig differ diff --git a/extra/images/testing/png/basn0g08.png b/extra/images/testing/png/basn0g08.png new file mode 100644 index 0000000000..23c82379a2 Binary files /dev/null and b/extra/images/testing/png/basn0g08.png differ diff --git a/extra/images/testing/png/basn0g16.fig b/extra/images/testing/png/basn0g16.fig new file mode 100644 index 0000000000..7218acd3b1 Binary files /dev/null and b/extra/images/testing/png/basn0g16.fig differ diff --git a/extra/images/testing/png/basn0g16.png b/extra/images/testing/png/basn0g16.png new file mode 100644 index 0000000000..e7c82f78eb Binary files /dev/null and b/extra/images/testing/png/basn0g16.png differ