1 /* Ainc.c 1.1 86/07/20 */ 2 3 #include "../tahoealign/align.h" 4 inc(infop) process_info *infop; 5 /* 6 /* Increment 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 (" incl 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