From 94f703f4d1c06bdf9b66d89b431a299ad4f8ee23 Mon Sep 17 00:00:00 2001
From: sof <unknown>
Date: Tue, 3 Jun 1997 23:27:13 +0000
Subject: [PATCH] [project @ 1997-06-03 23:27:13 by sof] Added DST arg to
 toClockSec

---
 ghc/lib/cbits/toClockSec.lc |    4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/ghc/lib/cbits/toClockSec.lc b/ghc/lib/cbits/toClockSec.lc
index 71062e5..3107ae3 100644
--- a/ghc/lib/cbits/toClockSec.lc
+++ b/ghc/lib/cbits/toClockSec.lc
@@ -10,7 +10,7 @@
 #include "stgio.h"
 
 StgAddr 
-toClockSec(I_ year, I_ mon, I_ mday, I_ hour, I_ min, I_ sec, I_ tz, StgByteArray res)
+toClockSec(I_ year, I_ mon, I_ mday, I_ hour, I_ min, I_ sec, I_ isdst, StgByteArray res)
 {
     struct tm tm;
     time_t t;
@@ -21,7 +21,7 @@ toClockSec(I_ year, I_ mon, I_ mday, I_ hour, I_ min, I_ sec, I_ tz, StgByteArra
     tm.tm_hour = hour;
     tm.tm_min = min;
     tm.tm_sec = sec;
-    tm.tm_isdst = -1;
+    tm.tm_isdst = isdst;
 
 #ifdef HAVE_MKTIME
     t = mktime(&tm);
-- 
1.7.10.4