mirror of
				https://gitlab.com/freepascal.org/fpc/source.git
				synced 2025-11-04 02:19:22 +01:00 
			
		
		
		
	* FPMake-option NoIDE added
git-svn-id: trunk@44152 -
This commit is contained in:
		
							parent
							
								
									39c48f0d01
								
							
						
					
					
						commit
						79bbc20f29
					
				@ -47,6 +47,7 @@ begin
 | 
			
		||||
end;
 | 
			
		||||
 | 
			
		||||
begin
 | 
			
		||||
  add_packages_comandlineoptions();
 | 
			
		||||
  add_fpc('');
 | 
			
		||||
  Installer.Run;
 | 
			
		||||
end.
 | 
			
		||||
 | 
			
		||||
@ -24,11 +24,16 @@ rm fpmake_proc.inc fpmake_add.inc ; /bin/ls -1 */fpmake.pp| while read file; do
 | 
			
		||||
 | 
			
		||||
{$include fpmake_proc.inc}
 | 
			
		||||
 | 
			
		||||
procedure add_packages(const ADirectory: string);
 | 
			
		||||
 | 
			
		||||
procedure add_packages_comandlineoptions();
 | 
			
		||||
begin
 | 
			
		||||
  AddCustomFpmakeCommandlineOption('data2inc', 'Use indicated data2inc executable.');
 | 
			
		||||
  AddCustomFpmakeCommandlineOption('genfpmkunit', 'Regenerate the fpmkunitsrc.inc file (fppkg).');
 | 
			
		||||
  add_ide_comandlineoptions();
 | 
			
		||||
end;
 | 
			
		||||
 | 
			
		||||
procedure add_packages(const ADirectory: string);
 | 
			
		||||
 | 
			
		||||
begin
 | 
			
		||||
 | 
			
		||||
{$include fpmake_add.inc}
 | 
			
		||||
 | 
			
		||||
@ -47,6 +52,7 @@ end;
 | 
			
		||||
 | 
			
		||||
{$ifdef no_parent}
 | 
			
		||||
begin
 | 
			
		||||
  add_packages_comandlineoptions();
 | 
			
		||||
  add_packages('');
 | 
			
		||||
  Installer.Run;
 | 
			
		||||
end.
 | 
			
		||||
 | 
			
		||||
@ -140,6 +140,15 @@ begin
 | 
			
		||||
    end;
 | 
			
		||||
end;
 | 
			
		||||
 | 
			
		||||
procedure add_ide_comandlineoptions();
 | 
			
		||||
begin
 | 
			
		||||
  AddCustomFpmakeCommandlineOption('CompilerTarget','Target CPU for the IDE''s compiler');
 | 
			
		||||
  AddCustomFpmakeCommandlineOption('NoGDB','If value=1 or ''Y'', no GDB support');
 | 
			
		||||
  AddCustomFpmakeCommandlineOption('NoGDBMI','If value=1 or ''Y'', explicitly disable GDB/MI option');
 | 
			
		||||
  AddCustomFpmakeCommandlineOption('GDBMI','If value=1 or ''Y'', builds IDE with GDB/MI support (no need for LibGDB)');
 | 
			
		||||
  AddCustomFpmakeCommandlineOption('NoIDE','If value=1 or ''Y'', the IDE will be skipped');
 | 
			
		||||
end;
 | 
			
		||||
 | 
			
		||||
procedure add_ide(const ADirectory: string);
 | 
			
		||||
 | 
			
		||||
Var
 | 
			
		||||
@ -150,12 +159,12 @@ Var
 | 
			
		||||
  s: string;
 | 
			
		||||
 | 
			
		||||
begin
 | 
			
		||||
  AddCustomFpmakeCommandlineOption('CompilerTarget','Target CPU for the IDE''s compiler');
 | 
			
		||||
  AddCustomFpmakeCommandlineOption('NoGDB','If value=1 or ''Y'', no GDB support');
 | 
			
		||||
  AddCustomFpmakeCommandlineOption('NOGDBMI','If value=1 or ''Y'', explicitly disable GDB/MI option');
 | 
			
		||||
  AddCustomFpmakeCommandlineOption('GDBMI','If value=1 or ''Y'', builds IDE with GDB/MI support (no need for LibGDB)');
 | 
			
		||||
  With Installer do
 | 
			
		||||
    begin
 | 
			
		||||
    s := GetCustomFpmakeCommandlineOptionValue('NoIDE');
 | 
			
		||||
    if (s='1') or (s='Y') then
 | 
			
		||||
      Exit;
 | 
			
		||||
 | 
			
		||||
    s := GetCustomFpmakeCommandlineOptionValue('NoGDB');
 | 
			
		||||
    if (s='1') or (s='Y') then
 | 
			
		||||
     NoGDBOption := true;
 | 
			
		||||
@ -319,6 +328,7 @@ end;
 | 
			
		||||
 | 
			
		||||
{$ifndef ALLPACKAGES}
 | 
			
		||||
begin
 | 
			
		||||
  add_ide_comandlineoptions();
 | 
			
		||||
  add_ide('');
 | 
			
		||||
  Installer.Run;
 | 
			
		||||
end.
 | 
			
		||||
 | 
			
		||||
		Loading…
	
		Reference in New Issue
	
	Block a user