11.6Sriastrad/*	$NetBSD: flt_rounds_softfloat.S,v 1.6 2014/03/18 18:20:37 riastradh Exp $	*/
21.1Sfredette
31.1Sfredette/*
41.1Sfredette * Written by J.T. Conklin, Apr 6, 1995
51.1Sfredette * Public domain.
61.2Sjmmv
71.2Sjmmv * Broken by Bruce O'Neel Aug 4 2003
81.2Sjmmv	gcc no longer seems to export fpCCR so this fails.
91.2Sjmmv	for now just return 0.
101.1Sfredette */
111.1Sfredette
121.1Sfredette#include <machine/asm.h>
131.1Sfredette
141.1Sfredette	.text
151.5Smatt#if 0
161.1Sfredette	/* NB: this is tied to the gcc-2.95 lb1sf68.asm: */
171.1Sfredette_map:
181.1Sfredette	.byte 1		/* round to nearest */
191.1Sfredette	.byte 0		/* round to zero */
201.1Sfredette	.byte 2		/* round to positive infinity */
211.1Sfredette	.byte 3		/* round to negative infinity */
221.5Smatt#endif
231.1Sfredette
241.1SfredetteENTRY(__flt_rounds)
251.2Sjmmv	/* lea	_C_LABEL(_fpCCR),%a0	| check the rounding mode */
261.3Smatt	/* movew	6(%a0),%d0	| rounding mode in d0 */
271.2Sjmmv	/* lea	_map,%a0 */
281.2Sjmmv	moveb	#0,%d0
291.1Sfredette	rts
301.5SmattEND(__flt_rounds)
31