Prims - Implement !=

[clnl] / src / test / simpletests.lisp

diff --git a/src/test/simpletests.lisp b/src/test/simpletests.lisp
index 406df86f3169ad2a2bdd7e77eea7f61283873860..54847ef97e5c2f13cef527e15b4d64fdbbfbdb3d 100644 (file)
--- a/src/test/simpletests.lisp
+++ b/src/test/simpletests.lisp
@@ -29,3 +29,15 @@
 
 (defsimplereportertest "Random 1" "random-float 5" "4.244088516651127"
  "17D1BF7FF7BF2C7F3F5F7DD7CF67CFF2772CFFFC")
+
+(defsimplereportertest "= 1" "5 = 5" "true"
+ "E1DE30F072D785E0D0B59F28B0F7853E3D3E0D8B")
+
+(defsimplereportertest "= 2" "5 = 4" "false"
+ "E1DE30F072D785E0D0B59F28B0F7853E3D3E0D8B")
+
+(defsimplereportertest "!= 1" "5 != 5" "false"
+ "E1DE30F072D785E0D0B59F28B0F7853E3D3E0D8B")
+
+(defsimplereportertest "!= 2" "5 != 4" "true"
+ "E1DE30F072D785E0D0B59F28B0F7853E3D3E0D8B")