paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-09-01 13:30:47 +02:00
Code Issues Packages Projects Releases Wiki Activity

* Changed to a more sensible and backwards comparible loading order

Browse Source 
git-svn-id: trunk@20059 -
This commit is contained in:
michael 2012-01-12 19:47:44 +00:00
parent 91a0c9d56e
commit 3d6e0dc570
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
packages/ibase/src/ibase60.inc
View File

@ -2647,9 +2647,9 @@ begin
end
else
begin
If (TryInitialiseIBase60(fbembedlib)=0) and
(TryInitialiseIBase60(fbclib)=0) and
(TryInitialiseIBase60(gdslib)=0) then
If (TryInitialiseIBase60(fbclib)=0) and
(TryInitialiseIBase60(gdslib)=0) and
(TryInitialiseIBase60(fbembedlib)=0) then
Raise EInOutError.CreateFmt(SErrDefaultsFailed,[fbembedlib,gdslib,fbclib]);
end;
Result := RefCount;