usr.bin/perl/toke.c

71 #define PL_oldbufptr		(PL_parser->oldbufptr)
272         PL_last_uni = PL_oldbufptr; \
282         if (optional) PL_last_uni = PL_oldbufptr; \
669     const bool is_first = (PL_oldbufptr == PL_linestart);
2123     PL_last_lop = PL_oldbufptr;
2608     SAVEPPTR(PL_oldbufptr);
2639     PL_bufend = PL_bufptr = PL_oldbufptr = PL_oldoldbufptr = PL_linestart
2705         PL_bufend = PL_bufptr = PL_oldbufptr = PL_oldoldbufptr = PL_linestart = SvPVX(PL_linestr);
5051     PL_oldoldbufptr = PL_oldbufptr;
5052     PL_oldbufptr = PL_bufptr;
5118             PL_oldbufptr = s;
5126             PL_oldbufptr = s;
5134             PL_oldbufptr = s;
5210                 PL_bufptr = PL_oldbufptr;
5227             PL_bufptr = PL_oldbufptr;
5781             PL_last_uni = PL_oldbufptr;
6537             PL_bufptr = PL_oldbufptr;
6657         PL_oldbufptr = PL_oldoldbufptr;		/* allow print(STDOUT 123) */
6962     PL_last_uni = PL_oldbufptr;
7212                 PL_oldoldbufptr = PL_oldbufptr = s = PL_linestart = SvPVX(PL_linestr);
7222     PL_oldoldbufptr = PL_oldbufptr = PL_bufptr = PL_linestart = s;
7407                         PL_bufptr = PL_oldoldbufptr = PL_oldbufptr = s = PL_linestart = SvPVX(PL_linestr);
7481     PL_last_lop = PL_oldbufptr;
7731         PL_last_lop = PL_oldbufptr;
9129             PL_oldoldbufptr = PL_oldbufptr = s = PL_linestart = SvPVX(PL_linestr);
9780     PL_oldoldbufptr = PL_oldbufptr;
9781     PL_oldbufptr = s;
11138         oldbufptr_save = PL_oldbufptr;
11159                 PL_oldbufptr = oldbufptr_save;
11218                         PL_oldbufptr = oldbufptr_save;
11236                     PL_oldbufptr = oldbufptr_save;
12880                  && PL_oldoldbufptr != PL_oldbufptr
12881                  && PL_oldbufptr != PL_bufptr)
12888         else if (  PL_oldbufptr
12889                 && PL_bufptr > PL_oldbufptr
12890                 && PL_bufptr - PL_oldbufptr < 200
12891                 && PL_oldbufptr != PL_bufptr)
12893             while (isSPACE(*PL_oldbufptr))
12894                 PL_oldbufptr++;
12895             context = PL_oldbufptr;
12896             contlen = PL_bufptr - PL_oldbufptr;
13743             PL_oldoldbufptr = PL_oldbufptr;
13744             PL_oldbufptr = s;