Support for gettime and sleep functions

Provide `gettime` and `sleep` functions with at least 1 millisecond
resolution.

1 files changed, 19 insertions, 0 deletions

diff --git a/src/core.c b/src/core.c
new file mode 100644
index 0000000..d2acb95
--- /dev/null
+++ b/src/core.c
@@ -0,0 +1,19 @@
+#include <lua.h>
+#include <lauxlib.h>
+
+#ifdef _WIN32
+#define LUAEXPORT __declspec(dllexport)
+#else
+#define LUAEXPORT __attribute__((visibility("default")))
+#endif
+
+void time_open(lua_State *L);
+
+/*-------------------------------------------------------------------------
+ * Initializes all library modules.
+ *-------------------------------------------------------------------------*/
+LUAEXPORT int luaopen_system_core(lua_State *L) {
+    lua_newtable(L);
+    time_open(L);
+    return 1;
+}