paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-08-17 02:09:21 +02:00
Code Issues Packages Projects Releases Wiki Activity

startlazarus: use --pcp

Browse Source 
git-svn-id: trunk@31010 -
This commit is contained in:
mattias 2011-06-02 07:46:22 +00:00
parent a015faa28d
commit 78b7e56c20
2 changed files with 8 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
ide/idecmdline.pas
View File

@ -98,6 +98,13 @@ begin
end
else
begin
// pass these parameters to Lazarus
if LeftStr(Param,length(PrimaryConfPathOptShort))=PrimaryConfPathOptShort
then begin
SetPrimaryConfigPath(copy(Param,length(PrimaryConfPathOptShort)+1,length(Param)));
end;
// Do not add file to the parameter list
if not (Copy(Param,1,1) = '-') and (FileExistsUTF8(ExpandFileNameUTF8(Param))) then
begin

2
ide/lazconf.pp
View File

@ -108,7 +108,7 @@ function GetLibraryPrefix(TargetOS: string = ''): string;
function MakeStandardLibFilename(TargetOS, Filename: string): string;
// returns the standard file extension for compiled units (e.g '.ppu')
function GetDefaultCompiledUnitExt(FPCVersion, FPCRelease: integer): string;
function GetDefaultCompiledUnitExt({%H-}FPCVersion, {%H-}FPCRelease: integer): string;
function OSLocksExecutables: boolean;