From 3f1fac3e20c59ae0877346d8f21e00bcc1c5e545 Mon Sep 17 00:00:00 2001
From: Martin Nilsson <mani@lysator.liu.se>
Date: Wed, 26 Jul 2006 21:24:00 +0200
Subject: [PATCH] Test greyp
Rev: src/modules/Image/testsuite.in:1.22
---
src/modules/Image/testsuite.in | 11 ++++++++++-
1 file changed, 10 insertions(+), 1 deletion(-)
diff --git a/src/modules/Image/testsuite.in b/src/modules/Image/testsuite.in
index 41288f2480..633b700ce0 100644
--- a/src/modules/Image/testsuite.in
+++ b/src/modules/Image/testsuite.in
@@ -1,5 +1,5 @@
START_MARKER
-dnl $Id: testsuite.in,v 1.21 2005/08/14 02:22:09 nilsson Exp $
+dnl $Id: testsuite.in,v 1.22 2006/07/26 19:24:00 nilsson Exp $
test_eq([[ Image.PNM.decode("P1\n5 5\n0 1 1 1 1\n1 0 1 1 1\n"
"1 1 0 1 1\n1 1 1 0 1\n1 1 1 1 0") ]],
@@ -624,6 +624,10 @@ test_eq( Image.Font()->write("hej"),
test_eq( Image.Font()->write("h","o"),
Image.PNM.decode(MIME.decode_base64("UDQKNyAyMwr+vr6ulra2trb+/v7+/s62tra2zv7+/g==")) )
+
+dnl #### Colortable
+
+
define(test_blackwhite,[[
test_equal_any($1,[[ (< Image.Color.white, Image.Color.black >) ]])
]])
@@ -688,6 +692,11 @@ test_coltab([[
test_do( add_constant("c") )
]])
+test_true( Image.Colortable(Image.Image(10,10)->randomgrey())->greyp() )
+test_false( Image.Colortable(Image.Image(10,10,255,0,0))->greyp() )
+
+
+dnl #### Encodings
define(test_encoding,[[
cond( (master()->resolv("Image.$1")||([]))->encode,[[
--
GitLab