diff options
author | Joel Sherrill <joel.sherrill@OARcorp.com> | 1997-05-29 21:53:58 +0000 |
---|---|---|
committer | Joel Sherrill <joel.sherrill@OARcorp.com> | 1997-05-29 21:53:58 +0000 |
commit | 61389eac9fc90cefeff329fa5e692616f22aa219 (patch) | |
tree | 67e9f20995d80ebd1912501286876f0405b1a4bb /doc/user/event.t | |
parent | updated version number (diff) | |
download | rtems-61389eac9fc90cefeff329fa5e692616f22aa219.tar.bz2 |
first cut at Ada bindings manual
Diffstat (limited to '')
-rw-r--r-- | doc/user/event.t | 26 |
1 files changed, 26 insertions, 0 deletions
diff --git a/doc/user/event.t b/doc/user/event.t index 0ec198a5c0..7fa45e4b22 100644 --- a/doc/user/event.t +++ b/doc/user/event.t @@ -247,12 +247,24 @@ and status codes. @subheading CALLING SEQUENCE: +@ifset is-C @example rtems_status_code rtems_event_send ( rtems_id id, rtems_event_set event_in ); @end example +@end ifset + +@ifset is-Ada +@example +procedure Event_Send ( + ID : in RTEMS.ID; + Event_In : in RTEMS.Event_Set; + Result : out RTEMS.Status_Codes +); +@end example +@end ifset @subheading DIRECTIVE STATUS CODES: @code{SUCCESSFUL} - event set sent successfully@* @@ -293,6 +305,7 @@ remote node to send the event set to the appropriate task. @subheading CALLING SEQUENCE: +@ifset is-C @example rtems_status_code rtems_event_receive ( rtems_event_set event_in, @@ -301,6 +314,19 @@ rtems_status_code rtems_event_receive ( rtems_event_set *event_out ); @end example +@end ifset + +@ifset is-Ada +@example +procedure Event_Receive ( + Event_In : in RTEMS.Event_Set; + Option_Set : in RTEMS.Option; + Ticks : in RTEMS.Interval; + Event_Out : out RTEMS.Event_Set; + Result : out RTEMS.Status_Codes +); +@end example +@end ifset @subheading DIRECTIVE STATUS CODES: @code{SUCCESSFUL} - event received successfully@* |