1738 	char *sptr, *pb, *q;  in sub()  local
1758 		sptr = t;  in sub()
1759 		adjbuf(&buf, &bufsz, 1+patbeg-sptr, recsize, 0, "sub");  in sub()
1761 		while (sptr < patbeg)  in sub()
1762 			*pb++ = *sptr++;  in sub()
1763 		sptr = getsval(y);  in sub()
1764 		while (*sptr != 0) {  in sub()
1766 			if (*sptr == '\\') {  in sub()
1767 				backsub(&pb, &sptr);  in sub()
1768 			} else if (*sptr == '&') {  in sub()
1769 				sptr++;  in sub()
1774 				*pb++ = *sptr++;  in sub()
1779 		sptr = patbeg + patlen;  in sub()
1780 		if ((patlen == 0 && *patbeg) || (patlen && *(sptr-1))) {  in sub()
1781 			adjbuf(&buf, &bufsz, 1+strlen(sptr)+pb-buf, 0, &pb, "sub");  in sub()
1782 			while ((*pb++ = *sptr++) != 0)  in sub()
1799 	char *rptr, *sptr, *t, *pb, *c;  in gsub()  local
1826 					sptr = rptr;  in gsub()
1827 					while (*sptr != 0) {  in gsub()
1829 						if (*sptr == '\\') {  in gsub()
1830 							backsub(&pb, &sptr);  in gsub()
1831 						} else if (*sptr == '&') {  in gsub()
1833 							sptr++;  in gsub()
1838 							*pb++ = *sptr++;  in gsub()
1851 				sptr = c;  in gsub()
1852 				adjbuf(&buf, &bufsz, 1+(patbeg-sptr)+pb-buf, recsize, &pb, "gsub");  in gsub()
1853 				while (sptr < patbeg)  in gsub()
1854 					*pb++ = *sptr++;  in gsub()
1855 				sptr = rptr;  in gsub()
1856 				while (*sptr != 0) {  in gsub()
1858 					if (*sptr == '\\') {  in gsub()
1859 						backsub(&pb, &sptr);  in gsub()
1860 					} else if (*sptr == '&') {  in gsub()
1862 						sptr++;  in gsub()
1867 						*pb++ = *sptr++;  in gsub()
1877 		sptr = c;  in gsub()
1878 		adjbuf(&buf, &bufsz, 1+strlen(sptr)+pb-buf, 0, &pb, "gsub");  in gsub()
1879 		while ((*pb++ = *sptr++) != 0)  in gsub()
1897 	char *pb = *pb_ptr, *sptr = *sptr_ptr;  in backsub()  local
1899 	if (sptr[1] == '\\') {  in backsub()
1900 		if (sptr[2] == '\\' && sptr[3] == '&') { /* \\\& -> \& */  in backsub()
1903 			sptr += 4;  in backsub()
1904 		} else if (sptr[2] == '&') {	/* \\& -> \ + matched */  in backsub()
1906 			sptr += 2;  in backsub()
1908 			*pb++ = *sptr++;  in backsub()
1909 			*pb++ = *sptr++;  in backsub()
1911 	} else if (sptr[1] == '&') {	/* literal & */  in backsub()
1912 		sptr++;  in backsub()
1913 		*pb++ = *sptr++;  in backsub()
1915 		*pb++ = *sptr++;  in backsub()
1918 	*sptr_ptr = sptr;  in backsub()