return scalar(o);
}
-/* This is used in S_doeval in pp_ctl.c */
OP *
Perl_scalar(pTHX_ OP *o)
{
return o;
}
-/* This is used in S_doeval in pp_ctl.c */
OP *
Perl_scalarvoid(pTHX_ OP *o)
{
return o;
}
-/* This is used in S_doeval in pp_ctl.c */
OP *
Perl_list(pTHX_ OP *o)
{
return o;
}
-/* This is used in perly.y */
OP *
Perl_sawparens(pTHX_ OP *o)
{