1 /* Aand3.c 1.1 86/07/20 */ 2 3 4 5 #include "../tahoealign/align.h" 6 and3(infop) process_info *infop; 7 /* 8 /* And , 3 operands. 9 /* 10 /*****************************************/ 11 { 12 register long Register_12; /* Has to be first reg ! */ 13 register long data0, data1, result; 14 15 data0 = operand(infop,0)->data; 16 data1 = operand(infop,1)->data; 17 Register_12=psl; 18 Set_psl(r12); /* restore the user psl */ 19 result = data0 & data1; 20 asm (" movpsl r12"); 21 New_cc (Register_12); 22 write_back (infop,result, operand(infop,2) ); 23 } 24