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