45 void add_accept( mach, accepting_number )  in add_accept()  argument
46 int mach, accepting_number;  in add_accept()
54 	if ( transchar[finalst[mach]] == SYM_EPSILON )
55 		accptnum[finalst[mach]] = accepting_number;
61 		(void) link_machines( mach, astate );
148 int dupmachine( mach )  in dupmachine()  argument
149 int mach;  in dupmachine()
153 	int last = lastst[mach];
155 	for ( i = firstst[mach]; i <= last; ++i )
177 	init = mach + state_offset;
178 	firstst[init] = firstst[mach] + state_offset;
179 	finalst[init] = finalst[mach] + state_offset;
180 	lastst[init] = lastst[mach] + state_offset;
198 void finish_rule( mach, variable_trail_rule, headcnt, trailcnt )  in finish_rule()  argument
199 int mach, variable_trail_rule, headcnt, trailcnt;  in finish_rule()
203 	add_accept( mach, num_rules );
321 void mark_beginning_as_normal( mach )  in mark_beginning_as_normal()  argument
322 register int mach;  in mark_beginning_as_normal()
324 	switch ( state_type[mach] )
331 			state_type[mach] = STATE_NORMAL;
333 			if ( transchar[mach] == SYM_EPSILON )
335 				if ( trans1[mach] != NO_TRANSITION )
337 						trans1[mach] );
339 				if ( trans2[mach] != NO_TRANSITION )
341 						trans2[mach] );
416 int mkopt( mach )  in mkopt()  argument
417 int mach;  in mkopt()
421 	if ( ! SUPER_FREE_EPSILON(finalst[mach]) )
424 		mach = link_machines( mach, eps );
432 	mach = link_machines( eps, mach );
434 	mkxtion( mach, finalst[mach] );
436 	return mach;
546 int mkrep( mach, lb, ub )  in mkrep()  argument
547 int mach, lb, ub;  in mkrep()
551 	base_mach = copysingl( mach, lb - 1 );
555 		copy = dupmachine( mach );
556 		mach = link_machines( mach,
566 			copy = dupmachine( mach );
570 		mach = link_machines( mach, link_machines( base_mach, tail ) );
573 	return mach;