35 #define	QW 1		/* width of bas-q digit in bits */  macro
114 		*pk = y >> (long)(L+QW-w);  in decode()
115 		return (w-QW);  in decode()
118 	    y = ((unsigned long)y << QW) & MASK, v += n)  in decode()
119 		if ((l += QW) > L)  in decode()
139 		return (w-QW);  in encode()
141 	for (k -= c, y = 1, l = w; k >= n; k -= n, y <<= QW)  in encode()
142 		if ((l += QW) > L)  in encode()
185 	for (i = 0, q = 1, rq = r; i < QW; i++, q *= 2, rq *= rq)  in huff()
193 	for (w = QW, j = 1; j < d; w += QW, j *= q)  in huff()
198 	qcs = (((long)(q-1)<<w) + cq) << (L-QW-w);  in huff()
202 	return (w + QW*(rc/(1-z.u) - 1));  in huff()