so save it. For the moment it's always
a single char. */
dSP;
- PUTBACK;
ENTER;
if ( flags & 1 )
save_scalar(gv);
+ PUSHSTACKi(PERLSI_MAGIC);
Perl_load_module(aTHX_ PERL_LOADMOD_NOIMPORT, module, NULL);
+ POPSTACK;
LEAVE;
SPAGAIN;
stash = gv_stashsv(namesv, 0);