DataMuseum.dk

Presents historical artifacts from the history of:

DKUUG/EUUG Conference tapes

This is an automatic "excavation" of a thematic subset of
artifacts from Datamuseum.dk's BitArchive.

See our Wiki for more about DKUUG/EUUG Conference tapes

Excavated with: AutoArchaeologist - Free & Open Source Software.


top - download
Index: ┃ T b

⟦c2fed64df⟧ TextFile

    Length: 571 (0x23b)
    Types: TextFile
    Names: »bcopy.c«

Derivation

└─⟦a0efdde77⟧ Bits:30001252 EUUGD11 Tape, 1987 Spring Conference Helsinki
    └─ ⟦this⟧ »EUUGD11/euug-87hel/sec8/multivol/bcopy.c« 

TextFile

#ifdef vax
bcopy(from, to, len)
	char *from, *to;
	int len;
{
	asm("	movc3	12(ap),*4(ap),*8(ap)");
}
#else 
#ifdef	SYSV
/*
 * Added by moderator, bcopy.c for Sys V.
 *
 */

extern char *memcpy();

char *
bcopy(from, to, count)
	char *from;
	char *to;
	int count;
{
	return (memcpy(to, from, count));
}
#else
bcopy(from, to, len)
	register char	*to, *from;
	register int	len;
{
	if (from > to) {
		while(len--)
			*to++ = *from++;
	} else {	/* not handled in standard version of bcopy() */
		to	+= len;
		from	+= len;
		while(len--)
			*--to = *--from;
	}
}
#endif
#endif