test whether main types are at least 64 bits

Author: benpop

int64.c

@@ -148,6 +148,34 @@ static void *luaL_testudata (lua_State *L, int ud, const char *tname) {
 /* }================================================================= */
 
 
+/*
+** {=================================================================
+** Test whether types are at least 64 bits wide.
+** ==================================================================
+*/
+
+
+LUALIB_API int luaL_integeris64 (lua_State *L) {
+  (void)L;
+  return LUA_INTEGER_64;
+}
+
+
+LUALIB_API int luaL_numberis64 (lua_State *L) {
+  (void)L;
+  return LUA_NUMBER_64;
+}
+
+
+LUALIB_API int luaL_pointeris64 (lua_State *L) {
+  (void)L;
+  return LUA_POINTER_64;
+}
+
+
+/* }================================================================= */
+
+
 /*
 ** {=================================================================
 ** Lua type => (u)int64_t

int64.h

@@ -55,6 +55,17 @@ LUALIB_API void luaL_u64pushstring (lua_State *L, uint64_t n);
 LUALIB_API void luaL_i64pushhex (lua_State *L, int64_t n);
 LUALIB_API void luaL_u64pushhex (lua_State *L, uint64_t n);
 
+/*
+** {=================================================================
+** Test whether types are at least 64 bits wide.
+** ==================================================================
+*/
+LUALIB_API int luaL_integeris64 (lua_State *L);
+LUALIB_API int luaL_numberis64 (lua_State *L);
+LUALIB_API int luaL_pointeris64 (lua_State *L);
+
+/* }================================================================= */
+
 /*
 ** {=================================================================
 ** This is incredibly hacky and may not even work.