diff -ur .\old\compiler/aggas.pas .\new\compiler/aggas.pas
--- .\old\compiler/aggas.pas	Wed Jun 13 13:47:08 2007
+++ .\new\compiler/aggas.pas	Wed Jun 13 14:01:42 2007
@@ -1005,6 +1005,7 @@
                      DoAssemble;
                      AsmCreate(tai_cutobject(hp).place);
                    end;
+                  CurrSecType:=sec_none;
                 { avoid empty files }
                   while assigned(hp.next) and (tai(hp.next).typ in [ait_cutobject,ait_section,ait_comment]) do
                    begin
diff -ur .\old\compiler/i386/ag386nsm.pas .\new\compiler/i386/ag386nsm.pas
--- .\old\compiler/i386/ag386nsm.pas	Tue Jun 12 18:15:58 2007
+++ .\new\compiler/i386/ag386nsm.pas	Wed Jun 13 14:02:38 2007
@@ -971,6 +971,7 @@
                     DoAssemble;
                     AsmCreate(tai_cutobject(hp).place);
                   end;
+                 lasTSectype:=sec_none;
                { avoid empty files }
                  while assigned(hp.next) and (tai(hp.next).typ in [ait_cutobject,ait_section,ait_comment]) do
                   begin
Only in .\new\compiler/i386: ag386nsm.pas.bak