* More fixes for wince exceptions. Debugging also work with internal linker now for wince.

git-svn-id: trunk@5127 -

compiler/pmodules.pas

@@ -225,7 +225,7 @@ implementation
 {$ifdef arm}
     procedure InsertPData;
       begin
-        new_section(current_asmdata.asmlists[al_globals],sec_pdata,'FPC_EH_PROLOG',sizeof(aint));
+        new_section(current_asmdata.asmlists[al_globals],sec_code,'FPC_EH_PROLOG',sizeof(aint),secorder_begin);
         current_asmdata.asmlists[al_globals].concat(Tai_const.Createname('_ARM_ExceptionHandler', 0));
         current_asmdata.asmlists[al_globals].concat(Tai_const.Create_32bit(0));
         current_asmdata.asmlists[al_globals].concat(Tai_symbol.Createname_global('FPC_EH_CODE_START',AT_DATA,0));

compiler/systems/t_win.pas

@@ -921,8 +921,6 @@ implementation
             Concat('IMAGEBASE $' + ibase);
             Concat('HEADER');
             Concat('EXESECTION .text');
-            if target_info.system=system_arm_wince then
-              Concat('  OBJSECTION .pdata.n_FPC_EH_PROLOG');
             Concat('  OBJSECTION .text*');
             Concat('  SYMBOL ___CTOR_LIST__');
             Concat('  SYMBOL __CTOR_LIST__');
@@ -1121,9 +1119,6 @@ implementation
             Add('  . = ALIGN(__section_alignment__);');
             Add('  .text  __image_base__ + ( __section_alignment__ < 0x1000 ? . : __section_alignment__ ) :');
             Add('  {');
-{$ifdef arm}
-            Add('    *(.pdata.n_FPC_EH_PROLOG)');
-{$endif arm}
             Add('    *(.init)');
             add('    *(.text .stub .text.* .gnu.linkonce.t.*)');
             Add('    *(SORT(.text$*))');