Return to machdep.c CVS log

Up to [Power 6/32 Unix Tahoe 4.2BSD] / cci / sys / stand

Power 6/32 Unix version 1.2b

/*	machdep.c	4.2	81/03/15	*/
/*	Tahoe version, November 1982		*/

#include "../h/param.h"
#include "../machine/mtpr.h"

/*ARGSUSED*/
/*VARARGS1*/
mtpr(value, regno)
{

	asm("	mtpr	4(fp),8(fp)");
}

/*ARGSUSED*/
mfpr(regno)
{

	asm("	mfpr	4(fp),r0");
#ifdef lint
	return (0);
#endif
}

/*
 * Copy bytes within kernel
 */
/*ARGSUSED*/
bcopy(from, to, count)
	caddr_t from, to;
	unsigned count;
{

	asm("	pushl	r0; pushl r1; pushl r2");
	asm("	movl	4(fp),r0; movl	8(fp),r1; movl	12(fp),r2");
	asm("	movblk");
	asm("	movl	(sp)+,r2; movl (sp)+,r1; movl (sp)+,r0");
}

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.