File: /home/oboss/Users/gec/sources/CDH_Structure/Up_Down_Link_Bus/up_down_link_bus.ads
1 --% Compilation Unit: Up_Down_Link_Bus
2 --
3 --% Category: Generic Package Instantiation
4 --
5 --% Release: $Name: $
6 --
7 --% Version: $Revision: 2.0 $
8 --
9 --% Author: $Author: gec $
10 --
11 --% Revision Log:
12 -- $Log: up_down_link_bus.ads,v $
13 -- Revision 2.0 2003/04/04 08:50:24 gec
14 -- Initial release of source files serving as baseline for OBOSS-III project.
15 --
16 -- Revision 1.1.1.1 2003/04/04 08:13:10 gec
17 -- Imported using TkCVS
18 --
19 --
20 --
21 --% Project: OBOSS
22 --
23 --% Copyright (C) 2003 by Terma A/S
24 -- Proprietary and intellectual rights of Terma A/S, Denmark,
25 -- are involved in the subject-matter of this material and
26 -- all manufacturing, reproduction, use, disclosure, and
27 -- sales rights pertaining to such subject-matter are
28 -- expressly reserved. This material is submitted for a
29 -- specific purpose as agreed, and the recipient by
30 -- accepting this material agrees that this material will
31 -- not be used, copied, or reproduced in whole or in part
32 -- nor its contents revealed in any manner or to any person,
33 -- except to meet the purpose for which it was submitted and
34 -- subject to the terms of the agreement.
35 --
36 --% Target Dependencies:
37 -- None
38 --% Compiler Dependencies:
39 -- None
40 with Up_Down_Link_Parameters;
41 with Ground_IF;
42 with Serial_Interface;
43 package Up_Down_Link_Bus is new Serial_Interface
44 (Channel =>
45 Up_Down_Link_Parameters.UART_Channel,
46 UART_Protection_Priority =>
47 Up_Down_Link_Parameters.UART_Protected_Priority,
48 My_Application_ID =>
49 Up_Down_Link_Parameters.Application_ID,
50 Interrupt_Handler_Priority =>
51 Up_Down_Link_Parameters.UART_Interrupt_Handler_Priority,
52 Receiver_Task_Priority =>
53 Up_Down_Link_Parameters.UART_Receiver_Task_Priority,
54 Receiver_Task_Stack_Size =>
55 Up_Down_Link_Parameters.UART_Receiver_Task_Stack_Size,
56 Receive_Buffer_Size =>
57 Up_Down_Link_Parameters.UART_Receive_Buffer_Size,
58 Forward_Data =>
59 Ground_IF.Receive);
60