* Minor reformatting

examples/aadlv2/producer-consumer/software.aadl

@@ -2,73 +2,73 @@ package Software
 public
   with Data_Model;
 
-----------
--- Data --
-----------
+  ----------
+  -- Data --
+  ----------
 
-data Alpha_Type
-properties
+  data Alpha_Type
+  properties
     Data_Model::Data_Representation => integer;
-end Alpha_Type;
+  end Alpha_Type;
 
------------------
--- Subprograms --
------------------
+  -----------------
+  -- Subprograms --
+  -----------------
 
-subprogram Produce_Spg
-features
+  subprogram Produce_Spg
+  features
     Data_Source : out parameter Alpha_Type;
-properties
-  source_language => C;
-  source_name     => "user_produce_spg";
-  source_text     => ("producer-consumer.c");
-end Produce_Spg;
+  properties
+    Source_Language => C;
+    Source_Name     => "user_produce_spg";
+    Source_Text     => ("producer-consumer.c");
+  end Produce_Spg;
 
-subprogram Consume_Spg
-features
+  subprogram Consume_Spg
+  features
     Data_Sink : in parameter Alpha_Type;
-properties
-  source_language => C;
-  source_name     => "user_consume_spg";
-  source_text     => ("producer-consumer.c");
-end Consume_Spg;
+  properties
+    Source_Language => C;
+    Source_Name     => "user_consume_spg";
+    Source_Text     => ("producer-consumer.c");
+  end Consume_Spg;
 
--------------
--- Threads --
--------------
+  -------------
+  -- Threads --
+  -------------
 
-thread P
-features
+  thread P
+  features
     Data_Source : out data port Alpha_Type;
-end P;
+  end P;
 
-thread implementation P.Impl
-calls
-Mycalls: {
+  thread implementation P.Impl
+  calls
+    Mycalls: {
     P_Spg : subprogram Produce_Spg;
-};
-connections
+    };
+  connections
     parameter P_Spg.Data_Source -> Data_Source;
-properties
+  properties
     Dispatch_Protocol => Periodic;
-  Period            => 200 Ms;
-end P.Impl;
+    Period            => 200 ms;
+  end P.Impl;
 
-thread Q
-features
+  thread Q
+  features
     Data_Sink : in data port Alpha_Type;
-end Q;
+  end Q;
 
-thread implementation Q.Impl
-calls
-Mycalls: {
+  thread implementation Q.Impl
+  calls
+    Mycalls: {
     Q_Spg : subprogram Consume_Spg;
-};
-connections
+    };
+  connections
     parameter Data_Sink -> Q_Spg.Data_Sink;
-properties
+  properties
     Dispatch_Protocol => Periodic;
-  Period            => 100 Ms;
-end Q.Impl;
+    Period            => 100 ms;
+  end Q.Impl;
 
 end Software;