Commit b0bcca04 authored by Maxime Perrotin's avatar Maxime Perrotin
Browse files

Merge latest changes from master

parent 597f3103
...@@ -1053,13 +1053,12 @@ procedure BuildSupport is ...@@ -1053,13 +1053,12 @@ procedure BuildSupport is
Find_Connected_Bus (Tmp_CI, Accessed_Bus, Accessed_Port); Find_Connected_Bus (Tmp_CI, Accessed_Bus, Accessed_Port);
if Accessed_Bus /= No_Node and then if Accessed_Bus /= No_Node and then
Accessed_Port /= No_Node Accessed_Port /= No_Node and then
Associated_Processor_Name /= No_Name
then then
Accessed_Bus_Name := Name (Identifier (Accessed_Bus)); Accessed_Bus_Name := Name (Identifier (Accessed_Bus));
Accessed_Port_Name := Name (Identifier (Accessed_Port)); Accessed_Port_Name := Name (Identifier (Accessed_Port));
end if;
if Associated_Processor_Name /= No_Name then
C_New_Device C_New_Device
(Get_Name_String (Name (Identifier (Processes))), (Get_Name_String (Name (Identifier (Processes))),
Get_Name_String Get_Name_String
...@@ -1081,6 +1080,13 @@ procedure BuildSupport is ...@@ -1081,6 +1080,13 @@ procedure BuildSupport is
Get_Name_String (Device_ASN1_Module), Get_Name_String (Device_ASN1_Module),
Device_ASN1_Module_Len); Device_ASN1_Module_Len);
C_End_Device; C_End_Device;
else
Exit_On_Error (True,
"[ERROR] In your deployment view, check the connection of"
& " this driver: "
& Get_Name_String (Name (Identifier (Processes)))
& " - in processor "
& Get_Name_String (Associated_Processor_Name));
end if; end if;
end; end;
end if; end if;
......
...@@ -27,7 +27,8 @@ project BuildSupport is ...@@ -27,7 +27,8 @@ project BuildSupport is
"-gnatwa", "-gnatwa",
"-gnatoa", "-gnatoa",
"-gnatg", "-gnatg",
"-fstack-check"); "-fstack-check",
"-no-pie");
for Default_Switches ("C") use for Default_Switches ("C") use
("-g", ("-g",
...@@ -53,7 +54,8 @@ project BuildSupport is ...@@ -53,7 +54,8 @@ project BuildSupport is
"-Wno-error=old-style-cast", "-Wno-error=old-style-cast",
"-Wundef", "-Wundef",
"-std=c11", "-std=c11",
"-pedantic"); "-pedantic",
"-no-pie");
end Compiler; end Compiler;
end BuildSupport; end BuildSupport;
......
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