2
0
Эх сурвалжийг харах

* generate also external stubs for win32 without import section

git-svn-id: trunk@2303 -
peter 19 жил өмнө
parent
commit
c297cb1569
1 өөрчлөгдсөн 10 нэмэгдсэн , 2 устгасан
  1. 10 2
      compiler/psub.pas

+ 10 - 2
compiler/psub.pas

@@ -1469,8 +1469,16 @@ implementation
                     (pd.hasforward) and
                     not(
                         assigned(pd.import_dll) and
-                        (target_info.system in [system_i386_win32,system_i386_wdosx,
-                                                system_i386_emx,system_i386_os2,system_arm_wince,system_i386_wince])
+                        (
+                         (
+                          GenerateImportSection and
+                          (target_info.system in [system_i386_win32])
+                         ) or
+                         (
+                          target_info.system in [system_i386_wdosx,system_i386_emx,system_i386_os2,
+                                                 system_arm_wince,system_i386_wince]
+                         )
+                        )
                        ) then
                    begin
                      s:=proc_get_importname(pd);