From 933680a8384619f2e8d2e24ba4f690e5efa442c4 Mon Sep 17 00:00:00 2001
From: Alex Shinn <ashinn@users.noreply.github.com>
Date: Sun, 11 Mar 2012 18:19:32 +0900
Subject: [PATCH] Fixing offset in (scheme time) - epoch is 00:00:10, which
 means there are 24, not 34 leap seconds.

---
 lib/scheme/time.c | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/lib/scheme/time.c b/lib/scheme/time.c
index 73b8a0de..d2e13db5 100644
--- a/lib/scheme/time.c
+++ b/lib/scheme/time.c
@@ -1,12 +1,12 @@
 /* time.c -- R7RS time routines                              */
-/* Copyright (c) 2011 Alex Shinn.  All rights reserved.      */
+/* Copyright (c) 2011-2012 Alex Shinn.  All rights reserved. */
 /* BSD-style license: http://synthcode.com/license.txt       */
 
 #include <time.h>
 #include <chibi/eval.h>
 
 /* TODO: Check a leap second table file at appropriate intervals. */
-static time_t leap_seconds_since_epoch = 34;
+static time_t leap_seconds_since_epoch = 24;
 
 static sexp sexp_current_second (sexp ctx, sexp self, sexp_sint_t n) {
   time_t res = time(NULL);