xref: /csrg-svn/sys/tahoe/align/Adec.c (revision 45699)
1 /*	Adec.c	1.2	90/12/04	*/
2 
3 #include "align.h"
4 dec(infop)	process_info *infop;
5 /*
6 /*	Decrement operand.
7 /*
8 /***************************************/
9 {
10 	register	long	Register_12;	/* Has to be first reg ! */
11 	register	long	Register_11;
12 
13 	Register_11 = operand(infop,0)->data;
14 	Register_12=psl;
15 	Set_psl(r12);	/* restore the user psl */
16 	asm ("	decl	r11");			/* Make sure to use the
17 						 * right opcode */
18 	asm ("	movpsl	r12");
19 	New_cc (Register_12);
20 
21 	write_back (infop,Register_11, operand(infop,0) );
22 }
23