3b401c1a78223abcbc48fc54ff00c03d8151dd45
[clnl] / src / test / simpletests.lisp
1 (in-package #:clnl-test)
2
3 (defsimplecommandtest "Nothing" ""
4  "E1DE30F072D785E0D0B59F28B0F7853E3D3E0D8B")
5
6 (defsimplecommandtest "Simple crt" "crt 1"
7  "2F08B31AC06C9D5339E6B3E953C2B4B71FDB9CDE")
8
9 (defsimplecommandtest "Simple crt 2" "crt 5"
10  "9FE588C2749CD9CE66CB0EA451EFB80476E881FB")
11
12 (defsimplecommandtest "Simple crt and fd random" "crt 30 ask turtles [ fd random-float 1 ]"
13  "DED34D1D6492244E9E3813DE8DBF258F96636879")
14
15 (defsimplecommandtest "Simple crt and fd" "crt 5 ask turtles [ fd 1 ]"
16  "BEB43404EDC7852985A9A7FC312481785FE553A0")
17
18 (defsimplecommandtest "Wrapping 1" "crt 5 ask turtles [ fd 5 ]"
19  "1098A56973DA04E7AEA7659C40E3FF3EC7862B02")
20
21 (defsimplecommandtest "Wrapping 2" "crt 5 ask turtles [ fd random-float 5 ]"
22  "1419DFA66EFB7F08FB30C7B63B256547212EB915")
23
24 (defsimplecommandtest "Wrapping 3" "crt 10 ask turtles [ fd -5 ]"
25  "53E4ECBD3C49FC8D3466563641CFCD7DCB5CD2AF")
26
27 (defsimplecommandtest "Wrapping 4" "crt 10 ask turtles [ fd random-float -5 ]"
28  "1258CE9CC93B52367E797F4C497BF95760EC7175")
29
30 (defsimplereportertest "Random 1" "random-float 5" "4.244088516651127"
31  "17D1BF7FF7BF2C7F3F5F7DD7CF67CFF2772CFFFC")
32
33 (defsimplereportertest "= 1" "5 = 5" "true"
34  "E1DE30F072D785E0D0B59F28B0F7853E3D3E0D8B")
35
36 (defsimplereportertest "= 2" "5 = 4" "false"
37  "E1DE30F072D785E0D0B59F28B0F7853E3D3E0D8B")