paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-18 18:49:27 +02:00
Code Issues Packages Projects Releases Wiki Activity

* reverted to $ifdef style, so 1.0.x can eat it.

Browse Source
This commit is contained in:
olle 2004-09-19 08:16:03 +00:00
parent afdd6dcf1a
commit d4635112e4
1 changed files with 18 additions and 9 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

27
rtl/inc/cmem.pp
View File

@ -19,16 +19,22 @@ unit cmem;
interface interface
Const Const
{$if defined(win32)} {$ifndef win32}
LibName = 'msvcrt'; {$ifdef netware}
{$elseif defined(netware)}
LibName = 'clib'; LibName = 'clib';
{$elseif defined(netwlibc)} {$else}
LibName = 'libc'; {$ifdef netwlibc}
{$elseif defined(macos)} LibName = 'libc';
LibName = 'StdCLib'; {$else}
{$ifdef macos}
LibName = 'StdCLib';
{$else}
LibName = 'c';
{$endif macos}
{$endif netwlibc}
{$endif}
{$else} {$else}
LibName = 'c'; LibName = 'msvcrt';
{$endif} {$endif}
Function Malloc (Size : ptrint) : Pointer; {$ifdef win32}stdcall{$else}cdecl{$endif}; external LibName name 'malloc'; Function Malloc (Size : ptrint) : Pointer; {$ifdef win32}stdcall{$else}cdecl{$endif}; external LibName name 'malloc';
@ -167,7 +173,10 @@ end.
{ {
$Log$ $Log$
Revision 1.7 2004-09-18 08:40:26 olle Revision 1.8 2004-09-19 08:16:03 olle
* reverted to $ifdef style, so 1.0.x can eat it.
Revision 1.7 2004/09/18 08:40:26 olle
+ added support for macos + added support for macos
Revision 1.6 2004/09/15 20:37:42 armin Revision 1.6 2004/09/15 20:37:42 armin