X-Git-Url: https://code.consxy.com/gitweb/gitweb.cgi?p=clnl;a=blobdiff_plain;f=src%2Ftest%2Fviewtests.lisp;h=a5ccd6f203f6624217fad82647ade9a49f8941e4;hp=d3d45dbe96cc4d2af9bb8b93f0aad92082fd8131;hb=2c338ef0bdabd1e327bbf474221239c2eead88e4;hpb=b018550f2029475c8bececad3c6658048c8c80f0

diff --git a/src/test/viewtests.lisp b/src/test/viewtests.lisp
index d3d45db..a5ccd6f 100644
--- a/src/test/viewtests.lisp
+++ b/src/test/viewtests.lisp
@@ -14,3 +14,9 @@
 
 (defviewtest "Die" "crt 10 ask turtles [ fd 1 ] ask turtles [ die ]"
  "1AF55686BD9B18D1CCE6AAF6BF18E81E6957F466")
+
+(defviewtest "rt" "crt 20 ask turtles [ fd 2 rt 100 fd 2 ]"
+ '("32CBE504D9BE79DD62163ECD684DAA54901C8DA2" "7DF601FF1857672EBFADC8414C0744AA2841E117"))
+
+(defviewtest "lt" "crt 20 ask turtles [ fd 2 lt 100 fd 2 ]"
+ '("B3DC43E676A804A5C42200E688D5AA6921DF95F2" "236B06E6383BC75B7C9E1E7BBF4B7D416AE72411"))