summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authormichael <michael@3ad0048d-3df7-0310-abae-a5850022a9f2>2021-02-18 11:03:12 +0000
committermichael <michael@3ad0048d-3df7-0310-abae-a5850022a9f2>2021-02-18 11:03:12 +0000
commitd66196301c471e0891c3cc0aa79c3d16c0474c80 (patch)
tree46d06da252c897e5f607940da94d48e863e3deff
parent57e11e16ac420d36d5996abda0e21bc604ff46e8 (diff)
downloadfpc-release_3_2_2_rc1.tar.gz
* Merging revisions 48708 from branches/fixes_3_2:release_3_2_2_rc1
------------------------------------------------------------------------ r48708 | michael | 2021-02-18 11:59:39 +0100 (Thu, 18 Feb 2021) | 1 line * Fix missing ftLongWord ------------------------------------------------------------------------ git-svn-id: https://svn.freepascal.org/svn/fpc/tags/release_3_2_2_rc1@48709 3ad0048d-3df7-0310-abae-a5850022a9f2
-rw-r--r--packages/fcl-db/src/sqldb/mysql/mysqlconn.inc2
1 files changed, 2 insertions, 0 deletions
diff --git a/packages/fcl-db/src/sqldb/mysql/mysqlconn.inc b/packages/fcl-db/src/sqldb/mysql/mysqlconn.inc
index f90fd9f310..13215f11b8 100644
--- a/packages/fcl-db/src/sqldb/mysql/mysqlconn.inc
+++ b/packages/fcl-db/src/sqldb/mysql/mysqlconn.inc
@@ -1232,11 +1232,13 @@ begin
VL := InternalStrToInt64(Source, Len);
Move(VL, Dest^, SizeOf(LargeInt));
end;
+{$IF FPC_FULLVERSION >=30301}
ftLongWord:
begin
VO := InternalStrToDWord(Source, Len);
Move(VO, Dest^, SizeOf(LongWord));
end;
+{$ENDIF}
ftFloat:
begin
VF := InternalStrToFloat(Source, Len);