projects
/
clnl
/ blobdiff
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Prims - Implement not
[clnl]
/
src
/
test
/
simpletests.lisp
diff --git
a/src/test/simpletests.lisp
b/src/test/simpletests.lisp
index 96ce890ef55128de24664bd6ea60747a525a1ab0..5443673e5cdc0e6f0a12e9ea6025b459fa8f07bd 100644
(file)
--- a/
src/test/simpletests.lisp
+++ b/
src/test/simpletests.lisp
@@
-135,6
+135,12
@@
(defsimplecommandtest "ifelse 2" "ifelse 5 = 4 [ crt 10 ] [ crt 5 ] if-else 5 = 4 [ crt 10 ] [ crt 5 ]"
"A925E39EC022967568D238D31F70F0A375024A89")
(defsimplecommandtest "ifelse 2" "ifelse 5 = 4 [ crt 10 ] [ crt 5 ] if-else 5 = 4 [ crt 10 ] [ crt 5 ]"
"A925E39EC022967568D238D31F70F0A375024A89")
+(defsimplecommandtest "not 1" "if not (5 = 5) [ crt 10 ]"
+ "E1DE30F072D785E0D0B59F28B0F7853E3D3E0D8B")
+
+(defsimplecommandtest "not 2" "if not (5 = 4) [ crt 10 ]"
+ "A925E39EC022967568D238D31F70F0A375024A89")
+
(defsimplereportertest "colors 1" "green" "55"
"E1DE30F072D785E0D0B59F28B0F7853E3D3E0D8B")
(defsimplereportertest "colors 1" "green" "55"
"E1DE30F072D785E0D0B59F28B0F7853E3D3E0D8B")