76 int cre8ecs( fwd, bck, num )  in cre8ecs()  argument
77 int fwd[], bck[], num;  in cre8ecs()
92 			for ( j = fwd[i]; j != NIL; j = fwd[j] )
115 void mkeccl( ccls, lenccl, fwd, bck, llsiz, NUL_mapping )  in mkeccl()  argument
117 int lenccl, fwd[], bck[], llsiz, NUL_mapping;
141 		for ( i = fwd[cclm]; i != NIL && i <= llsiz; i = fwd[i] )
164 					fwd[newec] = i;
182 				fwd[oldec] = i;
192 			fwd[oldec] = NIL;
195 		fwd[newec] = NIL;
210 void mkechar( tch, fwd, bck )  in mkechar()  argument
211 int tch, fwd[], bck[];  in mkechar()
217 	if ( fwd[tch] != NIL )
218 		bck[fwd[tch]] = bck[tch];
221 		fwd[bck[tch]] = fwd[tch];
223 	fwd[tch] = NIL;