Changeset e3068de for perlconfig.c


Ignore:
Timestamp:
Oct 29, 2009, 9:51:29 PM (12 years ago)
Author:
Nelson Elhage <nelhage@mit.edu>
Branches:
master, release-1.5, release-1.6, release-1.7, release-1.8, release-1.9
Children:
96c3265
Parents:
48d130b
git-author:
Nelson Elhage <nelhage@mit.edu> (10/29/09 21:49:44)
git-committer:
Nelson Elhage <nelhage@mit.edu> (10/29/09 21:51:29)
Message:
perlconfig: Remove G_KEEPERR

I believe this is only around because I misread documentation once and
cargo-culted it everwhere. It's not what we want at all. This is the
source of the "(in cleanup)" that gets prepended to a lot of barnowl
errors.

Signed-off-by: Nelson Elhage <nelhage@mit.edu>
File:
1 edited

Legend:

Unmodified
Added
Removed
  • perlconfig.c

    ra01ed7c re3068de  
    264264  PUTBACK ;
    265265 
    266   count = call_pv(subname, G_SCALAR|G_EVAL|G_KEEPERR);
     266  count = call_pv(subname, G_SCALAR|G_EVAL);
    267267 
    268268  SPAGAIN ;
     
    317317  PUTBACK;
    318318
    319   count = call_method(method, G_SCALAR|G_KEEPERR|G_EVAL);
     319  count = call_method(method, G_SCALAR|G_EVAL);
    320320
    321321  SPAGAIN;
     
    566566  PUTBACK;
    567567 
    568   call_sv(cb, G_DISCARD|G_KEEPERR|G_EVAL);
     568  call_sv(cb, G_DISCARD|G_EVAL);
    569569
    570570  if(SvTRUE(ERRSV)) {
     
    607607  PUTBACK;
    608608
    609   call_sv(cb, G_DISCARD|G_KEEPERR|G_EVAL);
     609  call_sv(cb, G_DISCARD|G_EVAL);
    610610
    611611  if(SvTRUE(ERRSV)) {
     
    633633  PUTBACK;
    634634
    635   call_method("do_callback", G_DISCARD|G_KEEPERR|G_EVAL);
     635  call_method("do_callback", G_DISCARD|G_EVAL);
    636636
    637637  SPAGAIN;
Note: See TracChangeset for help on using the changeset viewer.