mescc: Support tcc: libtcc1 build fixes.
* lib/libtcc1.c: Support building without long long, float support.
This commit is contained in:
parent
bf4af81664
commit
3970a8797b
|
@ -27,7 +27,7 @@ __divdi3 (double a, double b)
|
||||||
if (__mes_debug () && !stub)
|
if (__mes_debug () && !stub)
|
||||||
eputs ("__divdi3 stub\n");
|
eputs ("__divdi3 stub\n");
|
||||||
stub = 1;
|
stub = 1;
|
||||||
return ((int) a / (int) b);
|
return ((long) a / (long) b);
|
||||||
}
|
}
|
||||||
|
|
||||||
double
|
double
|
||||||
|
@ -37,65 +37,115 @@ __moddi3 (double a, double b)
|
||||||
if (__mes_debug () && !stub)
|
if (__mes_debug () && !stub)
|
||||||
eputs ("__moddi3 stub\n");
|
eputs ("__moddi3 stub\n");
|
||||||
stub = 1;
|
stub = 1;
|
||||||
return ((int) a % (int) b);
|
return ((long) a % (long) b);
|
||||||
}
|
}
|
||||||
|
|
||||||
|
#if HAVE_LONG_LONG
|
||||||
unsigned long long
|
unsigned long long
|
||||||
__udivdi3 (unsigned long long a, unsigned long long b)
|
__udivdi3 (unsigned long long a, unsigned long long b)
|
||||||
|
#else
|
||||||
|
unsigned long
|
||||||
|
__udivdi3 (unsigned long a, long ah, unsigned long b)
|
||||||
|
#endif
|
||||||
{
|
{
|
||||||
static int stub = 0;
|
static int stub = 0;
|
||||||
if (__mes_debug () && !stub)
|
if (__mes_debug () && !stub)
|
||||||
eputs ("__udivdi3 stub\n");
|
eputs ("__udivdi3 stub\n");
|
||||||
stub = 1;
|
stub = 1;
|
||||||
int ai = a;
|
if (!b)
|
||||||
int bi = b;
|
return 0;
|
||||||
|
unsigned long ai = a;
|
||||||
|
unsigned long bi = b;
|
||||||
return ai / bi;
|
return ai / bi;
|
||||||
}
|
}
|
||||||
|
|
||||||
|
#if HAVE_LONG_LONG
|
||||||
unsigned long long
|
unsigned long long
|
||||||
__umoddi3 (unsigned long long a, unsigned long long b)
|
__umoddi3 (unsigned long long a, unsigned long long b)
|
||||||
|
#else
|
||||||
|
unsigned long
|
||||||
|
__umoddi3 (unsigned long a, long ah, unsigned long b)
|
||||||
|
#endif
|
||||||
{
|
{
|
||||||
static int stub = 0;
|
static int stub = 0;
|
||||||
if (__mes_debug () && !stub)
|
if (__mes_debug () && !stub)
|
||||||
eputs ("__umoddi3 stub\n");
|
eputs ("__umoddi3 stub\n");
|
||||||
stub = 1;
|
stub = 1;
|
||||||
int ai = a;
|
unsigned long ai = a;
|
||||||
int bi = b;
|
unsigned long bi = b;
|
||||||
return ai % bi;
|
return ai % bi;
|
||||||
}
|
}
|
||||||
|
|
||||||
|
#if HAVE_LONG_LONG
|
||||||
unsigned long long
|
unsigned long long
|
||||||
__lshrdi3 (unsigned long long a, int b)
|
__lshrdi3 (unsigned long long a, long b)
|
||||||
|
#else
|
||||||
|
unsigned long
|
||||||
|
__lshrdi3 (unsigned long a, long ah, long b)
|
||||||
|
#endif
|
||||||
{
|
{
|
||||||
static int stub = 0;
|
static int stub = 0;
|
||||||
if (__mes_debug () && !stub)
|
if (__mes_debug () && !stub)
|
||||||
eputs ("__lshrdi3 stub\n");
|
eputs ("__lshrdi3 stub\n");
|
||||||
stub = 1;
|
stub = 1;
|
||||||
|
#if 0 // In some instances, this recurses
|
||||||
return a >> b;
|
return a >> b;
|
||||||
|
#else
|
||||||
|
for (int i = 0; i < b; i++)
|
||||||
|
a /= 2;
|
||||||
|
return a;
|
||||||
|
#endif
|
||||||
}
|
}
|
||||||
|
|
||||||
|
#if HAVE_LONG_LONG
|
||||||
long long
|
long long
|
||||||
__ashldi3 (long long a, int b)
|
__ashldi3 (long long a, long b)
|
||||||
|
#else
|
||||||
|
long
|
||||||
|
__ashldi3 (long a, long ah, long b)
|
||||||
|
#endif
|
||||||
{
|
{
|
||||||
static int stub = 0;
|
static int stub = 0;
|
||||||
if (__mes_debug () && !stub)
|
if (__mes_debug () && !stub)
|
||||||
eputs ("__ashldi3 stub\n");
|
eputs ("__ashldi3 stub\n");
|
||||||
stub = 1;
|
stub = 1;
|
||||||
|
#if 0 // In some instances, this recurses
|
||||||
return a << b;
|
return a << b;
|
||||||
|
#else
|
||||||
|
for (int i = 0; i < b; i++)
|
||||||
|
a += a;
|
||||||
|
return a;
|
||||||
|
#endif
|
||||||
}
|
}
|
||||||
|
|
||||||
|
#if HAVE_LONG_LONG
|
||||||
long long
|
long long
|
||||||
__ashrdi3 (long long a, int b)
|
__ashrdi3 (long long a, long b)
|
||||||
|
#else
|
||||||
|
long
|
||||||
|
__ashrdi3 (long a, long ah, long b)
|
||||||
|
#endif
|
||||||
{
|
{
|
||||||
static int stub = 0;
|
static int stub = 0;
|
||||||
if (__mes_debug () && !stub)
|
if (__mes_debug () && !stub)
|
||||||
eputs ("__ashrdi3 stub\n");
|
eputs ("__ashrdi3 stub\n");
|
||||||
stub = 1;
|
stub = 1;
|
||||||
|
#if 0 // In some instances, this recurses
|
||||||
return a >> b;
|
return a >> b;
|
||||||
|
#else
|
||||||
|
for (int i = 0; i < b; i++)
|
||||||
|
a /= 2;
|
||||||
|
return a;
|
||||||
|
#endif
|
||||||
}
|
}
|
||||||
|
|
||||||
|
#if HAVE_LONG_LONG && HAVE_FLOAT
|
||||||
long double
|
long double
|
||||||
__floatundixf (unsigned long long a)
|
__floatundixf (unsigned long long a)
|
||||||
|
#else
|
||||||
|
double
|
||||||
|
__floatundixf (unsigned long a)
|
||||||
|
#endif
|
||||||
{
|
{
|
||||||
static int stub = 0;
|
static int stub = 0;
|
||||||
if (__mes_debug () && !stub)
|
if (__mes_debug () && !stub)
|
||||||
|
@ -104,7 +154,11 @@ __floatundixf (unsigned long long a)
|
||||||
return 0;
|
return 0;
|
||||||
}
|
}
|
||||||
|
|
||||||
|
#if HAVE_LONG_LONG
|
||||||
unsigned long long
|
unsigned long long
|
||||||
|
#else
|
||||||
|
unsigned long
|
||||||
|
#endif
|
||||||
__fixunsxfdi (double a1)
|
__fixunsxfdi (double a1)
|
||||||
{
|
{
|
||||||
static int stub = 0;
|
static int stub = 0;
|
||||||
|
@ -118,9 +172,9 @@ __fixunsxfdi (double a1)
|
||||||
long
|
long
|
||||||
#elif __TINYC__
|
#elif __TINYC__
|
||||||
int
|
int
|
||||||
#else // !__TINYCC_
|
#else // !__TINYCC__
|
||||||
long long
|
long long
|
||||||
#endif // !__TINYCC_
|
#endif // !__TINYCC__
|
||||||
__fixdfdi (double a1)
|
__fixdfdi (double a1)
|
||||||
{
|
{
|
||||||
static int stub = 0;
|
static int stub = 0;
|
||||||
|
@ -130,8 +184,13 @@ __fixdfdi (double a1)
|
||||||
return 0;
|
return 0;
|
||||||
}
|
}
|
||||||
|
|
||||||
|
#if HAVE_LONG_LONG
|
||||||
unsigned long long
|
unsigned long long
|
||||||
__fixxfdi (double a1)
|
__fixxfdi (double a1)
|
||||||
|
#else
|
||||||
|
unsigned long
|
||||||
|
__fixxfdi (double a1)
|
||||||
|
#endif
|
||||||
{
|
{
|
||||||
static int stub = 0;
|
static int stub = 0;
|
||||||
if (__mes_debug () && !stub)
|
if (__mes_debug () && !stub)
|
||||||
|
@ -140,7 +199,11 @@ __fixxfdi (double a1)
|
||||||
return 0;
|
return 0;
|
||||||
}
|
}
|
||||||
|
|
||||||
|
#if HAVE_LONG_LONG
|
||||||
long long
|
long long
|
||||||
|
#else
|
||||||
|
long
|
||||||
|
#endif
|
||||||
__fixsfdi (double a1)
|
__fixsfdi (double a1)
|
||||||
{
|
{
|
||||||
static int stub = 0;
|
static int stub = 0;
|
||||||
|
|
Loading…
Reference in a new issue