diff options
| author | Joel Sherrill <joel.sherrill@OARcorp.com> | 2008-12-16 15:58:56 +0000 |
|---|---|---|
| committer | Joel Sherrill <joel.sherrill@OARcorp.com> | 2008-12-16 15:58:56 +0000 |
| commit | b3a4579e944386b64359afe940288b8770d541b8 (patch) | |
| tree | f29001cc49b8efa5d348ff023d25ce0faf84bd67 /c | |
| parent | 2008-12-16 Joel Sherrill <joel.sherrill@oarcorp.com> (diff) | |
| download | rtems-b3a4579e944386b64359afe940288b8770d541b8.tar.bz2 | |
2008-12-16 Joel Sherrill <joel.sherrill@oarcorp.com>
* rtems.adb: Use public API not _TOD_Microseconds_per_tick.
Diffstat (limited to 'c')
| -rw-r--r-- | c/src/ada/ChangeLog | 4 | ||||
| -rw-r--r-- | c/src/ada/rtems.adb | 4 |
2 files changed, 6 insertions, 2 deletions
diff --git a/c/src/ada/ChangeLog b/c/src/ada/ChangeLog index 9357e697f3..fd5a406d56 100644 --- a/c/src/ada/ChangeLog +++ b/c/src/ada/ChangeLog @@ -1,3 +1,7 @@ +2008-12-16 Joel Sherrill <joel.sherrill@oarcorp.com> + + * rtems.adb: Use public API not _TOD_Microseconds_per_tick. + 2008-12-03 Joel Sherrill <joel.sherrill@OARcorp.com> PR 1345/Ada diff --git a/c/src/ada/rtems.adb b/c/src/ada/rtems.adb index 80e60cf1b3..f46e23740d 100644 --- a/c/src/ada/rtems.adb +++ b/c/src/ada/rtems.adb @@ -70,8 +70,8 @@ package body RTEMS is function Microseconds_To_Ticks ( Microseconds : RTEMS.Unsigned32 ) return RTEMS.Interval is - Microseconds_Per_Tick : RTEMS.Interval; - pragma Import (C, Microseconds_Per_Tick, "_TOD_Microseconds_per_tick"); + function Microseconds_Per_Tick return RTEMS.Unsigned32; + pragma Import (C, Microseconds_Per_Tick, "_ada_microseconds_per_tick"); begin return Microseconds / Microseconds_Per_Tick; |