paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-28 22:20:19 +02:00
Code Issues Packages Projects Releases Wiki Activity

* expanded a ifdef mysql50 to 5.0 and 5.1. Mantis 0017661

Browse Source 
git-svn-id: trunk@17077 -
This commit is contained in:
marco 2011-03-05 00:25:10 +00:00
parent 9a722411ab
commit d08662c1ba
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
packages/fcl-db/src/sqldb/mysql/mysqlconn.inc
View File

@ -559,7 +559,7 @@ begin
NewType := ftInteger;
NewSize := 0;
end;
{$ifdef mysql50}
{$if defined(mysql51) or defined(mysql50)}
FIELD_TYPE_NEWDECIMAL,
{$endif}
FIELD_TYPE_DECIMAL: if ADecimals < 5 then
@ -867,7 +867,7 @@ begin
VL := 0;
Move(VL, Dest^, SizeOf(LargeInt));
end;
{$ifdef mysql50}
{$if defined(mysql51) or defined(mysql50)}
FIELD_TYPE_NEWDECIMAL,
{$endif}
FIELD_TYPE_DECIMAL, FIELD_TYPE_FLOAT, FIELD_TYPE_DOUBLE: