Commit 69a76113 authored by julien.delange's avatar julien.delange
Browse files

* integrate asn1scc.exe generated code in generated applications

   when using the -asn1 flag with polyorb_hi_c



git-svn-id: https://tecsw.estec.esa.int/svn/taste/trunk/ocarina@694 129961e7-ef38-4bb5-a8f7-c9a525a55882
parent 2531530d
...@@ -120,7 +120,7 @@ package body Ocarina.Backends.ASN1.Deployment is ...@@ -120,7 +120,7 @@ package body Ocarina.Backends.ASN1.Deployment is
begin begin
ASN1_Root := Make_ASN1_File ASN1_Root := Make_ASN1_File
(Make_Defining_Identifier (Make_Defining_Identifier
(Get_String_Name ("deployment"))); (Get_String_Name ("asn1_deployment")));
ASN1N.Set_Name ASN1N.Set_Name
(ASN1N.Module_Node (ASN1_Root), (ASN1N.Module_Node (ASN1_Root),
Get_String_Name ("POHIC-DEPLOYMENT")); Get_String_Name ("POHIC-DEPLOYMENT"));
......
...@@ -184,6 +184,11 @@ package body Ocarina.Backends.PO_HI_C is ...@@ -184,6 +184,11 @@ package body Ocarina.Backends.PO_HI_C is
Write_Eol; Write_Eol;
end if; end if;
if Generate_ASN1_Deployment then
Write_Str ("USE_ASN1_DEPLOYMENT = yes");
Write_Eol;
end if;
if Use_Simulink then if Use_Simulink then
Write_Str ("SIMULINK_DIR = "); Write_Str ("SIMULINK_DIR = ");
Write_Name (Simulink_Directory); Write_Name (Simulink_Directory);
...@@ -409,6 +414,15 @@ package body Ocarina.Backends.PO_HI_C is ...@@ -409,6 +414,15 @@ package body Ocarina.Backends.PO_HI_C is
return Add_Performance_Analysis; return Add_Performance_Analysis;
end Use_Performance_Analysis; end Use_Performance_Analysis;
-------------------------
-- Use_ASN1_Deployment --
-------------------------
function Use_ASN1_Deployment return Boolean is
begin
return Generate_ASN1_Deployment;
end Use_ASN1_Deployment;
--------------------------------- ---------------------------------
-- Visit_Architecture_Instance -- -- Visit_Architecture_Instance --
--------------------------------- ---------------------------------
......
...@@ -52,6 +52,10 @@ package Ocarina.Backends.PO_HI_C is ...@@ -52,6 +52,10 @@ package Ocarina.Backends.PO_HI_C is
function Use_Performance_Analysis return Boolean; function Use_Performance_Analysis return Boolean;
-- Specify if we use performance analysis or not. -- Specify if we use performance analysis or not.
function Use_ASN1_Deployment return Boolean;
-- Just returns a boolean to indicate if the user
-- wants the ASN1 deployment information.
private private
C_Root : Node_Id; C_Root : Node_Id;
-- The root of the C trees -- The root of the C trees
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment