Преглед изворни кода

* generate the package stub for all Windows and NativeNT targets

git-svn-id: trunk@35373 -
svenbarth пре 8 година
родитељ
комит
cc42bb8a7a
1 измењених фајлова са 1 додато и 1 уклоњено
  1. 1 1
      compiler/pmodules.pas

+ 1 - 1
compiler/pmodules.pas

@@ -1666,7 +1666,7 @@ type
              { Note: all contained units are considered as used }
              { Note: all contained units are considered as used }
            end;
            end;
 
 
-         if target_info.system in systems_windows then
+         if target_info.system in systems_all_windows+systems_nativent then
            begin
            begin
              main_procinfo:=create_main_proc('_DLLMainCRTStartup',potype_pkgstub,current_module.localsymtable);
              main_procinfo:=create_main_proc('_DLLMainCRTStartup',potype_pkgstub,current_module.localsymtable);
              main_procinfo.code:=generate_pkg_stub(main_procinfo.procdef);
              main_procinfo.code:=generate_pkg_stub(main_procinfo.procdef);