X-Git-Url: https://code.consxy.com/gitweb/gitweb.cgi?p=clnl;a=blobdiff_plain;f=src%2Ftest%2Fviewtests.lisp;h=ac39a155fbbaac72d5b7318aef9dc2d207e17448;hp=630280c81f23787cceab29d6298e97c959ee8b2a;hb=f00d5c7c0e0b18f334da14c2e4107a7f1f68b45f;hpb=82888b4c12ff462e539e9e7746d5268f9c46f330

diff --git a/src/test/viewtests.lisp b/src/test/viewtests.lisp
index 630280c..ac39a15 100644
--- a/src/test/viewtests.lisp
+++ b/src/test/viewtests.lisp
@@ -20,3 +20,6 @@
 
 (defviewtest "lt" "crt 20 ask turtles [ fd 2 lt 100 fd 2 ]"
  '("BF49775097BBFAE12E42D6F13FAFC93090B7ACAC" "ABAEAF8DDD68E7F0FED6CB243F27DB312588A1E8"))
+
+(defviewtest "pcolor green" "ask patches [ set pcolor green ]"
+ "90F5F4870955B9FF02224F00E3C9814B8A6F766E")