From 5d0380fd2fdc4ef21efab57c8645bc96f1e8ba8d Mon Sep 17 00:00:00 2001
From: jluehrs2 <jluehrs2@uiuc.edu>
Date: Tue, 9 Oct 2007 00:13:08 -0500
Subject: add lhf's alarm test script from lalarm

---
 test/alarm_test.lua | 21 +++++++++++++++++++++
 1 file changed, 21 insertions(+)
 create mode 100644 test/alarm_test.lua

diff --git a/test/alarm_test.lua b/test/alarm_test.lua
new file mode 100644
index 0000000..568a311
--- /dev/null
+++ b/test/alarm_test.lua
@@ -0,0 +1,21 @@
+-- from lhf's lalarm lib
+require 'signal'
+
+function myalarm()
+    print("in alarm!", os.date("%T"), a, math.floor(100 * a / N) .. "%")
+    signal.alarm(1)
+end
+
+N = 40000000
+
+print("hello")
+signal.signal('ALRM', myalarm)
+signal.alarm(1)
+
+a = 0
+for i = 1, N do
+    a = a + 1
+    math.sin(a)	-- waste some time...
+end
+print(a)
+print("bye")
-- 
cgit v1.2.3