mirror of
				https://gitlab.com/freepascal.org/fpc/source.git
				synced 2025-11-04 08:19:36 +01:00 
			
		
		
		
	the syntax is exactly the same as for "external", except for
    the keyword. It is currently only active for Darwin targets.
    It should also work at least for Linux targets, but only with
    the GNU assembler (which is why it is not activated there)
  + test for this functionality
git-svn-id: trunk@12009 -
		
	
			
		
			
				
	
	
		
			17 lines
		
	
	
		
			195 B
		
	
	
	
		
			ObjectPascal
		
	
	
	
	
	
			
		
		
	
	
			17 lines
		
	
	
		
			195 B
		
	
	
	
		
			ObjectPascal
		
	
	
	
	
	
{ %target=darwin }
 | 
						|
 | 
						|
uses
 | 
						|
  sysutils;
 | 
						|
 | 
						|
var
 | 
						|
  res: longint;
 | 
						|
begin
 | 
						|
  res:=executeprocess('./tweaklib2','1');
 | 
						|
  if (res<>0) then
 | 
						|
    begin
 | 
						|
      writeln('error: ',res);
 | 
						|
      halt(1);
 | 
						|
    end;
 | 
						|
end.
 | 
						|
 |