diff options
| -rw-r--r-- | c/src/ada/ChangeLog | 4 | ||||
| -rw-r--r-- | c/src/ada/rtems.ads | 3 | ||||
| -rw-r--r-- | cpukit/ada/ChangeLog | 4 | ||||
| -rw-r--r-- | cpukit/ada/rtems.ads | 3 |
4 files changed, 10 insertions, 4 deletions
diff --git a/c/src/ada/ChangeLog b/c/src/ada/ChangeLog index 052705b346..ba086097f5 100644 --- a/c/src/ada/ChangeLog +++ b/c/src/ada/ChangeLog @@ -1,3 +1,7 @@ +2002-08-27 Joel Sherrill <joel@OARcorp.com> + + * rtems.ads: Corrected binding for Io_Initialize. + 2001-08-23 Ralf Corsepius <corsepiu@faw.uni-ulm.de> * configure.ac: New. diff --git a/c/src/ada/rtems.ads b/c/src/ada/rtems.ads index cdbadac9a3..d721b0c0d0 100644 --- a/c/src/ada/rtems.ads +++ b/c/src/ada/rtems.ads @@ -1323,7 +1323,6 @@ pragma Elaborate_Body (RTEMS); Major : in RTEMS.Device_Major_Number; Minor : in RTEMS.Device_Minor_Number; Argument : in RTEMS.Address; - Return_Value : out RTEMS.Unsigned32; Result : out RTEMS.Status_Codes ); @@ -1450,4 +1449,4 @@ pragma Elaborate_Body (RTEMS); Configuration : RTEMS.Configuration_Table_Pointer; pragma Import (C, Configuration, "_Configuration_Table"); -end RTEMS;
\ No newline at end of file +end RTEMS; diff --git a/cpukit/ada/ChangeLog b/cpukit/ada/ChangeLog index 052705b346..ba086097f5 100644 --- a/cpukit/ada/ChangeLog +++ b/cpukit/ada/ChangeLog @@ -1,3 +1,7 @@ +2002-08-27 Joel Sherrill <joel@OARcorp.com> + + * rtems.ads: Corrected binding for Io_Initialize. + 2001-08-23 Ralf Corsepius <corsepiu@faw.uni-ulm.de> * configure.ac: New. diff --git a/cpukit/ada/rtems.ads b/cpukit/ada/rtems.ads index cdbadac9a3..d721b0c0d0 100644 --- a/cpukit/ada/rtems.ads +++ b/cpukit/ada/rtems.ads @@ -1323,7 +1323,6 @@ pragma Elaborate_Body (RTEMS); Major : in RTEMS.Device_Major_Number; Minor : in RTEMS.Device_Minor_Number; Argument : in RTEMS.Address; - Return_Value : out RTEMS.Unsigned32; Result : out RTEMS.Status_Codes ); @@ -1450,4 +1449,4 @@ pragma Elaborate_Body (RTEMS); Configuration : RTEMS.Configuration_Table_Pointer; pragma Import (C, Configuration, "_Configuration_Table"); -end RTEMS;
\ No newline at end of file +end RTEMS; |