* win32 doesn't like the lcomm with two parameters either

git-svn-id: trunk@6657 -

compiler/aggas.pas

@@ -609,7 +609,7 @@ implementation
                        asmwrite(#9'.lcomm'#9);
                        asmwrite(tai_datablock(hp).sym.name);
                        asmwrite(','+tostr(tai_datablock(hp).size));
-                       if not(target_info.system in [system_arm_linux]) then
+                       if not(target_info.system in [system_arm_linux,system_i386_win32]) then
                          asmwrite(','+tostr(last_align));
                        asmwriteln('');
                      end
@@ -625,7 +625,8 @@ implementation
                        asmwrite(#9'.comm'#9);
                        asmwrite(tai_datablock(hp).sym.name);
                        asmwrite(','+tostr(tai_datablock(hp).size));
-                       asmwrite(','+tostr(last_align));
+                       if not(target_info.system in [system_arm_linux,system_i386_win32]) then
+                         asmwrite(','+tostr(last_align));
                        asmwriteln('');
                      end
                    else
@@ -633,7 +634,7 @@ implementation
                        asmwrite(#9'.lcomm'#9);
                        asmwrite(tai_datablock(hp).sym.name);
                        asmwrite(','+tostr(tai_datablock(hp).size));
-                       if not(target_info.system in [system_arm_linux]) then
+                       if not(target_info.system in [system_arm_linux,system_i386_win32]) then
                          asmwrite(','+tostr(last_align));
                        asmwriteln('');
                      end;