* forgotten part of r39750

git-svn-id: trunk@39752 -

compiler/x86_64/cgcpu.pas

@@ -277,6 +277,8 @@ unit cgcpu;
           list.insertafter(seh_proc,hitem)
         else
           list.insert(seh_proc);
+        { the directive creates another section }
+        inc(list.section_count);
         templist:=TAsmList.Create;
 
         { We need to record postive offsets from RSP; if registers are saved

compiler/x86_64/cpupi.pas

@@ -154,6 +154,7 @@ implementation
         hdir.data.flags:=unwindflags;
         list.concat(hdir);
         list.concat(cai_seh_directive.create(ash_handlerdata));
+        inc(list.section_count);
         list.concat(tai_const.create_32bit(scopecount));
         list.concatlist(scopes);
         { return to text, required for GAS compatibility }