diff --git a/compiler/systems/i_win.pas b/compiler/systems/i_win.pas
index dce9e28d37..9f31acdbda 100644
--- a/compiler/systems/i_win.pas
+++ b/compiler/systems/i_win.pas
@@ -210,7 +210,7 @@ unit i_win;
             system       : system_i386_wince;
             name         : 'WinCE for i386';
             shortname    : 'WinCE';
-            flags        : [tf_files_case_aware,tf_has_dllscanner,tf_use_function_relative_addresses{,tf_winlikewidestring}];
+            flags        : [tf_files_case_aware,tf_use_function_relative_addresses{,tf_winlikewidestring},tf_smartlink_sections];
             cpu          : cpu_i386;
             unit_env     : '';
             extradefines : 'UNDER_CE;WINDOWS;UNICODE';
@@ -239,7 +239,7 @@ unit i_win;
             assemextern  : as_gas;
             link         : nil;
             linkextern   : nil;
-            ar           : ar_gnu_ar;
+            ar           : ar_gnu_ar_scripted;
             res          : res_gnu_windres;
             dbg          : dbg_stabs;
             script       : script_dos;
diff --git a/compiler/systems/t_win.pas b/compiler/systems/t_win.pas
index e292b4141a..50ac0709d6 100644
--- a/compiler/systems/t_win.pas
+++ b/compiler/systems/t_win.pas
@@ -1722,6 +1722,7 @@ initialization
   RegisterTarget(system_i386_win32_info);
   { WinCE }
   RegisterExternalLinker(system_i386_wince_info,TExternalLinkerWin);
+  RegisterInternalLinker(system_i386_wince_info,TInternalLinkerWin);
   RegisterImport(system_i386_wince,TImportLibWin);
   RegisterExport(system_i386_wince,TExportLibWin);
   RegisterDLLScanner(system_i386_wince,TDLLScannerWin);