1*45760Sbostic /*- 2*45760Sbostic * Copyright (c) 1986 The Regents of the University of California. 3*45760Sbostic * All rights reserved. 4*45760Sbostic * 5*45760Sbostic * This code is derived from software contributed to Berkeley by 6*45760Sbostic * Computer Consoles Inc. 7*45760Sbostic * 8*45760Sbostic * %sccs.include.redist.c% 9*45760Sbostic * 10*45760Sbostic * @(#)Aldd.c 7.1 (Berkeley) 12/06/90 11*45760Sbostic */ 1229612Ssam 1345699Sbostic #include "align.h" ldd(infop)1429612Ssamldd(infop) process_info *infop; 1529612Ssam /* 1629612Ssam /* Load a double operand into accumulator. 1729612Ssam /* 1829612Ssam /*************************************************/ 1929612Ssam { 2029612Ssam register struct oprnd *oprnd_pnt; 2129612Ssam 2229612Ssam oprnd_pnt = operand(infop,0); 2329612Ssam if ( reserved( oprnd_pnt->data ) ) 2429612Ssam exception(infop, ILL_OPRND); 2529612Ssam acc_high = oprnd_pnt->data ; 2629612Ssam acc_low = oprnd_pnt->data2 ; 2729612Ssam psl |= PSL_DBL; 2829612Ssam infop->acc_dbl = 1; 2929612Ssam } 30