diff options
author | marco <marco@3ad0048d-3df7-0310-abae-a5850022a9f2> | 2011-09-02 20:25:48 +0000 |
---|---|---|
committer | marco <marco@3ad0048d-3df7-0310-abae-a5850022a9f2> | 2011-09-02 20:25:48 +0000 |
commit | 56c9af78855be93bf7a84e901fb5120f0fc381d7 (patch) | |
tree | 32c3fa0067654406003719c452cb2fd1725b5358 /packages/ibase | |
parent | 6f1decbd464962c8b3e4c309c99ada9e0d071f76 (diff) | |
download | fpc-56c9af78855be93bf7a84e901fb5120f0fc381d7.tar.gz |
* also test for fbembed in old "auto" initialization. Mantis #17664
git-svn-id: http://svn.freepascal.org/svn/fpc/trunk@18952 3ad0048d-3df7-0310-abae-a5850022a9f2
Diffstat (limited to 'packages/ibase')
-rw-r--r-- | packages/ibase/src/ibase60.inc | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/packages/ibase/src/ibase60.inc b/packages/ibase/src/ibase60.inc index 5bc668d3f6..ecbbf05225 100644 --- a/packages/ibase/src/ibase60.inc +++ b/packages/ibase/src/ibase60.inc @@ -2647,9 +2647,10 @@ begin end else begin - If (TryInitialiseIBase60(fbclib)=0) and + If (TryInitialiseIBase60(fbembedlib)=0) and + (TryInitialiseIBase60(fbclib)=0) and (TryInitialiseIBase60(gdslib)=0) then - Raise EInOutError.CreateFmt(SErrDefaultsFailed,[gdslib,fbclib]); + Raise EInOutError.CreateFmt(SErrDefaultsFailed,[fbembedlib,gdslib,fbclib]); end; Result := RefCount; end; |