From c21d0650957336fab335228413fa3a53ee4cc338 Mon Sep 17 00:00:00 2001
From: daurnimator <quae@daurnimator.com>
Date: Tue, 23 Jul 2013 18:53:09 -0400
Subject: [PATCH] src/timetable: Add timestamp method

---
 src/timetable.lua | 16 ++++++++++++++++
 1 file changed, 16 insertions(+)

diff --git a/src/timetable.lua b/src/timetable.lua
index 7e986a1..5fa7205 100644
--- a/src/timetable.lua
+++ b/src/timetable.lua
@@ -98,6 +98,17 @@ local function normalise ( year , month , day , hour , min , sec )
 	return year , month , day , hour , min , sec
 end
 
+local function timestamp ( year , month , day , hour , min , sec )
+	return 60*60*24*(
+			year * year_length ( year )
+			+ month * month_length ( month , year )
+			+ day
+		)
+		+ hour  * (60*60)
+		+ min   * 60
+		+ sec
+end
+
 
 local timetable_methods = { }
 
@@ -119,6 +130,10 @@ function timetable_methods:normalise ( )
 end
 timetable_methods.normalize = timetable_methods.normalise -- American English
 
+function timetable_methods:timestamp ( )
+	return timestamp ( unpack_tm ( self ) )
+end
+
 local timetable_mt = {
 	__index    = timetable_methods ;
 }
@@ -141,6 +156,7 @@ end
 return {
 	doomsday  = doomsday ;
 	normalise = normalise ;
+	timestamp = timestamp ;
 
 	new = new_timetable ;
 	cast = cast_timetable ;
-- 
2.39.2