diff options
author | Kevin B Kenny <kennykb@acm.org> | 2004-03-19 18:33:51 (GMT) |
---|---|---|
committer | Kevin B Kenny <kennykb@acm.org> | 2004-03-19 18:33:51 (GMT) |
commit | 2e5d5696ba21142b2af832196c9428971bc198c8 (patch) | |
tree | ac851f22aa1fdc090d2c9af4d6bf279a072ab214 /win | |
parent | 5ae57fc1b695b72d90d0b098b8f514621ff7e3ed (diff) | |
download | tcl-2e5d5696ba21142b2af832196c9428971bc198c8.zip tcl-2e5d5696ba21142b2af832196c9428971bc198c8.tar.gz tcl-2e5d5696ba21142b2af832196c9428971bc198c8.tar.bz2 |
Made HEAD build on Windows VC++ again.
Diffstat (limited to 'win')
-rw-r--r-- | win/tclWinDde.c | 4 | ||||
-rw-r--r-- | win/tclWinReg.c | 4 | ||||
-rw-r--r-- | win/tclWinTime.c | 20 |
3 files changed, 14 insertions, 14 deletions
diff --git a/win/tclWinDde.c b/win/tclWinDde.c index 3570fe8..9084dc0 100644 --- a/win/tclWinDde.c +++ b/win/tclWinDde.c @@ -10,10 +10,10 @@ * See the file "license.terms" for information on usage and redistribution * of this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tclWinDde.c,v 1.19 2004/02/25 14:12:35 patthoyts Exp $ + * RCS: @(#) $Id: tclWinDde.c,v 1.20 2004/03/19 18:33:52 kennykb Exp $ */ -#include "tclPort.h" +#include "tclInt.h" #include <dde.h> #include <ddeml.h> #include <tchar.h> diff --git a/win/tclWinReg.c b/win/tclWinReg.c index 29534c8..73c46fc 100644 --- a/win/tclWinReg.c +++ b/win/tclWinReg.c @@ -11,10 +11,10 @@ * See the file "license.terms" for information on usage and redistribution * of this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tclWinReg.c,v 1.26 2004/03/04 15:10:42 patthoyts Exp $ + * RCS: @(#) $Id: tclWinReg.c,v 1.27 2004/03/19 18:33:53 kennykb Exp $ */ -#include <tclPort.h> +#include <tclInt.h> #ifdef _MSC_VER # pragma comment (lib, "advapi32.lib") #endif diff --git a/win/tclWinTime.c b/win/tclWinTime.c index 1ab09a8..ccb47fe 100644 --- a/win/tclWinTime.c +++ b/win/tclWinTime.c @@ -9,7 +9,7 @@ * See the file "license.terms" for information on usage and redistribution * of this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tclWinTime.c,v 1.22 2004/03/18 18:56:04 rmax Exp $ + * RCS: @(#) $Id: tclWinTime.c,v 1.23 2004/03/19 18:33:53 kennykb Exp $ */ #include "tclWinInt.h" @@ -545,7 +545,7 @@ TclpGetTZName(int dst) struct tm * TclpGetDate(t, useGMT) - CONST time_t t; + CONST time_t *t; int useGMT; { struct tm *tmPtr; @@ -570,14 +570,14 @@ TclpGetDate(t, useGMT) H. Giese, June 2003 */ #ifdef __BORLANDC__ - if (t >= SECSPERDAY) { + if (*t >= SECSPERDAY) { #else - if (t >= 0) { + if (*t >= 0) { #endif - return localtime(tp); + return localtime(t); } - time = t - timezone; + time = *t - timezone; /* * If we aren't near to overflowing the long, just add the bias and @@ -585,11 +585,11 @@ TclpGetDate(t, useGMT) * the result at the end. */ - if (t < (LONG_MAX - 2 * SECSPERDAY) - && t > (LONG_MIN + 2 * SECSPERDAY)) { + if (*t < (LONG_MAX - 2 * SECSPERDAY) + && *t > (LONG_MIN + 2 * SECSPERDAY)) { tmPtr = ComputeGMT(&time); } else { - tmPtr = ComputeGMT(&t); + tmPtr = ComputeGMT(t); tzset(); @@ -625,7 +625,7 @@ TclpGetDate(t, useGMT) tmPtr->tm_wday = (tmPtr->tm_wday + time) % 7; } } else { - tmPtr = ComputeGMT(&t); + tmPtr = ComputeGMT(t); } return tmPtr; } |