From b2a928e431af80dc683c30180c8ab65c73a085fc Mon Sep 17 00:00:00 2001
From: Jonathan Worthington <jnthn@jnthn.net>
Date: Thu, 16 Apr 2015 11:36:19 +0200
Subject: [PATCH] Add defined to 'use fatal' defusers.

---
 src/Perl6/Actions.nqp | 1 +
 1 file changed, 1 insertion(+)

diff --git a/src/Perl6/Actions.nqp b/src/Perl6/Actions.nqp
index 9e9650a1d9c..43c9bda5791 100644
--- a/src/Perl6/Actions.nqp
+++ b/src/Perl6/Actions.nqp
@@ -985,6 +985,7 @@ class Perl6::Actions is HLL::Actions does STDActions {
     my %boolify_first_child_calls := nqp::hash(
         '&prefix:<?>', 1, '&prefix:<so>', 1,
         '&prefix:<!>', 1, '&prefix:<not>', 1,
+        '&defined', 1
     );
     sub fatalize($ast, $bool-context = 0) {
         if nqp::istype($ast, QAST::Op) {