paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-09-01 22:10:19 +02:00
Code Issues Packages Projects Releases Wiki Activity

* more "shared" fixes

Browse Source 
git-svn-id: trunk@2295 -
This commit is contained in:
marco 2006-01-15 14:56:20 +00:00
parent 77d20d988c
commit 768bf94a99
2 changed files with 7 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
rtl/bsd/i386/syscall.inc
View File

@ -31,6 +31,8 @@ These functions are the same over all three BSDs, except that some have a
{$DEFINE ErrnoWord} {$DEFINE ErrnoWord}
{$endif} {$endif}
Procedure fpc_geteipasebx;[external name 'fpc_geteipasebx'];
procedure actualsyscall; assembler; {inline requires a dummy push IIRC} procedure actualsyscall; assembler; {inline requires a dummy push IIRC}
asm asm
int $0x80 int $0x80

7
rtl/unix/cwstring.pp
View File

@ -26,7 +26,10 @@ implementation
{$linklib c} {$linklib c}
{$ifndef linux} // Linux (and maybe glibc platforms in general), have iconv in glibc. {$ifndef linux} // Linux (and maybe glibc platforms in general), have iconv in glibc.
{$linklib iconv} {$ifndef FreeBSD5}
{$linklib iconv}
{$define useiconv}
{$endif}
{$endif linux} {$endif linux}
Uses Uses
@ -38,7 +41,7 @@ Uses
initc; initc;
Const Const
{$ifdef Linux} {$ifndef useiconv}
libiconvname='c'; // is in libc under Linux. libiconvname='c'; // is in libc under Linux.
{$else} {$else}
libiconvname='iconv'; libiconvname='iconv';