Syntax modifications to compile Ocarina on Windows with MinGW

src/backends/ocarina-backends-deos_conf-partitions.adb

@@ -517,15 +517,13 @@ package body Ocarina.Backends.Deos_Conf.Partitions is
                  and then Get_Connection_Pattern (F) = Inter_Process
                then
 
-                  if Is_Data (F) and then not Is_Event (F)
-                  then
+                  if Is_Data (F) and then not Is_Event (F) then
                      Append_Node_To_List
                         (Map_Sampling_Port (F),
                         XTN.Subitems (Sampling_Ports));
                   end if;
 
-                  if Is_Data (F) and then Is_Event (F)
-                  then
+                  if Is_Data (F) and then Is_Event (F) then
                      Append_Node_To_List
                         (Map_Queuing_Port (F),
                         XTN.Subitems (Queuing_Ports));

src/backends/ocarina-backends-vxworks653_conf-connections.adb

@@ -183,8 +183,7 @@ package body Ocarina.Backends.Vxworks653_Conf.Connections is
       Feature := First_Node (Features (Corresponding_Process));
 
       while Present (Feature) loop
-         if Is_Data (Feature) and then Is_Out (Feature)
-         then
+         if Is_Data (Feature) and then Is_Out (Feature) then
             Port_Source := Feature;
             Port_Destination := Item (First_Node (Destinations (Feature)));
             Partition_Destination := Parent_Component (Port_Destination);

src/backends/ocarina-backends-vxworks653_conf-naming.adb

@@ -272,8 +272,7 @@ package body Ocarina.Backends.Vxworks653_Conf.Naming is
       Feature := First_Node (Features (Corresponding_Process));
 
       while Present (Feature) loop
-         if Is_Event (Feature) and then Is_Data (Feature)
-         then
+         if Is_Event (Feature) and then Is_Data (Feature) then
             Size := To_Bytes (Get_Data_Size
                         (Corresponding_Instance (Feature)));
             Queue_Size := Get_Queue_Size (Feature);
@@ -326,8 +325,7 @@ package body Ocarina.Backends.Vxworks653_Conf.Naming is
                                  XTN.Subitems (Ports_Node));
          end if;
 
-         if not Is_Event (Feature) and then Is_Data (Feature)
-         then
+         if not Is_Event (Feature) and then Is_Data (Feature) then
             Size := To_Bytes (Get_Data_Size
                         (Corresponding_Instance (Feature)));
 

tools/mknodes/parser.adb

@@ -1797,8 +1797,7 @@ package body Parser is
                Output_File := GNAT.OS_Lib.Standout;
 
             when 't' =>
-               if GNAT.Command_Line.Parameter = "python"
-               then
+               if GNAT.Command_Line.Parameter = "python" then
                   Target_Language := 2;
                end if;
 
@@ -2009,8 +2008,8 @@ package body Parser is
       end if;
 
       if Target_Language = 1 then
-          --  If the output is not the standard output, compute the spec
-          --  filename and redirect output.
+      --  If the output is not the standard output, compute the spec
+      --  filename and redirect output.
 
          if Output_Name /= Types.No_Name then
             Output_File :=
@@ -2037,8 +2036,8 @@ package body Parser is
       end if;
 
       if Target_Language = 2 then
-          --  If the output is not the standard output, compute the body
-          --  filename and redirect output.
+      --  If the output is not the standard output, compute the body
+      --  filename and redirect output.
 
          if Output_Name /= Types.No_Name then
             Output_Name := Utils.Remove_Suffix_From_Name (