/* $Header: /cvsup/minix/src/lib/libp/pac.c,v 1.1.1.1 2005/04/21 14:56:23 beng Exp $ *//* * (c) copyright 1983 by the Vrije Universiteit, Amsterdam, The Netherlands. * *          This product is part of the Amsterdam Compiler Kit. * * Permission to use, sell, duplicate or disclose this software must be * obtained in writing. Requests for such permissions may be sent to * *      Dr. Andrew S. Tanenbaum *      Wiskundig Seminarium *      Vrije Universiteit *      Postbox 7161 *      1007 MC Amsterdam *      The Netherlands * *//* Author: J.W. Stevenson */#include	<pc_err.h>extern		_trp();#define	assert(x)	/* nothing */#ifndef EM_WSIZE#define EM_WSIZE _EM_WSIZE#endifstruct descr {	int	low;	int	diff;	int	size;};_pac(ad,zd,zp,i,ap) int i; struct descr *ad,*zd; char *zp,*ap; {	if (zd->diff > ad->diff ||			(i -= ad->low) < 0 ||			(i+zd->diff) > ad->diff)		_trp(EPACK);	ap += (i * ad->size);	i = (zd->diff + 1) * zd->size;	if (zd->size == 1) {		int *aptmp = (int *)ap;		assert(ad->size == EM_WSIZE);		while (--i >= 0)			*zp++ = *aptmp++;#if EM_WSIZE > 2	} else if (zd->size == 2) {		int *aptmp = (int *)ap;		short *zptmp = (short *) zp;		assert(ad->size == EM_WSIZE);		while (--i >= 0)			*zptmp++ = *aptmp++;#endif	} else {		assert(ad->size == zd->size);		while (--i >= 0)			*zp++ = *ap++;	}}