1 files changed, 21 insertions, 0 deletions
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")