瀏覽代碼

* Darwin fixes. Untested on Darwin yet. (adding lib + name to external statements)

git-svn-id: trunk@804 -
marco 20 年之前
父節點
當前提交
40ff86dd59
共有 1 個文件被更改,包括 6 次插入4 次删除
  1. 6 4
      rtl/unix/cwstring.pp

+ 6 - 4
rtl/unix/cwstring.pp

@@ -38,6 +38,8 @@ Uses
   sysutils,
   initc;
 
+Const libiconvname = 'iconv';
+
 
 { Case-mapping "arrays" }
 var
@@ -85,10 +87,10 @@ type
   iconv_t = pointer;
   nl_item = longint;
 
-function nl_langinfo(__item:nl_item):pchar;cdecl;external;
-function iconv_open(__tocode:pchar; __fromcode:pchar):iconv_t;cdecl;external;
-function iconv(__cd:iconv_t; __inbuf:ppchar; __inbytesleft:psize_t; __outbuf:ppchar; __outbytesleft:psize_t):size_t;cdecl;external;
-function iconv_close(__cd:iconv_t):longint;cdecl;external;
+function nl_langinfo(__item:nl_item):pchar;cdecl;external libiconvname name 'nl_langinfo';
+function iconv_open(__tocode:pchar; __fromcode:pchar):iconv_t;cdecl;external libiconvname name 'iconv_open';
+function iconv(__cd:iconv_t; __inbuf:ppchar; __inbytesleft:psize_t; __outbuf:ppchar; __outbytesleft:psize_t):size_t;cdecl;external libiconvname name 'iconv';
+function iconv_close(__cd:iconv_t):longint;cdecl;external libiconvname name 'iconv_close';
 
 var
   iconv_ansi2wide,