* removed invalid code from proc_get_importname where the result could be empty

git-svn-id: trunk@6926 -

compiler/pdecsub.pas

@@ -2116,24 +2116,16 @@ const
                   need to use the normal name since to functions can refer to the
                   same DLL function. This is also needed for compatability
                   with Delphi and TP7 }
-                case target_info.system of
-                  system_i386_emx,
-                  system_i386_os2 :
-                    begin
-                      { keep normal mangledname }
-                    end;
-                  else
-                    if assigned(pd.import_name) then
-                      begin
-                        if target_info.system in system_all_windows then
-                          { cprefix is not used in DLL imports under Windows }
-                          result:=pd.import_name^
-                        else
-                          result:=maybe_cprefix(pd.import_name^);
-                      end
+                if assigned(pd.import_name) then
+                  begin
+                    if target_info.system in system_all_windows then
+                      { cprefix is not used in DLL imports under Windows }
+                      result:=pd.import_name^
                     else
-                      result:=ExtractFileName(pd.import_dll^)+'_index_'+tostr(pd.import_nr);
-                end;
+                      result:=maybe_cprefix(pd.import_name^);
+                  end
+                else
+                  result:=ExtractFileName(pd.import_dll^)+'_index_'+tostr(pd.import_nr);
               end
             else
               result:=maybe_cprefix(pd.import_name^);