Add test imgPNG-3.1 demonstrating bug [1c659ef0f1]

1 files changed, 11 insertions, 0 deletions

diff --git a/tests/imgPNG.test b/tests/imgPNG.test
index 0757411..335ac39 100644
--- a/tests/imgPNG.test
+++ b/tests/imgPNG.test
@@ -1103,6 +1103,17 @@ test imgPNG-2.2 {reading a good image with multiple IDATs} -setup {
 } -cleanup {
     image delete $i
 } -result 223x212
+
+test imgPNG-3.1 {reading image with unknown ancillary chunk - bug [1c659ef0f1]} -setup {
+    set fileName [file join [file dirname [info script]] iDOT.png]
+} -body {
+    # the image contains an unknown chunk iDOT
+    # since the name of this chunk starts with a lowercase letter,
+    # it's an ancillary chunk that shall not trigger an error
+    catch {image create photo -file $fileName}
+} -cleanup {
+    catch {image delete $im}
+} -result {0}
 
 }
 namespace delete png