#include "defs.h"


/* unplace a chip */
/* This routine should not be interrupted */

delplace(cptr)
	CHP cptr;
{
	REG SKT sptr;
	REG CHP cp;

	scanboard(sptr)
	{
		if(sptr->block==UBLOCK)
			sptr->block=0;
		cp = sptr->sktchp;
		if (cptr == cp) break;
	}
	unplac(sptr,cptr);
}