Browse Source

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

git-svn-id: trunk@804 -
marco 20 years ago
parent
commit
40ff86dd59
1 changed files with 6 additions and 4 deletions
  1. 6 4
      rtl/unix/cwstring.pp

+ 6 - 4
rtl/unix/cwstring.pp

@@ -38,6 +38,8 @@ Uses
   sysutils,
   sysutils,
   initc;
   initc;
 
 
+Const libiconvname = 'iconv';
+
 
 
 { Case-mapping "arrays" }
 { Case-mapping "arrays" }
 var
 var
@@ -85,10 +87,10 @@ type
   iconv_t = pointer;
   iconv_t = pointer;
   nl_item = longint;
   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
 var
   iconv_ansi2wide,
   iconv_ansi2wide,