mirror of
				https://gitlab.com/freepascal.org/fpc/source.git
				synced 2025-11-04 10:59:41 +01:00 
			
		
		
		
	
		
			
				
	
	
		
			34 lines
		
	
	
		
			942 B
		
	
	
	
		
			PHP
		
	
	
	
	
	
			
		
		
	
	
			34 lines
		
	
	
		
			942 B
		
	
	
	
		
			PHP
		
	
	
	
	
	
{
 | 
						|
    This file is part of the Free Pascal run time library.
 | 
						|
    Copyright (c) 2001 by Free Pascal development team
 | 
						|
 | 
						|
    This file implements all the base types and limits required
 | 
						|
    for a minimal POSIX compliant subset required to port the compiler
 | 
						|
    to a new OS.
 | 
						|
 | 
						|
    See the file COPYING.FPC, included in this distribution,
 | 
						|
    for details about the copyright.
 | 
						|
 | 
						|
    This program is distributed in the hope that it will be useful,
 | 
						|
    but WITHOUT ANY WARRANTY; without even the implied warranty of
 | 
						|
    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
 | 
						|
 | 
						|
 **********************************************************************}
 | 
						|
 | 
						|
{Platform specific information}
 | 
						|
type
 | 
						|
  { fd are int in C also for 64bit targets (x86_64) }
 | 
						|
  THandle = Longint;
 | 
						|
{$ifdef darwin}
 | 
						|
  TThreadID = pointer;
 | 
						|
{$else}
 | 
						|
  TThreadID = longint;
 | 
						|
{$endif}
 | 
						|
  
 | 
						|
  { pthread_mutex_t }
 | 
						|
  PRTLCriticalSection = ^TRTLCriticalSection;
 | 
						|
  TRTLCriticalSection = {$i pmutext.inc}
 | 
						|
 | 
						|
 | 
						|
 |