Lines Matching refs:sptr
1747 char *sptr, *pb, *q;
1767 sptr = t;
1768 adjbuf(&buf, &bufsz, 1+patbeg-sptr, recsize, 0, "sub");
1770 while (sptr < patbeg)
1771 *pb++ = *sptr++;
1772 sptr = getsval(y);
1773 while (*sptr != 0) {
1775 if (*sptr == '\\') {
1776 backsub(&pb, &sptr);
1777 } else if (*sptr == '&') {
1778 sptr++;
1783 *pb++ = *sptr++;
1788 sptr = patbeg + patlen;
1789 if ((patlen == 0 && *patbeg) || (patlen && *(sptr-1))) {
1790 adjbuf(&buf, &bufsz, 1+strlen(sptr)+pb-buf, 0, &pb, "sub");
1791 while ((*pb++ = *sptr++) != 0)
1808 char *rptr, *sptr, *t, *pb, *q;
1837 sptr = rptr;
1838 while (*sptr != 0) {
1840 if (*sptr == '\\') {
1841 backsub(&pb, &sptr);
1842 } else if (*sptr == '&') {
1843 sptr++;
1848 *pb++ = *sptr++;
1861 sptr = t;
1862 adjbuf(&buf, &bufsz, 1+(patbeg-sptr)+pb-buf, recsize, &pb, "gsub");
1863 while (sptr < patbeg)
1864 *pb++ = *sptr++;
1865 sptr = rptr;
1866 while (*sptr != 0) {
1868 if (*sptr == '\\') {
1869 backsub(&pb, &sptr);
1870 } else if (*sptr == '&') {
1871 sptr++;
1876 *pb++ = *sptr++;
1886 sptr = t;
1887 adjbuf(&buf, &bufsz, 1+strlen(sptr)+pb-buf, 0, &pb, "gsub");
1888 while ((*pb++ = *sptr++) != 0)
1906 { /* sptr[0] == '\\' */
1907 char *pb = *pb_ptr, *sptr = *sptr_ptr;
1909 if (sptr[1] == '\\') {
1910 if (sptr[2] == '\\' && sptr[3] == '&') { /* \\\& -> \& */
1913 sptr += 4;
1914 } else if (sptr[2] == '&') { /* \\& -> \ + matched */
1916 sptr += 2;
1918 *pb++ = *sptr++;
1919 *pb++ = *sptr++;
1921 } else if (sptr[1] == '&') { /* literal & */
1922 sptr++;
1923 *pb++ = *sptr++;
1925 *pb++ = *sptr++;
1928 *sptr_ptr = sptr;
