View Single Post
  #1  
Old 01-12-2012, 07:10 PM
Harcourt
Sarnak
 
Join Date: Jul 2011
Posts: 33
Default Perl 5.14 change

GvCV is no longer an l-value, which will break embperl.cpp.

The fix is easy, but as I have significant local modifications I'll post the details and let someone else create the patch.

Around line 150:


Code:
       if(gv_stashpv("CORE::GLOBAL", FALSE)) {
                GV *exitgp = gv_fetchpv("CORE::GLOBAL::exit", TRUE, SVt_PVCV);
                GvCV_set(exitgp, perl_get_cv("my_exit", TRUE)); //dies on error
                GvIMPORTED_CV_on(exitgp);
                GV *sleepgp = gv_fetchpv("CORE::GLOBAL::sleep", TRUE, SVt_PVCV);
                GvCV_set(sleepgp, perl_get_cv("my_sleep", TRUE));       //dies on error
                GvIMPORTED_CV_on(sleepgp);
        }
Reply With Quote