Commit 639ec60f authored by jhugues's avatar jhugues

* Correct usage Source_Language to avoid warning by Ocarina

	For TASTE ticket #358



git-svn-id: https://tecsw.estec.esa.int/svn/taste/trunk/ocarina@6902 129961e7-ef38-4bb5-a8f7-c9a525a55882
parent 4b9d38d6
...@@ -40,7 +40,7 @@ public ...@@ -40,7 +40,7 @@ public
properties properties
Type_Source_Name => "IP-Conf-T"; Type_Source_Name => "IP-Conf-T";
Deployment::ASN1_Module_Name => "POHICDRIVER-IP"; Deployment::ASN1_Module_Name => "POHICDRIVER-IP";
Source_Language => ASN1; Source_Language => (ASN1);
Source_Text => ("OCARINA_INCLUDE_PATH/ocarina/runtime/polyorb-hi-c/src/drivers/configuration/ip.asn" , "drivers/configuration/ip.h"); Source_Text => ("OCARINA_INCLUDE_PATH/ocarina/runtime/polyorb-hi-c/src/drivers/configuration/ip.asn" , "drivers/configuration/ip.h");
end configuration_type_ip; end configuration_type_ip;
...@@ -48,7 +48,7 @@ public ...@@ -48,7 +48,7 @@ public
properties properties
Type_Source_Name => "Serial-Conf-T"; Type_Source_Name => "Serial-Conf-T";
Deployment::ASN1_Module_Name => "POHICDRIVER-UART"; Deployment::ASN1_Module_Name => "POHICDRIVER-UART";
Source_Language => ASN1; Source_Language => (ASN1);
Source_Text => ("OCARINA_INCLUDE_PATH/ocarina/runtime/polyorb-hi-c/src/drivers/configuration/serial.asn", "drivers/configuration/serial.h"); Source_Text => ("OCARINA_INCLUDE_PATH/ocarina/runtime/polyorb-hi-c/src/drivers/configuration/serial.asn", "drivers/configuration/serial.h");
end configuration_type_serial; end configuration_type_serial;
...@@ -56,7 +56,7 @@ public ...@@ -56,7 +56,7 @@ public
properties properties
Type_Source_Name => "Spacewire-Conf-T"; Type_Source_Name => "Spacewire-Conf-T";
Deployment::ASN1_Module_Name => "POHICDRIVER-SPACEWIRE"; Deployment::ASN1_Module_Name => "POHICDRIVER-SPACEWIRE";
Source_Language => ASN1; Source_Language => (ASN1);
Source_Text => ("OCARINA_INCLUDE_PATH/ocarina/runtime/polyorb-hi-c/src/drivers/configuration/spacewire.asn", "drivers/configuration/spacewire.h"); Source_Text => ("OCARINA_INCLUDE_PATH/ocarina/runtime/polyorb-hi-c/src/drivers/configuration/spacewire.asn", "drivers/configuration/spacewire.h");
end configuration_type_spacewire; end configuration_type_spacewire;
......
...@@ -7,7 +7,7 @@ with Deployment; ...@@ -7,7 +7,7 @@ with Deployment;
subprogram spg_init subprogram spg_init
properties properties
Source_Language => C; Source_Language => (C);
Source_Name => "__po_hi_c_driver_exarm_ni_6071e_analog_init"; Source_Name => "__po_hi_c_driver_exarm_ni_6071e_analog_init";
end spg_init; end spg_init;
...@@ -31,7 +31,7 @@ features ...@@ -31,7 +31,7 @@ features
data15 : out parameter Base_Types::Float_64; data15 : out parameter Base_Types::Float_64;
data16 : out parameter Base_Types::Float_64; data16 : out parameter Base_Types::Float_64;
properties properties
Source_Language => C; Source_Language => (C);
Source_Name => "__po_hi_c_driver_exarm_ni_6071e_analog_poller"; Source_Name => "__po_hi_c_driver_exarm_ni_6071e_analog_poller";
end spg_poller; end spg_poller;
......
...@@ -7,7 +7,7 @@ with Deployment; ...@@ -7,7 +7,7 @@ with Deployment;
subprogram spg_init subprogram spg_init
properties properties
Source_Language => C; Source_Language => (C);
Source_Name => "__po_hi_c_driver_exarm_ni_6071e_digital_init"; Source_Name => "__po_hi_c_driver_exarm_ni_6071e_digital_init";
end spg_init; end spg_init;
...@@ -17,7 +17,7 @@ features ...@@ -17,7 +17,7 @@ features
data1 : out parameter Base_Types::Unsigned_32; data1 : out parameter Base_Types::Unsigned_32;
data2 : out parameter Base_Types::Unsigned_32; data2 : out parameter Base_Types::Unsigned_32;
properties properties
Source_Language => C; Source_Language => (C);
Source_Name => "__po_hi_c_driver_exarm_ni_6071e_digital_poller"; Source_Name => "__po_hi_c_driver_exarm_ni_6071e_digital_poller";
end spg_poller; end spg_poller;
......
...@@ -7,7 +7,7 @@ with Deployment; ...@@ -7,7 +7,7 @@ with Deployment;
subprogram spg_generic_keyboard_init subprogram spg_generic_keyboard_init
properties properties
Source_Language => C; Source_Language => (C);
Source_Name => "__po_hi_driver_generic_keyboard_init"; Source_Name => "__po_hi_driver_generic_keyboard_init";
end spg_generic_keyboard_init; end spg_generic_keyboard_init;
...@@ -34,7 +34,7 @@ subprogram spg_generic_keyboard_poller ...@@ -34,7 +34,7 @@ subprogram spg_generic_keyboard_poller
features features
key_pressed : out parameter Base_Types::Integer; key_pressed : out parameter Base_Types::Integer;
properties properties
Source_Language => C; Source_Language => (C);
Source_Name => "__po_hi_driver_generic_keyboard_poller"; Source_Name => "__po_hi_driver_generic_keyboard_poller";
end spg_generic_keyboard_poller; end spg_generic_keyboard_poller;
......
...@@ -104,7 +104,7 @@ public ...@@ -104,7 +104,7 @@ public
properties properties
Source_Name => "PolyORB_HI_Drivers_GRSPW.Initialize"; Source_Name => "PolyORB_HI_Drivers_GRSPW.Initialize";
Source_Language => Ada; Source_Language => (Ada);
end Initialize; end Initialize;
------------- -------------
...@@ -117,7 +117,7 @@ public ...@@ -117,7 +117,7 @@ public
properties properties
Source_Name => "PolyORB_HI_Drivers_GRSPW.Receive"; Source_Name => "PolyORB_HI_Drivers_GRSPW.Receive";
Source_Language => Ada; Source_Language => (Ada);
end Receive; end Receive;
------------- -------------
...@@ -130,7 +130,7 @@ public ...@@ -130,7 +130,7 @@ public
properties properties
Source_Name => "PolyORB_HI_Drivers_GRSPW.Send"; Source_Name => "PolyORB_HI_Drivers_GRSPW.Send";
Source_Language => Ada; Source_Language => (Ada);
end Send; end Send;
end GRSPW; end GRSPW;
...@@ -106,7 +106,7 @@ public ...@@ -106,7 +106,7 @@ public
properties properties
Source_Name => "PolyORB_HI_Drivers_GRUART.Initialize"; Source_Name => "PolyORB_HI_Drivers_GRUART.Initialize";
Source_Language => Ada; Source_Language => (Ada);
end Initialize; end Initialize;
------------- -------------
...@@ -119,7 +119,7 @@ public ...@@ -119,7 +119,7 @@ public
properties properties
Source_Name => "PolyORB_HI_Drivers_GRUART.Receive"; Source_Name => "PolyORB_HI_Drivers_GRUART.Receive";
Source_Language => Ada; Source_Language => (Ada);
end Receive; end Receive;
------------- -------------
...@@ -132,7 +132,7 @@ public ...@@ -132,7 +132,7 @@ public
properties properties
Source_Name => "PolyORB_HI_Drivers_GRUART.Send"; Source_Name => "PolyORB_HI_Drivers_GRUART.Send";
Source_Language => Ada; Source_Language => (Ada);
end Send; end Send;
end GRUART; end GRUART;
...@@ -8,20 +8,20 @@ with ocarina_drivers; ...@@ -8,20 +8,20 @@ with ocarina_drivers;
subprogram spg_leon_eth_poller subprogram spg_leon_eth_poller
properties properties
Source_Language => C; Source_Language => (C);
Source_Name => "__po_hi_c_driver_eth_leon_poller"; Source_Name => "__po_hi_c_driver_eth_leon_poller";
end spg_leon_eth_poller; end spg_leon_eth_poller;
subprogram spg_leon_eth_sender subprogram spg_leon_eth_sender
properties properties
Source_Language => C; Source_Language => (C);
Source_Name => "__po_hi_c_driver_eth_leon_sender"; Source_Name => "__po_hi_c_driver_eth_leon_sender";
end spg_leon_eth_sender; end spg_leon_eth_sender;
subprogram spg_leon_eth_init subprogram spg_leon_eth_init
properties properties
Source_Language => C; Source_Language => (C);
Source_Name => "__po_hi_c_driver_eth_leon_init"; Source_Name => "__po_hi_c_driver_eth_leon_init";
end spg_leon_eth_init; end spg_leon_eth_init;
......
...@@ -8,26 +8,26 @@ with ocarina_drivers; ...@@ -8,26 +8,26 @@ with ocarina_drivers;
subprogram spg_serial_poller_leon subprogram spg_serial_poller_leon
properties properties
Source_Language => C; Source_Language => (C);
Source_Name => "__po_hi_c_driver_serial_leon_poller"; Source_Name => "__po_hi_c_driver_serial_leon_poller";
end spg_serial_poller_leon; end spg_serial_poller_leon;
subprogram spg_serial_sender_leon subprogram spg_serial_sender_leon
properties properties
Source_Language => C; Source_Language => (C);
Source_Name => "__po_hi_c_driver_serial_leon_sender"; Source_Name => "__po_hi_c_driver_serial_leon_sender";
end spg_serial_sender_leon; end spg_serial_sender_leon;
subprogram spg_serial_init_leon subprogram spg_serial_init_leon
properties properties
Source_Language => C; Source_Language => (C);
Source_Name => "__po_hi_c_driver_serial_leon_init"; Source_Name => "__po_hi_c_driver_serial_leon_init";
end spg_serial_init_leon; end spg_serial_init_leon;
subprogram spg_serial_init_leon_sender subprogram spg_serial_init_leon_sender
properties properties
Source_Language => C; Source_Language => (C);
Source_Name => "__po_hi_c_driver_serial_leon_init_sender"; Source_Name => "__po_hi_c_driver_serial_leon_init_sender";
end spg_serial_init_leon_sender; end spg_serial_init_leon_sender;
......
...@@ -104,7 +104,7 @@ public ...@@ -104,7 +104,7 @@ public
properties properties
Source_Name => "PolyORB_HI_Drivers_Native_UART.Initialize"; Source_Name => "PolyORB_HI_Drivers_Native_UART.Initialize";
Source_Language => Ada; Source_Language => (Ada);
end Initialize; end Initialize;
------------- -------------
...@@ -117,7 +117,7 @@ public ...@@ -117,7 +117,7 @@ public
properties properties
Source_Name => "PolyORB_HI_Drivers_Native_UART.Receive"; Source_Name => "PolyORB_HI_Drivers_Native_UART.Receive";
Source_Language => Ada; Source_Language => (Ada);
end Receive; end Receive;
------------- -------------
...@@ -130,7 +130,7 @@ public ...@@ -130,7 +130,7 @@ public
properties properties
Source_Name => "PolyORB_HI_Drivers_Native_UART.Send"; Source_Name => "PolyORB_HI_Drivers_Native_UART.Send";
Source_Language => Ada; Source_Language => (Ada);
end Send; end Send;
end Native_UART; end Native_UART;
...@@ -5,39 +5,39 @@ with Deployment; ...@@ -5,39 +5,39 @@ with Deployment;
subprogram spg_1553_controller_rasta subprogram spg_1553_controller_rasta
properties properties
Source_Language => C; Source_Language => (C);
Source_Name => "__po_hi_c_driver_1553_rasta_controller"; Source_Name => "__po_hi_c_driver_1553_rasta_controller";
end spg_1553_controller_rasta; end spg_1553_controller_rasta;
subprogram spg_1553_poller_rasta_terminal subprogram spg_1553_poller_rasta_terminal
properties properties
Source_Language => C; Source_Language => (C);
Source_Name => "__po_hi_c_driver_1553_rasta_terminal_poller"; Source_Name => "__po_hi_c_driver_1553_rasta_terminal_poller";
end spg_1553_poller_rasta_terminal; end spg_1553_poller_rasta_terminal;
subprogram spg_1553_sender_rasta_controller subprogram spg_1553_sender_rasta_controller
properties properties
Source_Language => C; Source_Language => (C);
Source_Name => "__po_hi_c_driver_1553_rasta_sender_controller"; Source_Name => "__po_hi_c_driver_1553_rasta_sender_controller";
end spg_1553_sender_rasta_controller; end spg_1553_sender_rasta_controller;
subprogram spg_1553_sender_rasta_terminal subprogram spg_1553_sender_rasta_terminal
properties properties
Source_Language => C; Source_Language => (C);
Source_Name => "__po_hi_c_driver_1553_rasta_sender_terminal"; Source_Name => "__po_hi_c_driver_1553_rasta_sender_terminal";
end spg_1553_sender_rasta_terminal; end spg_1553_sender_rasta_terminal;
subprogram spg_1553_init_rasta_controller subprogram spg_1553_init_rasta_controller
properties properties
Source_Language => C; Source_Language => (C);
Source_Name => "__po_hi_c_driver_1553_rasta_init_controller"; Source_Name => "__po_hi_c_driver_1553_rasta_init_controller";
end spg_1553_init_rasta_controller; end spg_1553_init_rasta_controller;
subprogram spg_1553_init_rasta_terminal subprogram spg_1553_init_rasta_terminal
properties properties
Source_Language => C; Source_Language => (C);
Source_Name => "__po_hi_c_driver_1553_rasta_init_terminal"; Source_Name => "__po_hi_c_driver_1553_rasta_init_terminal";
end spg_1553_init_rasta_terminal; end spg_1553_init_rasta_terminal;
......
...@@ -8,14 +8,14 @@ with ocarina_drivers; ...@@ -8,14 +8,14 @@ with ocarina_drivers;
subprogram spg_serial_poller_rasta subprogram spg_serial_poller_rasta
properties properties
Source_Language => C; Source_Language => (C);
Source_Name => "__po_hi_c_driver_serial_rasta_poller"; Source_Name => "__po_hi_c_driver_serial_rasta_poller";
end spg_serial_poller_rasta; end spg_serial_poller_rasta;
subprogram spg_serial_sender_rasta subprogram spg_serial_sender_rasta
properties properties
Source_Language => C; Source_Language => (C);
Source_Name => "__po_hi_c_driver_serial_rasta_sender"; Source_Name => "__po_hi_c_driver_serial_rasta_sender";
end spg_serial_sender_rasta; end spg_serial_sender_rasta;
...@@ -24,7 +24,7 @@ end spg_serial_sender_rasta; ...@@ -24,7 +24,7 @@ end spg_serial_sender_rasta;
subprogram spg_serial_init_rasta subprogram spg_serial_init_rasta
properties properties
Source_Language => C; Source_Language => (C);
Source_Name => "__po_hi_c_driver_serial_rasta_init"; Source_Name => "__po_hi_c_driver_serial_rasta_init";
end spg_serial_init_rasta; end spg_serial_init_rasta;
......
...@@ -7,19 +7,19 @@ with Deployment; ...@@ -7,19 +7,19 @@ with Deployment;
subprogram spg_spacewire_poller_rasta subprogram spg_spacewire_poller_rasta
properties properties
Source_Language => C; Source_Language => (C);
Source_Name => "__po_hi_c_driver_spacewire_rasta_poller"; Source_Name => "__po_hi_c_driver_spacewire_rasta_poller";
end spg_spacewire_poller_rasta; end spg_spacewire_poller_rasta;
subprogram spg_spacewire_sender_rasta subprogram spg_spacewire_sender_rasta
properties properties
Source_Language => C; Source_Language => (C);
Source_Name => "__po_hi_c_driver_spacewire_rasta_sender"; Source_Name => "__po_hi_c_driver_spacewire_rasta_sender";
end spg_spacewire_sender_rasta; end spg_spacewire_sender_rasta;
subprogram spg_spacewire_init_rasta subprogram spg_spacewire_init_rasta
properties properties
Source_Language => C; Source_Language => (C);
Source_Name => "__po_hi_c_driver_spacewire_rasta_init"; Source_Name => "__po_hi_c_driver_spacewire_rasta_init";
end spg_spacewire_init_rasta; end spg_spacewire_init_rasta;
......
...@@ -7,19 +7,19 @@ with Deployment; ...@@ -7,19 +7,19 @@ with Deployment;
subprogram spg_poller subprogram spg_poller
properties properties
Source_Language => C; Source_Language => (C);
Source_Name => "__po_hi_c_driver_spacewire_scoc3_poller"; Source_Name => "__po_hi_c_driver_spacewire_scoc3_poller";
end spg_poller; end spg_poller;
subprogram spg_sender subprogram spg_sender
properties properties
Source_Language => C; Source_Language => (C);
Source_Name => "__po_hi_c_driver_spacewire_scoc3_sender"; Source_Name => "__po_hi_c_driver_spacewire_scoc3_sender";
end spg_sender; end spg_sender;
subprogram spg_init subprogram spg_init
properties properties
Source_Language => C; Source_Language => (C);
Source_Name => "__po_hi_c_driver_spacewire_scoc3_init"; Source_Name => "__po_hi_c_driver_spacewire_scoc3_init";
end spg_init; end spg_init;
......
...@@ -6,19 +6,19 @@ with Deployment; ...@@ -6,19 +6,19 @@ with Deployment;
subprogram spg_poller subprogram spg_poller
properties properties
Source_Language => C; Source_Language => (C);
Source_Name => "__po_hi_c_driver_spw_usb_brick_poller"; Source_Name => "__po_hi_c_driver_spw_usb_brick_poller";
end spg_poller; end spg_poller;
subprogram spg_sender subprogram spg_sender
properties properties
Source_Language => C; Source_Language => (C);
Source_Name => "__po_hi_c_driver_spw_usb_brick_sender"; Source_Name => "__po_hi_c_driver_spw_usb_brick_sender";
end spg_sender; end spg_sender;
subprogram spg_init subprogram spg_init
properties properties
Source_Language => C; Source_Language => (C);
Source_Name => "__po_hi_c_driver_spw_usb_brick_init"; Source_Name => "__po_hi_c_driver_spw_usb_brick_init";
end spg_init; end spg_init;
......
...@@ -7,33 +7,33 @@ with ocarina_drivers; ...@@ -7,33 +7,33 @@ with ocarina_drivers;
subprogram spg_serial_poller_linux subprogram spg_serial_poller_linux
properties properties
Source_Language => C; Source_Language => (C);
Source_Name => "__po_hi_c_driver_serial_linux_poller"; Source_Name => "__po_hi_c_driver_serial_linux_poller";
end spg_serial_poller_linux; end spg_serial_poller_linux;
subprogram spg_serial_sender_linux subprogram spg_serial_sender_linux
properties properties
Source_Language => C; Source_Language => (C);
Source_Name => "__po_hi_c_driver_serial_linux_sender"; Source_Name => "__po_hi_c_driver_serial_linux_sender";
end spg_serial_sender_linux; end spg_serial_sender_linux;
subprogram spg_serial_init_linux subprogram spg_serial_init_linux
properties properties
Source_Language => C; Source_Language => (C);
Source_Name => "__po_hi_c_driver_serial_linux_init"; Source_Name => "__po_hi_c_driver_serial_linux_init";
end spg_serial_init_linux; end spg_serial_init_linux;
subprogram spg_serial_init_linux_sender subprogram spg_serial_init_linux_sender
properties properties
Source_Language => C; Source_Language => (C);
Source_Name => "__po_hi_c_driver_serial_linux_init_sender"; Source_Name => "__po_hi_c_driver_serial_linux_init_sender";
end spg_serial_init_linux_sender; end spg_serial_init_linux_sender;
subprogram spg_serial_init_linux_receiver subprogram spg_serial_init_linux_receiver
properties properties
Source_Language => C; Source_Language => (C);
Source_Name => "__po_hi_c_driver_serial_linux_init_receiver"; Source_Name => "__po_hi_c_driver_serial_linux_init_receiver";
end spg_serial_init_linux_receiver; end spg_serial_init_linux_receiver;
......
...@@ -6,14 +6,14 @@ with ocarina_drivers; ...@@ -6,14 +6,14 @@ with ocarina_drivers;
subprogram spg_sockets_init subprogram spg_sockets_init
properties properties
Source_Language => C; Source_Language => (C);
Source_Name => "__po_hi_driver_sockets_init"; Source_Name => "__po_hi_driver_sockets_init";
end spg_sockets_init; end spg_sockets_init;
subprogram spg_eth_linux_sender subprogram spg_eth_linux_sender
properties properties
Source_Language => C;