[unix-history] / usr / src / sys / tahoe / math / Kfp_mvtoacc.s

/*-
 * Copyright (c) 1985 The Regents of the University of California.
 * All rights reserved.
 *
 * This code is derived from software contributed to Berkeley by
 * Computer Consoles Inc.
 *
 * %sccs.include.redist.c%
 *
 *	@(#)Kfp_mvtoacc.s	7.1 (Berkeley) %G%
 */

#include "../math/fp.h"
#include "../tahoe/SYS.h"

/*
 * mvtofacc(value, acc_addr)
 *
 * move value to floating point accumulator
 */
ENTRY(mvtofacc, 0)
	movl	4(fp),*12(fp)
	ret

/*
 * mvtodacc(value_hi, value_lo, acc_addr)
 *
 * move value to double precision accumulator
 */
ENTRY(mvtodacc, 0)
	movl	12(fp),r0	# address of accumulator
	movl	4(fp),(r0)	# most significant longword
	movl	8(fp),4(r0)	# least significant longword
	ret
Commit	Line	Data
7c27088c KB	1	/*-
	2	* Copyright (c) 1985 The Regents of the University of California.
	3	* All rights reserved.
	4	*
	5	* This code is derived from software contributed to Berkeley by
	6	* Computer Consoles Inc.
	7	*
	8	* %sccs.include.redist.c%
	9	*
	10	* @(#)Kfp_mvtoacc.s 7.1 (Berkeley) %G%
	11	*/
44dea9c1	12
a6730a00	13	#include "../math/fp.h"
9d1834ba	14	#include "../tahoe/SYS.h"
44dea9c1	15
2b252132 SL	16	/*
	17	* mvtofacc(value, acc_addr)
	18	*
	19	* move value to floating point accumulator
	20	*/
	21	ENTRY(mvtofacc, 0)
44dea9c1 SL	22	movl 4(fp),*12(fp)
	23	ret
	24
2b252132 SL	25	/*
	26	* mvtodacc(value_hi, value_lo, acc_addr)
	27	*
	28	* move value to double precision accumulator
	29	*/
	30	ENTRY(mvtodacc, 0)
44dea9c1 SL	31	movl 12(fp),r0 # address of accumulator
	32	movl 4(fp),(r0) # most significant longword
	33	movl 8(fp),4(r0) # least significant longword
	34	ret