X-Git-Url: https://code.consxy.com/gitweb/gitweb.cgi?a=blobdiff_plain;ds=sidebyside;f=src%2Ftest%2Fsimpletests.lisp;h=3aef8e2b8e39e9425b3e056bbfa463a7ac18ac56;hb=393d2cd66721b93bed149613ceb7ee4fdac408c2;hp=d85675db12428ec64b7a8d8c0ad0d20604f4b9a7;hpb=aa474227efad1f00e26f762b597a1f18a9cc3be5;p=clnl

diff --git a/src/test/simpletests.lisp b/src/test/simpletests.lisp
index d85675d..3aef8e2 100644
--- a/src/test/simpletests.lisp
+++ b/src/test/simpletests.lisp
@@ -253,3 +253,9 @@
 
 (defsimplecommandtest "clear-all 1" "crt 10 ask patches [ set pcolor random 100 ] clear-all"
  "7B5DF28923D7FD72158018A876DE8ED02CFB0882")
+
+(defsimplecommandtest "stop 1" "crt 10 stop crt 10"
+ "A925E39EC022967568D238D31F70F0A375024A89")
+
+(defsimplecommandtest "stop 2" "crt 10 ask turtles [ fd 1 stop fd 1 ]"
+ "A6C980CC9843CDD211ABD9C13899010D555F3DC5")