1988-04-07 11:40:46 +00:00
|
|
|
/*
|
|
|
|
|
(c) copyright 1988 by the Vrije Universiteit, Amsterdam, The Netherlands.
|
|
|
|
|
See the copyright notice in the ACK home directory, in the file "Copyright".
|
|
|
|
|
*/
|
|
|
|
|
|
1994-06-24 14:02:31 +00:00
|
|
|
/* $Id$ */
|
1988-04-07 11:40:46 +00:00
|
|
|
|
1988-04-07 10:57:49 +00:00
|
|
|
/*
|
|
|
|
|
ZERO and return EXTEND FORMAT FLOAT
|
|
|
|
|
*/
|
|
|
|
|
|
|
|
|
|
#include "FP_types.h"
|
|
|
|
|
|
1993-01-05 12:06:58 +00:00
|
|
|
void
|
1988-04-07 10:57:49 +00:00
|
|
|
zrf_ext(e)
|
|
|
|
|
EXTEND *e;
|
|
|
|
|
{
|
1988-08-04 11:16:20 +00:00
|
|
|
e->m1 = 0;
|
|
|
|
|
e->m2 = 0;
|
|
|
|
|
e->exp = 0;
|
|
|
|
|
e->sign = 0;
|
1988-04-07 10:57:49 +00:00
|
|
|
}
|
