diff options
author | michael <michael@3ad0048d-3df7-0310-abae-a5850022a9f2> | 2021-02-18 11:03:12 +0000 |
---|---|---|
committer | michael <michael@3ad0048d-3df7-0310-abae-a5850022a9f2> | 2021-02-18 11:03:12 +0000 |
commit | d66196301c471e0891c3cc0aa79c3d16c0474c80 (patch) | |
tree | 46d06da252c897e5f607940da94d48e863e3deff | |
parent | 57e11e16ac420d36d5996abda0e21bc604ff46e8 (diff) | |
download | fpc-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.inc | 2 |
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); |