develooper Front page | perl.perl5.porters | Postings from August 2012

[perl #33096] win32_msgwait runs forever with non-infinite timeout

Thread Next
From:
Father Chrysostomos via RT
Date:
August 20, 2012 23:39
Subject:
[perl #33096] win32_msgwait runs forever with non-infinite timeout
Message ID:
rt-3.6.HEAD-11172-1345531139-1209.33096-14-0@perl.org
On Mon Aug 20 23:21:46 2012, bulk88 wrote:
> Is there a way of storing truly
> process
> global (not interp global) data that doesn't have a const initializer
> or
> just put it in struct interp_intern and refetch it with
> QueryPerformanceFrequency as needed, the more efficient way is simply
> too difficult with perl's architecture?

PL_check is process-global.  I don’t fully understand how the
declarations work, but it is in perlvars.h:

#ifdef PERL_GLOBAL_STRUCT 
PERLVAR(G, ppaddr,	Perl_ppaddr_t *) /* or opcode.h */
PERLVAR(G, check,	Perl_check_t *) /* or opcode.h */
PERLVARA(G, fold_locale, 256, unsigned char) /* or perl.h */
#endif

and opcode.h:

#ifdef PERL_GLOBAL_STRUCT_INIT
#  define PERL_CHECK_INITED
static const Perl_check_t Gcheck[]
#else
#  ifndef PERL_GLOBAL_STRUCT
#    define PERL_CHECK_INITED
EXT Perl_check_t PL_check[] /* or perlvars.h */
#  endif
#endif


-- 

Father Chrysostomos


Thread Next


nntp.perl.org: Perl Programming lists via nntp and http.
Comments to Ask Bjørn Hansen at ask@perl.org | Group listing | About