1------------------------------------------------------------------------------ 2-- -- 3-- GNAT RUN-TIME COMPONENTS -- 4-- -- 5-- A D A . C A L E N D A R . T I M E _ Z O N E S -- 6-- -- 7-- S p e c -- 8-- -- 9-- This specification is derived from the Ada Reference Manual for use with -- 10-- GNAT. In accordance with the copyright of that document, you can freely -- 11-- copy and modify this specification, provided that if you redistribute a -- 12-- modified version, any changes that you have made are clearly indicated. -- 13-- -- 14------------------------------------------------------------------------------ 15 16-- This package provides routines to determine the offset of dates to GMT. 17-- It is defined in the Ada 2005 RM (9.6.1). 18 19package Ada.Calendar.Time_Zones is 20 21 -- Time zone manipulation 22 23 type Time_Offset is range -(28 * 60) .. 28 * 60; 24 25 Unknown_Zone_Error : exception; 26 27 function UTC_Time_Offset (Date : Time := Clock) return Time_Offset; 28 -- Returns (in minutes), the difference between the implementation-defined 29 -- time zone of Calendar, and UTC time, at the time Date. If the time zone 30 -- of the Calendar implementation is unknown, raises Unknown_Zone_Error. 31 32end Ada.Calendar.Time_Zones; 33