This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
a2p match() faulty
[perl5.git] / gv.h
diff --git a/gv.h b/gv.h
index d09a929..caef3da 100644 (file)
--- a/gv.h
+++ b/gv.h
@@ -209,6 +209,7 @@ Return the SV from the GV.
 
 #define gv_AVadd(gv) gv_add_by_type((gv), SVt_PVAV)
 #define gv_HVadd(gv) gv_add_by_type((gv), SVt_PVHV)
+#define gv_IOadd(gv) gv_add_by_type((gv), SVt_PVIO)
 #define gv_SVadd(gv) gv_add_by_type((gv), SVt_NULL)
 
 /*