diff options
| author | Hristian Kirtchev <kirtchev@adacore.com> | 2008-04-08 08:46:17 +0200 |
|---|---|---|
| committer | Arnaud Charlet <charlet@gcc.gnu.org> | 2008-04-08 08:46:17 +0200 |
| commit | cf177287b1d1d835a2e3d169d8c4a3fe3eb6ae5c (patch) | |
| tree | ca7f3ae4a9adaf9b0a82411a7847979c11d518c3 /gcc/ada/a-caldel.adb | |
| parent | f9a4f2ef03bc9ad213e82e40b4c26fc0d33b1a94 (diff) | |
| download | gcc-cf177287b1d1d835a2e3d169d8c4a3fe3eb6ae5c.tar.gz | |
a-calend-vms.ads, [...]: Add with and use clause for System.OS_Primitives.
2008-04-08 Hristian Kirtchev <kirtchev@adacore.com>
* a-calend-vms.ads, a-calend-vms.adb: Add with and use clause for
System.OS_Primitives.
Change type of various constants, parameters and local variables from
Time to representation type OS_Time.
(To_Ada_Time, To_Unix_Time): Correct sign of origin shift.
Remove the declaration of constant Mili_F from several routines. New
body for internal package Conversions_Operations.
(Time_Of): Add default parameters for several formals.
* a-caldel.adb: Minor reformatting
* a-calend.ads, a-calend.adb: New body for internal package
Conversions_Operations.
(Time_Of): Add default parameters for several formals.
* Makefile.rtl: Add a-ststop
Add Ada.Calendar.Conversions to the list of runtime files.
Add g-timsta
* a-calcon.adb, a-calcon.ads: New files.
From-SVN: r134014
Diffstat (limited to 'gcc/ada/a-caldel.adb')
| -rw-r--r-- | gcc/ada/a-caldel.adb | 8 |
1 files changed, 3 insertions, 5 deletions
diff --git a/gcc/ada/a-caldel.adb b/gcc/ada/a-caldel.adb index 3410b6135fe..17b39977714 100644 --- a/gcc/ada/a-caldel.adb +++ b/gcc/ada/a-caldel.adb @@ -116,15 +116,13 @@ package body Ada.Calendar.Delays is -- target independent operation in Ada.Calendar is used to perform -- this conversion. - return Delays_Operations.To_Duration (T); + return Delay_Operations.To_Duration (T); end To_Duration; begin -- Set up the Timed_Delay soft link to the non tasking version if it has - -- not been already set. - - -- If tasking is present, Timed_Delay has already set this soft link, or - -- this will be overridden during the elaboration of + -- not been already set. If tasking is present, Timed_Delay has already set + -- this soft link, or this will be overridden during the elaboration of -- System.Tasking.Initialization if SSL.Timed_Delay = null then |