Browse files

[cl-backend] added missing files (tests)

  • Loading branch information...
1 parent c9e137b commit 4510adb2c89095ba5aaeb4d62127bd634d429e7c @pmurias pmurias committed Feb 11, 2011
Showing with 36 additions and 0 deletions.
  1. +33 −0 simple-tests/arith.t
  2. +3 −0 simple-tests/dots.t
View
33 simple-tests/arith.t
@@ -0,0 +1,33 @@
+say "1..6";
+if 1 == 2 {
+ say "not ok 1 # ==";
+}
+if 2 == 2 {
+ say "ok 1 # ==";
+}
+if 1+4 == 5 {
+ say "ok 2 # +";
+}
+if 5-4 == 1 {
+ say "ok 3 # -";
+}
+
+if 3*6 == 18 {
+ say "ok 4 # *";
+}
+
+if 4 > 18 {
+ say "not ok 5 # >";
+}
+
+if 100 > 18 {
+ say "ok 5 # >";
+}
+
+if 4 < 18 {
+ say "ok 6 # >";
+}
+
+if 100 < 18 {
+ say "not ok 6 # >";
+}
View
3 simple-tests/dots.t
@@ -0,0 +1,3 @@
+say "1..1";
+my class Cursor { ... }
+say "ok 1 #lived after defining a class with dots";

0 comments on commit 4510adb

Please sign in to comment.