Borland doesn't have roundl() so do terrible things instead.

489c0c3c · Deucе · 7d1fc057 · 489c0c3c
Commit 489c0c3c authored Feb 12, 2022 by Deucе 👌🏾
Hide whitespace changes
Inline Side-by-side

Showing with 2 additions and 7 deletions

src/xpdev/genwrap.c src/xpdev/genwrap.c +2 -7

No files found.
--- a/src/xpdev/genwrap.c
+++ b/src/xpdev/genwrap.c
@@ -695,14 +695,9 @@ char* os_cmdshell(void)
 /********************************************************/
 clock_t msclock(void)
 {
-        long double t = roundl(xp_timer() * 1000);
+	uint64_t = (uint64_t)(xp_timer() * 1000);

-        if (sizeof(clock_t) < 8) {
-                while (t > INT32_MAX)
-                        t -= UINT32_MAX;
-        }
-
-	return (clock_t)t;
+	return (clock_t)(t&0xffffffff);
 }

 /****************************************************************************/