From 5d554ba37b04d46e318f776d6677af9d8bf9b677 Mon Sep 17 00:00:00 2001
From: Jonathan Worthington <jnthn@jnthn.net>
Date: Sat, 7 Apr 2018 12:00:24 +0200
Subject: [PATCH] Fix error for .native-descriptor on closed handle

Addresses issue #1699.
---
 src/core/IO/Handle.pm6 | 1 +
 1 file changed, 1 insertion(+)

diff --git a/src/core/IO/Handle.pm6 b/src/core/IO/Handle.pm6
index 1997dbc4fbf..c20e30ff09e 100644
--- a/src/core/IO/Handle.pm6
+++ b/src/core/IO/Handle.pm6
@@ -798,6 +798,7 @@ my class IO::Handle {
     }
 
     method native-descriptor(IO::Handle:D:) {
+        nqp::defined($!PIO) or die 'File handle not open, so cannot get native descriptor';
         nqp::filenofh($!PIO)
     }
 }