Lines Matching defs:This

46  * XXX This advice seems to be widely ignored :-(   --AD  August 1996.
247 /* This routine was donated by Corey Satten. */
479 /* This should be better than FBM if c1 == c2, and almost
697 /* Ignore the trailing "\n". This code is not microoptimized */
957 * Try and find the file and line for PL_op. This will usually be
1230 This is the XSUB-writer's interface to Perl's C<die> function.
1318 This is the XSUB-writer's interface to Perl's C<warn> function. Call this
1808 register I32 This, that;
1815 This = (*mode == 'w');
1816 that = !This;
1828 PerlLIO_close(p[This]);
1843 #define THAT This
1885 if (p[that] < p[This]) {
1886 PerlLIO_dup2(p[This], p[that]);
1887 PerlLIO_close(p[This]);
1888 p[This] = p[that];
1894 sv = *av_fetch(PL_fdpid,p[This],TRUE);
1916 PerlLIO_close(p[This]);
1928 return PerlIO_fdopen(p[This], mode);
1941 register I32 This, that;
1954 This = (*mode == 'w');
1955 that = !This;
1966 PerlLIO_close(p[This]);
1984 #define THAT This
2038 if (p[that] < p[This]) {
2039 PerlLIO_dup2(p[This], p[that]);
2040 PerlLIO_close(p[This]);
2041 p[This] = p[that];
2047 sv = *av_fetch(PL_fdpid,p[This],TRUE);
2068 PerlLIO_close(p[This]);
2080 return PerlIO_fdopen(p[This], mode);
3466 * system to give us a reasonable struct to copy. This fix means that
3471 * This does not address tzname aspects of NETaa14816.
3553 * days left over. This is also true for March 1st, however. So, we have
3564 * representing the date we've re-built. This is done from January 1
3578 * This algorithm also fails to handle years before A.D. 1 gracefully, but
3740 ** an error). This could be because format is an empty string
3796 * This is a faster version of getcwd. It's also more dangerous
4306 * This is really just a quick hack which grabs various garbage
4344 /* This test is an escape hatch, this symbol isn't set by Configure. */