Searched refs:where_sv (Results 1 - 1 of 1) sorted by relevance

/osnet-11/usr/src/cmd/perl/5.8.4/distrib/
H A Dtoke.c7798 SV *where_sv = sv_2mortal(newSVpvn("next char ", 10)); local
7800 Perl_sv_catpvf(aTHX_ where_sv, "^%c", toCTRL(yychar));
7802 Perl_sv_catpvf(aTHX_ where_sv, "%c", yychar);
7804 Perl_sv_catpvf(aTHX_ where_sv, "\\%03o", yychar & 255);
7805 where = SvPVX(where_sv);

Completed in 34 milliseconds