1 /* Amova.c 1.1 86/07/20 */ 2 3 #include "../tahoealign/align.h" 4 mova(infop) process_info *infop; 5 /* 6 /* Move operand address 7 /* 8 /****************************************/ 9 { 10 register long Register_12; /* Has to be first reg ! */ 11 register long Register_11; 12 13 Register_12 = operand(infop, 0)->address; 14 Register_11=psl; 15 Set_psl(r11); /* restore the user psl */ 16 asm (" movab (r12),r11"); /* Moves original addr to r11 */ 17 asm (" movpsl r12"); 18 New_cc (Register_12); 19 write_back (infop, Register_11, operand(infop,1)); 20 } 21