Lines Matching refs:k
79 register *k, lw, *j; local
93 for(k=oline; k<olinep; k++){
96 lw += width(*k);
97 if((*k & (MOT | VMOT)) == (MOT | VMOT)){
98 temp = *k & ~MOTV;
99 if(*k & NMOT)temp = -temp;
102 if(!(*k & MOT) && xflg)for(j=psl; j<=pslp; j++){
127 for(k=oline; k<olinep; k++){
128 if(!(*k & MOT) || (*k & VMOT))break;
129 *k &= ~MOT;
130 if(*k & NMOT){
131 *k &= ~NMOT;
132 *k = -*k;
134 inith += *k;
138 slp = k;
147 for(k=slp; k<olinep; k++)ptout0(*k);
151 for(k = olinep-1; k>=slp; --k)ptout0(*k);
161 register j, k, w; local
178 if((k = (i & CMASK)) < 040){
181 w = getcw(k-32);
193 k = j;
195 w = -k;
203 if((k=(code>>6)&01)^mcase)oput((mcase=k)+0105);
236 register i, j, k; in ptps() local
243 for(j=0; (i&077) > (k = pstab[j]);j++)if(!k){k=pstab[--j];break;} in ptps()
247 if(j & 0200)k = 55; in ptps()
248 else k = -55; in ptps()
249 esc += k; in ptps()
254 register i, k; in ptlead() local
256 if(k = lead < 0)lead = -lead; in ptlead()
257 if(k^verm)oput(0112 + ((verm=k)<<1)); in ptlead()
258 if(((k=lead)%3) == 2)k++; in ptlead()
259 k /= 3; in ptlead()
260 while(k > 0){ in ptlead()
261 if((i=31) > k)i = k; in ptlead()
273 k -= i; in ptlead()
278 register i, j, k; in ptesc() local
280 if(k = esc < 0)esc = -esc; in ptesc()
281 if(k^escm)oput(0107 + (escm=k)); in ptesc()
282 k = esc; in ptesc()
283 while(k > 0){ in ptesc()
284 if((i=127) > k)i = k; in ptesc()
293 k -= i; in ptesc()