#include	"rework.h" static dbg; voidNet::dumbdiff(Net *old){	register Wire *n, *o;	int statusquo;	int first; 	dbg = DEBUG(name) || DEBUG(old->name);	/* so dumb we don't have to order! */	if(dbg){		fprintf(stdout, "dumbdiff:\nold=%s\n", old->name);		old->pr(stdout);		fprintf(stdout, "new=%s\n", name);		pr(stdout);	}	if(dbg)		fprintf(stdout, "delete unnecessary old wires\n");	OVER(o, old)		if(havewire(o) == 0)			old->delwire(o);	/*		flip levels??	*/	statusquo = 0;	OVER(n, this){		if(o = old->havewire(n))			if(o->lev() == n->lev())				statusquo++;			else				statusquo--;	}	if(statusquo < 0){		OVER(n, this)			n->flip();	}	if(dbg)		fprintf(stdout, "deleting old wires at wrong level\n");	OVER(o, old){		n = havewire(o);		if(n->lev() != o->lev())			old->delwire(o);	}	if(dbg)		fprintf(stdout, "adding missing new wires\n");	OVER(n, this)		if(old->havewire(n) == 0)			old->addwire(n);	old->order();	/*		check for new level 1's underneath old level 2	*/	if(dbg)		fprintf(stdout, "add/remove old level2s over new level1s\n");	first = 1;	OVER(o, old){		if(first){			first = 0;			continue;		}		if(o->newish && !o[-1].newish && (o->lev() == 1) && (o[-1].lev() == 2)){			o[-1].unpr();			o[-1].pr(RE);			if(dbg) o[-1].pr(stdout);			continue;		} 		if(!o->newish && o[-1].newish && (o->lev() == 2) && (o[-1].lev() == 1)){			o->unpr();			o->pr(RE);			if(dbg) o->pr(stdout);			continue;		}	}	if(dbg){		fprintf(stdout, "output:\n");		old->pr(stdout, name);	}	old->pr(NEW, name);	done = 1;	old->done = 1;} voidNet::addwire(Wire *w){	Wire *ww; 	if(nwires == nalloc){		nalloc += 10;		ww = new Wire[nalloc];		memcpy((char *)ww, (char *)wires, sizeof(Wire)*nwires);		delete wires;		wires = ww;	}	w->newish = 1;	wires[nwires++] = *w;	if(dbg)		w->pr(stdout);	w->pr(RE);} voidNet::delwire(Wire *w){	Wire *b, *e; 	b = e = w;	if(w->lev() == 1){	/* check for level twos on either side */		if((w < &wires[nwires-1])&&(w->x2 == w[1].x1)&&(w->y2 == w[1].y1))			e++;		if((w > wires)&&(w->x1 == w[-1].x2)&&(w->y1 == w[-1].y2))			b--;	}	if(dbg){		fprintf(stdout, "vvvvv\n");		for(w = b; w <= e; w++)			w->pr(stdout);		fprintf(stdout, "^^^^^\n");	}	/* unwraps have to be flipped so as to get the wirewrap machine roght */	for(w = b; w <= e; w++)		w->unpr();	if(step > b)		step = b;	if(e != &wires[nwires])		memcpy((char *)b, (char *)(e+1), sizeof(Wire)*(&wires[nwires-1]-e));	nwires -= 1+(e-b);} Wire *Net::havewire(register Wire *ww){	register i;	register Wire *w; 	for(w = wires, i = 0; i < nwires; i++, w++)		if(	((w->x1 == ww->x1)&&(w->y1 == ww->y1)&&(w->x2 == ww->x2)&&(w->y2 == ww->y2))		||	((w->x1 == ww->x2)&&(w->y1 == ww->y2)&&(w->x2 == ww->x1)&&(w->y2 == ww->y1))		) return(w);	return((Wire *)0);}