From 5218ba932908666edeb01b478ab24df4a1263bea Mon Sep 17 00:00:00 2001 From: Arioch Date: Sat, 24 Jun 2017 01:33:09 +0300 Subject: [PATCH] #3 - fixing conditional compiling terms, however part of functionality would be lost for FB2.1+ --- source/uibase.pas | 2 +- source/uiblib.pas | 4 ++-- 2 files changed, 3 insertions(+), 3 deletions(-) diff --git a/source/uibase.pas b/source/uibase.pas index 9354e0c..6ebddb1 100644 --- a/source/uibase.pas +++ b/source/uibase.pas @@ -1548,7 +1548,7 @@ procedure ADD_SPB_NUMERIC(var p: PAnsiChar; data: Integer); isc_tpb_version3 = #3; isc_tpb_consistency = #1; isc_tpb_concurrency = #2; -{$IFNDEF FB_21UP} +{$IFNDEF FB21_UP} isc_tpb_shared = #3; isc_tpb_protected = #4; isc_tpb_exclusive = #5; diff --git a/source/uiblib.pas b/source/uiblib.pas index 0eab1e3..942d350 100644 --- a/source/uiblib.pas +++ b/source/uiblib.pas @@ -141,7 +141,7 @@ EUIBExceptionClass = class of EUIBError; { allows concurrent transactions to read and write shared data. } tpConcurrency, { Concurrent, shared access of a specified table among all transactions. } - {$IFNDEF FB_21UP} + {$IFNDEF FB21_UP} tpShared, { Concurrent, restricted access of a specified table. } tpProtected, @@ -1776,7 +1776,7 @@ function SQLUnQuote(const name: string): string; tpc: array[TTransParam] of AnsiChar = ( isc_tpb_consistency, isc_tpb_concurrency, - {$IFNDEF FB_21UP} + {$IFNDEF FB21_UP} isc_tpb_shared, isc_tpb_protected, isc_tpb_exclusive,