Beefy Boxes and Bandwidth Generously Provided by pair Networks
We don't bite newbies here... much
 
PerlMonks  

Re^8: How does CATCH_SET optimize efficiency?

by dave_the_m (Parson)
on Dec 18, 2012 at 12:39 UTC ( #1009355=note: print w/ replies, xml ) Need Help??


in reply to Re^7: How does CATCH_SET optimize efficiency?
in thread How does CATCH_SET optimize efficiency?

In something like

sub FETCH { eval { $x++ } $x--; eval { die } print; }
The first eval pushes a new setjmp and runops loop. The inc, dec and die ops are executed within that loop. The die causes a longjmp, which unwinds the C stack, destroying the inner runops loop, and returns control to the exception handler set up by the first call to entertry. That code 'restarts' the op by calling runops(), which executes the print and any remaining ops in FETCH. When FETCH returns, runops() exits, and control is passed back (again) to entertry's exception handler, which this time just immediately returns, passing control to the the middle runops loop, which also immediately returns, and control passes back to the code which handles tied variables.

Dave.


Comment on Re^8: How does CATCH_SET optimize efficiency?
Download Code
Re^9: How does CATCH_SET optimize efficiency?
by PerlOnTheWay (Scribe) on Dec 19, 2012 at 08:18 UTC

    So the net effect is that when there's no eval in FETCH, a JMPENV_PUSH is saved, but when there is eval, a run loop is wasted(3 vs 2), is this right?

      Yes.

      Dave.

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://1009355]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others scrutinizing the Monastery: (9)
As of 2014-12-21 11:04 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    Is guessing a good strategy for surviving in the IT business?





    Results (104 votes), past polls