* reverted merge of r19922, it fixes a bug in a commit that hasn't been

    merged yet (although strangely, there was no conflict when merging, only
    when reverse-merging). Fixes go32v2/windows regressions of tbs/tb0241b.pp,
    webtbs/tw7440.pp and tbs/tb0105.pp after r20427

git-svn-id: branches/fixes_2_6@20432 -

compiler/aggas.pas

@@ -782,6 +782,7 @@ implementation
                          sepChar := '@'
                        else
                          sepChar := '%';
+                       if (tf_needs_symbol_type in target_info.flags) then
                          asmwriteln(#9'.type '+Tai_datablock(hp).sym.name+','+sepChar+'object');
                        if (tf_needs_symbol_size in target_info.flags) and (tai_datablock(hp).size > 0) then
                          asmwriteln(#9'.size '+Tai_datablock(hp).sym.name+','+tostr(Tai_datablock(hp).size));