1*45699Sbostic /* Aldf.c 1.2 90/12/04 */ 229612Ssam 3*45699Sbostic #include "align.h" 429612Ssam ldf(infop) process_info *infop; 529612Ssam /* 629612Ssam /* Load a float operand into accumulator. 729612Ssam /* 829612Ssam /*************************************************/ 929612Ssam { 1029612Ssam 1129612Ssam register struct oprnd *oprnd_pnt; 1229612Ssam 1329612Ssam oprnd_pnt = operand(infop,0); 1429612Ssam if ( reserved( oprnd_pnt->data ) ) 1529612Ssam exception(infop, ILL_OPRND); 1629612Ssam if ( (oprnd_pnt->data & 0xff800000) == 0 ) acc_high = 0; 1729612Ssam else acc_high = oprnd_pnt->data ; 1829612Ssam psl &= ~PSL_DBL; 1929612Ssam infop->acc_dbl = 0; 2029612Ssam } 21