1733 	register uchar *sptr;  in sub()  local
1753 		sptr = t;  in sub()
1754 		len = patbeg - sptr;  in sub()
1757 			(void) memcpy(buf, sptr, len);  in sub()
1760 		sptr = getsval(y);  in sub()
1761 		while (*sptr != 0) {  in sub()
1763 			if (*sptr == '\\' &&  in sub()
1764 			    (*(sptr+1) == '&' || *(sptr+1) == '\\')) {  in sub()
1765 				sptr++;		/* skip \, */  in sub()
1766 				buf[cnt++] = *sptr++; /* add & or \ */  in sub()
1767 			} else if (*sptr == '&') {  in sub()
1769 				sptr++;  in sub()
1773 				buf[cnt++] = *sptr++;  in sub()
1776 		sptr = patbeg + patlen;  in sub()
1777 		if ((patlen == 0 && *patbeg) || (patlen && *(sptr-1))) {  in sub()
1778 			len = strlen((char *)sptr);  in sub()
1780 			(void) memcpy(&buf[cnt], sptr, len);  in sub()
1798 	register uchar *rptr, *sptr, *t;  in gsub()  local
1827 					sptr = rptr;  in gsub()
1828 					while (*sptr != 0) {  in gsub()
1830 						if (*sptr == '\\' &&  in gsub()
1831 						    (*(sptr+1) == '&' ||  in gsub()
1832 						    *(sptr+1) == '\\')) {  in gsub()
1833 							sptr++;  in gsub()
1834 							buf[cnt++] = *sptr++;  in gsub()
1835 						} else if (*sptr == '&') {  in gsub()
1839 							sptr++;  in gsub()
1844 							buf[cnt++] = *sptr++;  in gsub()
1855 				sptr = t;  in gsub()
1856 				len = patbeg - sptr;  in gsub()
1859 					(void) memcpy(&buf[cnt], sptr, len);  in gsub()
1862 				sptr = rptr;  in gsub()
1863 				while (*sptr != 0) {  in gsub()
1865 					if (*sptr == '\\' &&  in gsub()
1866 					    (*(sptr+1) == '&' ||  in gsub()
1867 					    *(sptr+1) == '\\')) {  in gsub()
1868 						sptr++;  in gsub()
1869 						buf[cnt++] = *sptr++;  in gsub()
1870 					} else if (*sptr == '&') {  in gsub()
1873 						sptr++;  in gsub()
1878 						buf[cnt++] = *sptr++;  in gsub()
1887 		sptr = t;  in gsub()
1888 		len = strlen((char *)sptr);  in gsub()
1890 		(void) memcpy(&buf[cnt], sptr, len);  in gsub()