From mboxrd@z Thu Jan  1 00:00:00 1970
X-Spam-Checker-Version: SpamAssassin 3.4.4 (2020-01-24) on polar.synack.me
X-Spam-Level: 
X-Spam-Status: No, score=-1.9 required=5.0 tests=BAYES_00 autolearn=ham
	autolearn_force=no version=3.4.4
X-Google-Thread: 103376,aa60d56d22a287d1
X-Google-Attributes: gid103376,domainid0,public,usenet
X-Google-Language: ENGLISH,ASCII-7-bit
Path: 
 g2news2.google.com!news2.google.com!border1.nntp.dca.giganews.com!nntp.giganews.com!wns13feed!worldnet.att.net!attbi_s22.POSTED!53ab2750!not-for-mail
From: "Jeffrey R. Carter" <spam.jrcarter.not@nospam.acm.org>
User-Agent: Thunderbird 2.0.0.21 (Windows/20090302)
MIME-Version: 1.0
Newsgroups: comp.lang.ada
Subject: Re: Newbie Q: How to program in UTC (time/calendar) ?
References: <b388ac10-9a49-4d9f-bc52-eac47085b3ac@37g2000yqp.googlegroups.com>
 	<gqema5$ho8$1@aioe.org>
 <c7c49ff2-e19c-43a4-b60d-cec7de4a6d91@c9g2000yqm.googlegroups.com>
 	<7f003dc4-3c3c-4e47-8ddf-d5001b310c17@g38g2000yqd.googlegroups.com>
 	<XA7zl.630044$yE1.557332@attbi_s21>
 <8aad6593-efb8-441f-9eac-27cf2fe7a124@v38g2000yqb.googlegroups.com>
In-Reply-To: 
 <8aad6593-efb8-441f-9eac-27cf2fe7a124@v38g2000yqb.googlegroups.com>
Content-Type: text/plain; charset=ISO-8859-1; format=flowed
Content-Transfer-Encoding: 7bit
Message-ID: <eN6Al.38248$DP1.27599@attbi_s22>
NNTP-Posting-Host: 173.16.158.68
X-Complaints-To: abuse@mchsi.com
X-Trace: attbi_s22 1238431946 173.16.158.68 (Mon, 30 Mar 2009 16:52:26 GMT)
NNTP-Posting-Date: Mon, 30 Mar 2009 16:52:26 GMT
Organization: AT&T ASP.att.net
Date: Mon, 30 Mar 2009 16:52:26 GMT
Xref: g2news2.google.com comp.lang.ada:5359
Date: 2009-03-30T16:52:26+00:00
List-Id: <comp.lang.ada>

reinkor wrote:
>    Time1 := Value("1970-01-01 00:00:00");
>    Time2 := Ada.Calendar.Time_Of(1970,1,1,0.0);
> 
>    Put("Time1: ");Put(Image(Time1));New_Line;
>    Put("Time2: ");Put(Image(Time2));New_Line;
> 
>    Put("UTC_Time_Offset: ");Put(Integer(UTC_Time_Offset),8);
> 
> This gives the following output on my computer:
> 
> Time1: 1970-01-01 00:00:00
> Time2: 1969-12-31 23:00:00
> UTC_Time_Offset:      120
> 
> The first line I now understand reflects that both "Value"
> and "Image" has parameter Time_Zone = 0 (UTC). I.e. "Time1"
> can be understood to have value 1970-01-01 00:00:00 (UTC).
> "But "Time2" is 1970-01-01 00:00:00 *minus* one hour (only), and
> UTC_Time_Offset = 120 (2 hours).

I suspect you've recently gone on 
daylight-savings/summer/whatever-it's-called-where-you-are time, which is UTC 
+02:00 (120 mins), but on 1970 Jan 01 you were on regular time, which is UTC +01:00.

-- 
Jeff Carter
"I don't know why I ever come in here. The
flies get the best of everything."
Never Give a Sucker an Even Break
102