1*45761Sbostic/*- 2*45761Sbostic * Copyright (c) 1985 The Regents of the University of California. 3*45761Sbostic * All rights reserved. 4*45761Sbostic * 5*45761Sbostic * This code is derived from software contributed to Berkeley by 6*45761Sbostic * Computer Consoles Inc. 7*45761Sbostic * 8*45761Sbostic * %sccs.include.redist.c% 9*45761Sbostic * 10*45761Sbostic * @(#)Kfp_mvtoacc.s 7.1 (Berkeley) 12/06/90 11*45761Sbostic */ 1224138Ssam 1345701Sbostic#include "../math/fp.h" 1425693Ssam#include "../tahoe/SYS.h" 1524138Ssam 1625664Ssam/* 1725664Ssam * mvtofacc(value, acc_addr) 1825664Ssam * 1925664Ssam * move value to floating point accumulator 2025664Ssam */ 2125664SsamENTRY(mvtofacc, 0) 2224138Ssam movl 4(fp),*12(fp) 2324138Ssam ret 2424138Ssam 2525664Ssam/* 2625664Ssam * mvtodacc(value_hi, value_lo, acc_addr) 2725664Ssam * 2825664Ssam * move value to double precision accumulator 2925664Ssam */ 3025664SsamENTRY(mvtodacc, 0) 3124138Ssam movl 12(fp),r0 # address of accumulator 3224138Ssam movl 4(fp),(r0) # most significant longword 3324138Ssam movl 8(fp),4(r0) # least significant longword 3424138Ssam ret 35