Commit 3d04ddd5 authored by Maxime Perrotin's avatar Maxime Perrotin
Browse files

Add dump of deployment view with virtual processors

parent 3130ed89
......@@ -554,6 +554,15 @@ package body TASTE.Deployment_View is
& Partition.CPU_Platform'Img);
Put_Line (Output, " |_ CPU Classifier : "
& To_String (Partition.CPU_Classifier));
if Partition.VP_Name /= "" then
Put_Line (Output, " |_ VP Name : "
& To_String (Partition.VP_Name));
Put_Line (Output, " |_ VP Platform : "
& Partition.VP_Platform'Img);
Put_Line (Output, " |_ VP Classifier : "
& To_String (Partition.VP_Classifier));
end if;
Put (Output, " |_ Contains : ");
for Bounded of Partition.Bound_Functions loop
Put (Output, Bounded & " ");
......
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