gistfile1.txt

From 26807af930aaa617fd497ed41751b14714ae16eb Mon Sep 17 00:00:00 2001
From: Fitz Elliott <felliott@virginia.edu>
Date: Fri, 7 Jan 2011 09:45:08 -0500
Subject: [PATCH] test infix:<^^>'s short circuiting

---
 S03-operators/short-circuit.t |    4 ++++
 1 files changed, 4 insertions(+), 0 deletions(-)

diff --git a/S03-operators/short-circuit.t b/S03-operators/short-circuit.t
index c695bf0..eef2caa 100644
--- a/S03-operators/short-circuit.t
+++ b/S03-operators/short-circuit.t
@@ -88,6 +88,10 @@ plan 39;
     $x ^^ ($y = 42);
 
     is($y, 42, "^^ operator not short circuiting");
+
+    $x = 0;
+    1 ^^ 2 ^^ ($x = 5);
+    is($x, 0, "^^ operator short circuiting");
 }
 
 {
-- 
1.7.3.4