summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authormichael <michael@3ad0048d-3df7-0310-abae-a5850022a9f2>2021-02-18 10:59:39 +0000
committermichael <michael@3ad0048d-3df7-0310-abae-a5850022a9f2>2021-02-18 10:59:39 +0000
commitf0c99126b560f8aa340b3df75d9d7e50ba45601c (patch)
treee0b0311f3667fdaa0d4f1d9af946e34321989bce
parent829ac4a7769f5360c4097f876cd12cb7e5acd396 (diff)
downloadfpc-f0c99126b560f8aa340b3df75d9d7e50ba45601c.tar.gz
* Fix missing ftLongWord
git-svn-id: https://svn.freepascal.org/svn/fpc/branches/fixes_3_2@48708 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);