1*29612Ssam /* Aldd.c 1.1 86/07/20 */ 2*29612Ssam 3*29612Ssam #include "../tahoealign/align.h" 4*29612Ssam ldd(infop) process_info *infop; 5*29612Ssam /* 6*29612Ssam /* Load a double operand into accumulator. 7*29612Ssam /* 8*29612Ssam /*************************************************/ 9*29612Ssam { 10*29612Ssam register struct oprnd *oprnd_pnt; 11*29612Ssam 12*29612Ssam oprnd_pnt = operand(infop,0); 13*29612Ssam if ( reserved( oprnd_pnt->data ) ) 14*29612Ssam exception(infop, ILL_OPRND); 15*29612Ssam acc_high = oprnd_pnt->data ; 16*29612Ssam acc_low = oprnd_pnt->data2 ; 17*29612Ssam psl |= PSL_DBL; 18*29612Ssam infop->acc_dbl = 1; 19*29612Ssam } 20