1*45699Sbostic /* Aldfd.c 1.2 90/12/04 */ 229613Ssam 3*45699Sbostic #include "align.h" 429613Ssam ldfd(infop) process_info *infop; 529613Ssam /* 629613Ssam /* Load into accumulator float operand converted to double. 729613Ssam /* 829613Ssam /***************************************************************/ 929613Ssam { 1029613Ssam register struct oprnd *oprnd_pnt; 1129613Ssam 1229613Ssam oprnd_pnt = operand(infop,0); 1329613Ssam if ( reserved( oprnd_pnt->data ) ) 1429613Ssam exception(infop, ILL_OPRND); 1529613Ssam acc_high = oprnd_pnt->data ; 1629613Ssam acc_low = 0; 1729613Ssam psl |= PSL_DBL; 1829613Ssam infop->acc_dbl = 1; 1929613Ssam } 20