mescc: Support tcc: libtcc1 build fixes.

* lib/libtcc1.c: Support building without long long, float support.
This commit is contained in:
Jan Nieuwenhuizen 2019-07-23 20:38:29 +02:00
parent bf4af81664
commit 3970a8797b
No known key found for this signature in database
GPG Key ID: F3C1A0D9C1D65273
1 changed files with 74 additions and 11 deletions

View File

@ -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;