Front page | perl.perl5.porters |
Postings from June 2021
Thank you. ‐‐‐‐‐‐‐ Original Message ‐‐‐‐‐‐‐ On Monday, June 21st, 2021 at 3:30 PM, Paul "LeoNerd" Evans <leonerd@leonerd.org.uk> wrote: > On Mon, 21 Jun 2021 20:07:43 +0000 > > "mah.kitteh via perl5-porters" perl5-porters@perl.org wrote: > > > ‐‐‐‐‐‐‐ Original Message ‐‐‐‐‐‐‐ > > > > On Monday, June 21st, 2021 at 2:56 PM, Paul "LeoNerd" Evans > > > > leonerd@leonerd.org.uk wrote: > > > > > On Mon, 21 Jun 2021 17:07:46 +0100 > > > > > > "Paul \"LeoNerd\" Evans" leonerd@leonerd.org.uk wrote: > > > > > > > It turns out I can fix this by the horrible hack of: > > > > > > > > /* REALLY??! Do I really have to do this?? */ > > > > while(PL_scopestack_ix > was_scopestack_ix) > > > > LEAVE; > > > > > > > > For my own edification, why is this not an "if" - or is this a busy > > > > wait or something? Seems to imply a race condition (and that doesn't > > > > make any sense to my current understanding of the sequential nature > > > > of the runtime) - but I also admittedly don't know what I am looking > > > > at. > > Each LEAVE call will reduce the scopestack height by 1. So if it's out > > of sync by more than a difference of 1, we'll have to call it twice, or > > three times, etc until it's level again. > > -------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------- > > Paul "LeoNerd" Evans > > leonerd@leonerd.org.uk | https://metacpan.org/author/PEVANS > > http://www.leonerd.org.uk/ | https://www.tindie.com/stores/leonerd/Thread Previous