Merged revisions 3976 via svnmerge from

svn+ssh://[email protected]/FPC/svn/fpc/trunk

........
r3976 | jonas | 2006-06-27 15:42:00 +0200 (Tue, 27 Jun 2006) | 3 lines

  * fixed interface wrappers for darwin in case they end up in
    a shared library

........

git-svn-id: branches/fixes_2_0@3977 -

compiler/powerpc/cgcpu.pas

@@ -2141,8 +2141,10 @@ const
           end
         { case 0 }
         else
-          list.concat(taicpu.op_sym(A_B,objectlibrary.newasmsymbol(procdef.mangledname,AB_EXTERNAL,AT_FUNCTION)));
-
+          if not(target_info.system = system_powerpc_darwin) then
+            list.concat(taicpu.op_sym(A_B,objectlibrary.newasmsymbol(procdef.mangledname,AB_EXTERNAL,AT_FUNCTION)))
+          else
+            list.concat(taicpu.op_sym(A_B,get_darwin_call_stub(procdef.mangledname)));
         List.concat(Tai_symbol_end.Createname(labelname));
       end;