source: trunk/minix/lib/float/adf4.c@ 15

Last change on this file since 15 was 9, checked in by Mattia Monga, 14 years ago

Minix 3.1.2a

File size: 588 bytes
Line 
1/*
2 (c) copyright 1988 by the Vrije Universiteit, Amsterdam, The Netherlands.
3 See the copyright notice in the ACK home directory, in the file "Copyright".
4*/
5
6/* $Header: /cvsup/minix/src/lib/float/adf4.c,v 1.1.1.1 2005/04/21 14:56:10 beng Exp $ */
7
8/*
9 ADD TWO FLOATS - SINGLE (ADF 4)
10*/
11
12#include "FP_types.h"
13
14void
15adf4(s2,s1)
16SINGLE s1,s2;
17{
18 EXTEND e1,e2;
19 int swap = 0;
20
21 if (s1 == (SINGLE) 0) {
22 s1 = s2;
23 return;
24 }
25 if (s2 == (SINGLE) 0) {
26 return;
27 }
28 extend(&s1,&e1,sizeof(SINGLE));
29 extend(&s2,&e2,sizeof(SINGLE));
30 add_ext(&e1,&e2);
31 compact(&e1,&s1,sizeof(SINGLE));
32}
Note: See TracBrowser for help on using the repository browser.