Fixed some errors on iOS

src/lapi.c

@@ -7,6 +7,7 @@
 
 #include <stdarg.h>
 #include <string.h>
+#include <math.h>
 
 #define lapi_c
 #define LUA_CORE
@@ -370,7 +371,8 @@ LUA_API lua_Unsigned lua_tounsignedx (lua_State *L, int idx, int *isnum) {
     lua_Unsigned res;
     lua_Number num = nvalue(o);
     //lua_number2unsigned(res, num);
-    res = (lua_Unsigned)floor(num);
+    if (num < 0) res = -(lua_Unsigned)fabs(floor(num));
+    else res = (lua_Unsigned)floor(num);
     if (isnum) *isnum = 1;
     return res;
   }

src/ldo.c

@@ -438,7 +438,7 @@ static void finishCcall (lua_State *L) {
     ci->callstatus &= ~CIST_HOOKED;
     switch (ci->hook) {
       case LUA_HOOKCALL:
-      case LUA_HOOKTAILCALL:
+      case LUA_HOOKTAILCALL: {
         /* call function since luaD_precall yielded before calling */
         int n;
         lua_CFunction f;
@@ -449,6 +449,7 @@ static void finishCcall (lua_State *L) {
         lua_lock(L);
         luaD_poscall(L, L->top - n);
         break;
+      }
       case LUA_HOOKRET:
         /* retry return with hooks disabled */
         L->allowhook = 0;

src/llex.c

@@ -43,7 +43,7 @@ static const char *const luaX_tokens [] = {
     "in", "local", "nil", "not", "or", "repeat",
     "return", "then", "true", "until", "while",
     "..", "...", "==", ">=", "<=", "~=", "::", "<eof>",
-    "<number>", "<name>", "<string>"
+    "<number>", "<name>", "<string>", "goto"
 };
 
 

src/lmathlib.c

@@ -8,6 +8,7 @@
 #include <stdlib.h>
 #include <math.h>
 #include <float.h>
+#include <time.h>
 
 #define lmathlib_c
 #define LUA_LIB