[fpc-devel] Sending a patch
Alexsander Rosa
alexsander.rosa at gmail.com
Fri Mar 17 16:00:14 CET 2006
What's the procedure for sending a patch? There are a few Delphi
functions I would like to add to FPC, like "StrToDateDef" and
"RoundTo". It seems the first must be added to
objpas/sysutils/dati.inc (probable close to StrToDate, at line 306);
I'm not sure about the second one.
I saw also that BoolToStr is different. In Delphi it is:
//--- Delphi's BoolToStr
function BoolToStr(B: Boolean; UseBoolStrs: Boolean = False): string;
If UseBoolStrs is false (the default), it returns '-1' for true and
'0' for false. If UseBoolStrs is true, it returns the strings 'TRUE'
and 'FALSE'. In Free Pascal there are 2 functions:
//--- in objpas/sysutils/sysstr.inc
function BoolToStr(B: Boolean): string;
begin
If B then
Result:='TRUE'
else
Result:='FALSE';
end;
//--- in ide/wutils
function BoolToStr(B: boolean; const TrueS, FalseS: string): string;
begin
if B then BoolToStr:=TrueS else BoolToStr:=FalseS;
end;
So a call to BoolStr(true) would return '-1' in Delphi and 'TRUE' in
FPC. I don't know if it was pointed before, and I agree that returning
'TRUE' makes a lot of sense, but when porting an application this may
lead to trouble.
About me: I code since 1989 (C/C++) and have been using Delphi since
1997 (I started in version 3.0). At the moment I'm porting a 150+ kloc
Delphi project to Lazarus.
--
Atenciosamente,
Alexsander da Rosa
More information about the fpc-devel
mailing list