mirror of
https://github.com/cc65/cc65.git
synced 2024-09-07 09:54:35 +00:00
25 lines
485 B
C
25 lines
485 B
C
|
|
#include <_float.h>
|
|
#include <math.h>
|
|
|
|
#include <cbmfp.h>
|
|
|
|
#define _fcmplt(_d, _s) (_fcmp((_d), (_s)) == 1)
|
|
#define _fcmpgt(_d, _s) (_fcmp((_d), (_s)) == 255)
|
|
#define _fcmpeq(_d, _s) (_fcmp((_d), (_s)) == 0)
|
|
|
|
/* FIXME: this is really too simple */
|
|
float ffloor(float x)
|
|
{
|
|
signed long n;
|
|
float d;
|
|
|
|
n = _ftoi(x); /* FIXME: long */
|
|
d = _itof(n); /* FIXME: long */
|
|
|
|
if (_fcmpeq(d, x) || _fcmplt(_itof(0), x)) {
|
|
return d;
|
|
}
|
|
return _fsub(d, 1);
|
|
}
|