[BACK]Return to Asetpsl.c CVS log [TXT] [DIR] Up to [Power 6/32 Unix Tahoe 4.2BSD] / cci / sys / tahoe
File:  [Power 6/32 Unix Tahoe 4.2BSD] / cci / sys / tahoe / Asetpsl.c
Revision 1.1.1.1 (vendor branch): download - view: text, annotated - select for diffs
Sun Jul 28 12:30:02 2019 UTC (7 years ago) by root
Branches: bsd, MAIN
CVS tags: v121, HEAD
Power 6/32 Unix version 1.21


SET_PSL(psl)
	long	psl ;
{
	asm("movl	4(fp),r0"); 
	asm("andl2	$15,r0"); 
	asm("mnegl	r0,r1"); 
	asm("andl2	$15,r1"); 
	asm("bicpsw	r1"); 
	asm("bispsw	r0");
}
unix.superglobalmegacorp.com

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