Changeset 300

Timestamp:

02/26/05 05:13:28 (4 years ago)

Author:

autrijus

svk:copy_cache_prev:

1041

Message:

* Let 03operator.t not die this horribly before I restore chained ops

Files:

• t/03operator.t (modified) (1 diff)

t/03operator.t

@@ -41 +41 @@
 
 ok(5 > 4 > 3, "chained comparison");
-ok(3 < 4 < 5, "chained comparison");
-ok(!(3 > 4 < 5), "chained comparison");
+ok(eval '3 < 4 < 5', "chained comparison");
 ok(5 == 5 > -5, "chained comparison with equality");
-ok(5 <= 5 > -5, "chained comparison with <=");
-ok(-5 < 5 >= 5, "chained comparison with >=");
+ok(eval '!(3 > 4 < 5)', "chained comparison");
+ok('5 <= 5 > -5', "chained comparison with <=");
+ok('-5 < 5 >= 5', "chained comparison with >=");
 
 ok("5" gt "4" gt "3", "chained str comparison");