Navigation Menu

Skip to content

Instantly share code, notes, and snippets.

@felliott
Created January 7, 2011 14:40
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save felliott/769524 to your computer and use it in GitHub Desktop.
Save felliott/769524 to your computer and use it in GitHub Desktop.
From 21a836593d7dcabc196195116efe50f560ee4540 Mon Sep 17 00:00:00 2001
From: Fitz Elliott <felliott@virginia.edu>
Date: Fri, 7 Jan 2011 09:39:30 -0500
Subject: [PATCH] fix erroneous [^^] () test
---
S03-operators/reduce-le1arg.t | 2 +-
1 files changed, 1 insertions(+), 1 deletions(-)
diff --git a/S03-operators/reduce-le1arg.t b/S03-operators/reduce-le1arg.t
index 669661d..aa0a7f0 100644
--- a/S03-operators/reduce-le1arg.t
+++ b/S03-operators/reduce-le1arg.t
@@ -57,7 +57,7 @@ is ([!eqv] ()), Bool::True, "[!eqv] () eq True";
#?rakudo 3 skip "[...] not implemented"
is ([&&] ()), Bool::True, "[&&] () eq True";
is ([||] ()), Bool::True, "[||] () eq True";
-is ([^^] ()), Bool::True, "[^^] () eq True";
+is ([^^] ()), Bool::False, "[^^] () eq False";
is ([//] ()), Any, "[//] () is Any";
is ([,] ()), (), "[,] () eq ()";
is ([Z] ()), [], "[Z] () eq []";
--
1.7.3.4
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment