From 68bbe82d7e08691f90f142ca494e22f9b8298666 Mon Sep 17 00:00:00 2001
From: jluehrs2 <jluehrs2@uiuc.edu>
Date: Tue, 9 Oct 2007 00:07:14 -0500
Subject: add an alarm function

---
 src/signal.c | 16 ++++++++++++++--
 1 file changed, 14 insertions(+), 2 deletions(-)

diff --git a/src/signal.c b/src/signal.c
index 2b3d42e..55c66ac 100644
--- a/src/signal.c
+++ b/src/signal.c
@@ -4,6 +4,7 @@
 #include <lauxlib.h>
 #include <signal.h>
 #include <string.h>
+#include <unistd.h>
 
 #define REG_TABLE "luasignal"
 
@@ -115,9 +116,20 @@ static int l_signal(lua_State* L)
     return 0;
 }
 
+static int l_alarm(lua_State* L)
+{
+    int time;
+
+    time = luaL_checkint(L, -1);
+    lua_pushinteger(L, alarm(time));
+
+    return 1;
+}
+
 const luaL_Reg reg[] = {
-    { "signal", l_signal },
-    { NULL,     NULL },
+    { "signal",  l_signal  },
+    { "alarm",   l_alarm   },
+    {  NULL,     NULL      },
 };
 
 int luaopen_signal(lua_State* L)
-- 
cgit v1.2.3