Lines Matching refs:perl_private

73 #define PERLP(sp)   ((perl_data_t *)sp->wp->perl_private)
76     CHAR2INT5(sp,((perl_data_t *)sp->wp->perl_private)->cw,n,nlen,w,wlen)
193 	wp->perl_private = pp;
230 	if (scrp->perl_private) {
231 		sv_setiv((SV*) scrp->perl_private, 0);
261 	if (!screen->perl_private) {
262 		screen->perl_private = newSV(0);
263 		sv_setiv(screen->perl_private, (IV) screen);
265 	else SvREFCNT_inc(screen->perl_private);
266 	SvRV(rv) = screen->perl_private;
282 	if (scrp->wp->perl_private == NULL) {  in perl_setenv()
315 	if (scrp->wp->perl_private == NULL && perl_init(scrp))
317 	pp = scrp->wp->perl_private;
413 	if (scrp->wp->perl_private == NULL && perl_init(scrp))
415 	pp = scrp->wp->perl_private;