Subversion Repositories HelenOS-historic

Rev

Rev 697 | Rev 734 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 697 Rev 698
Line 47... Line 47...
47
        };
47
        };
48
        fb.parts.sign=0;
48
        fb.parts.sign=0;
49
        return subFloat32(fa,fb).f;
49
        return subFloat32(fa,fb).f;
50
    }
50
    }
51
    return addFloat32(fa,fb).f;
51
    return addFloat32(fa,fb).f;
52
};
52
}
53
 
53
 
54
float __subsf3(float a, float b)
54
float __subsf3(float a, float b)
55
{
55
{
56
    float32 fa, fb;
56
    float32 fa, fb;
57
    fa.f=a;
57
    fa.f=a;
Line 59... Line 59...
59
    if (fa.parts.sign!=fb.parts.sign) {
59
    if (fa.parts.sign!=fb.parts.sign) {
60
        fb.parts.sign=!fb.parts.sign;
60
        fb.parts.sign=!fb.parts.sign;
61
        return addFloat32(fa,fb).f;
61
        return addFloat32(fa,fb).f;
62
    }
62
    }
63
    return subFloat32(fa,fb).f;
63
    return subFloat32(fa,fb).f;
64
};
64
}
65
 
65
 
66
float __mulsf3(float a, float b)
66
float __mulsf3(float a, float b)
67
{
67
{
68
    float32 fa, fb;
68
    float32 fa, fb;
69
    fa.f=a;
69
    fa.f=a;
Line 75... Line 75...
75
{
75
{
76
    float32 fa, fb;
76
    float32 fa, fb;
77
    fa.f=a;
77
    fa.f=a;
78
    fb.f=b;
78
    fb.f=b;
79
//  return  divFloat32(fa, fb).f;
79
//  return  divFloat32(fa, fb).f;
80
};
80
}
81
 
81
 
82
float __negsf2(float a)
82
float __negsf2(float a)
83
{
83
{
84
    float32 fa;
84
    float32 fa;
85
    fa.f=a;
85
    fa.f=a;
86
    fa.parts.sign=!fa.parts.sign;
86
    fa.parts.sign=!fa.parts.sign;
87
    return fa.f;
87
    return fa.f;
88
};
88
}
89
 
89
 
90
double __negdf2(double a)
90
double __negdf2(double a)
91
{
91
{
92
    float64 fa;
92
    float64 fa;
93
    fa.d=a;
93
    fa.d=a;
94
    fa.parts.sign=!fa.parts.sign;
94
    fa.parts.sign=!fa.parts.sign;
95
    return fa.d;
95
    return fa.d;
96
};
96
}
97
 
97
 
98
/* Conversion functions */
98
/* Conversion functions */
99
 
99
 
100
double __extendsfdf2(float a)
100
double __extendsfdf2(float a)
101
{
101
{
102
    float32 fa;
102
    float32 fa;
103
    fa.f = a;
103
    fa.f = a;
104
    return convertFloat32ToFloat64(fa).d;
104
    return convertFloat32ToFloat64(fa).d;
105
};
105
}
106
 
106
 
107
float __truncdfsf2(double a)
107
float __truncdfsf2(double a)
108
{
108
{
109
    float64 da;
109
    float64 da;
110
    da.d = a;
110
    da.d = a;
111
    return convertFloat64ToFloat32(da).f;
111
    return convertFloat64ToFloat32(da).f;
112
}
112
}
-
 
113
 
113
/* Comparison functions */
114
/* Comparison functions */
114
 
115
 
115
/* a<b .. -1
116
/* a<b .. -1
116
 * a=b ..  0
117
 * a=b ..  0
117
 * a>b ..  1
118
 * a>b ..  1
Line 141... Line 142...
141
{
142
{
142
    float32 fa,fb;
143
    float32 fa,fb;
143
    fa.f=a;
144
    fa.f=a;
144
    fb.f=b;
145
    fb.f=b;
145
    return ((isFloat32NaN(fa))||(isFloat32NaN(fb)));
146
    return ((isFloat32NaN(fa))||(isFloat32NaN(fb)));
146
};
147
}
147
 
148
 
148
/**
149
/**
149
 * @return zero, if neither argument is a NaN and are equal
150
 * @return zero, if neither argument is a NaN and are equal
150
 * */
151
 * */
151
int __eqsf2(float a, float b)
152
int __eqsf2(float a, float b)
Line 156... Line 157...
156
    if ((isFloat32NaN(fa))||(isFloat32NaN(fb))) {
157
    if ((isFloat32NaN(fa))||(isFloat32NaN(fb))) {
157
        /* TODO: sigNaNs*/
158
        /* TODO: sigNaNs*/
158
        return 1;
159
        return 1;
159
        };
160
        };
160
    return isFloat32eq(fa,fb)-1;
161
    return isFloat32eq(fa,fb)-1;
161
};
162
}
162
 
163
 
163
/* strange behavior, but it was in gcc documentation */
164
/* strange behavior, but it was in gcc documentation */
164
int __nesf2(float a, float b)
165
int __nesf2(float a, float b)
165
{
166
{
166
    return __eqsf2(a,b);
167
    return __eqsf2(a,b);
167
};
168
}
168
 
169
 
169
/* return value >= 0 if a>=b and neither is NaN */
170
/* return value >= 0 if a>=b and neither is NaN */
170
int __gesf2(float a, float b)
171
int __gesf2(float a, float b)
171
{
172
{
172
    float32 fa,fb;
173
    float32 fa,fb;
Line 242... Line 243...
242
    return 0;
243
    return 0;
243
}
244
}
244
 
245
 
245
/* Other functions */
246
/* Other functions */
246
 
247
 
-
 
248
float __powisf2(float a, int b)
-
 
249
{
-
 
250
//TODO: 
-
 
251
}
-
 
252
 
-
 
253
float __mulsc3(float a, float b, float c, float d)
-
 
254
{
-
 
255
//TODO:
-
 
256
}
-
 
257
 
-
 
258
float __divsc3(float a, float b, float c, float d)
-
 
259
{
-
 
260
//TODO:
-
 
261
}
-
 
262