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.3 required=5.0 tests=BAYES_00,INVALID_MSGID
	autolearn=no autolearn_force=no version=3.4.4
X-Google-Language: ENGLISH,ASCII-7-bit
X-Google-Thread: 103376,b1850e397df49d95,start
X-Google-Attributes: gid103376,public
From: "Jerry van Dijk" <jvandyk@ibm.net>
Subject: How to convert an Fixed_Point to to an Integer ?
Date: 1996/12/22
Message-ID: <01bbf058$cbdbf980$LocalHost@jerryware>#1/1
X-Deja-AN: 205506787
organization: *JerryWare HQ*, Haarlem, Holland
newsgroups: comp.lang.ada
Date: 1996-12-22T00:00:00+00:00
List-Id: <comp.lang.ada>



Hopefully this newsfeed will work...

The question really is: how do I convert an Ada.Calendar.Time (ie a
Duration, ie a
ordinary fixed_point type) to an Integer representing the nearest number of
seconds.
like:

	Num_Seconds : Integer;

	Num_Seconds := To_Integer (Ada.Calendar.Clock);

	function To_Integer (T : Time) returns Integer is
	begin
		???
	end To_Integer;

-- 
+----------------+------------------------+
| Jerry van Dijk | email: jvandyk@ibm.net |
|   Consultant   |        Team Ada        |
| Ordina Finance | *JerryWare HQ* Holland |
+----------------+------------------------+