From 16865ff7e97c2532fd2001d68cf18909acb0d838 Mon Sep 17 00:00:00 2001 From: David Mitchell Date: Tue, 16 Nov 2010 22:44:34 +0000 Subject: add 'head' field to PerlIOl struct This allows any layer to find the top of the layer stack, or more specifically, the entry in PL_perlio that points to the top. Needed for the next commit, which will implement a reference counting scheme. There's currently a bug in MakeMaker which causes several extensions to miss the dependency on perliol.h having changed, so this commit includes a gratuitous whitespace change to perl.h to hopefully force recompilation. --- perliol.h | 1 + 1 file changed, 1 insertion(+) (limited to 'perliol.h') diff --git a/perliol.h b/perliol.h index d3053a1067..744ffc8870 100644 --- a/perliol.h +++ b/perliol.h @@ -67,6 +67,7 @@ struct _PerlIO { PerlIOl *next; /* Lower layer */ PerlIO_funcs *tab; /* Functions for this layer */ U32 flags; /* Various flags for state */ + PerlIOl *head; /* our ultimate parent pointer */ }; /*--------------------------------------------------------------------------------------*/ -- cgit v1.2.1