From 071c07df151412a677c982fb102a385084cdb1e8 Mon Sep 17 00:00:00 2001
From: azawawi <azawawi@c213334d-75ef-0310-aa23-eaa082d1ae64>
Date: Sat, 27 Sep 2008 07:08:02 +0000
Subject: [PATCH] [t/spec] Fudged dollar_bang.t for rakudo

git-svn-id: http://svn.pugscode.org/pugs@22426 c213334d-75ef-0310-aa23-eaa082d1ae64
---
 S02-magicals/dollar_bang.t | 3 +++
 1 file changed, 3 insertions(+)

diff --git a/S02-magicals/dollar_bang.t b/S02-magicals/dollar_bang.t
index 0ac63cb5b9..07d21a44db 100644
--- a/S02-magicals/dollar_bang.t
+++ b/S02-magicals/dollar_bang.t
@@ -12,6 +12,8 @@ This test tests the C<$!> builtin.
 
 # L<S04/"Exceptions"/"A bare die/fail takes $! as the default argument.">
 
+#?rakudo 3 skip 'unimpl $!'
+
 eval '&nonexisting_subroutine()'; 
 ok $!, 'Calling a nonexisting subroutine sets $!';
 
@@ -27,6 +29,7 @@ try { foo(@a,@a) };
 ok $!, 'Calling a subroutine with a nonmatching signature sets $!';
 ok !$called, 'The subroutine also was not called';
 
+#?rakudo skip 'unimpl $!'
 undefine $!;
 try { 1 / 0 };
 ok $!, 'Dividing one by zero sets $!';