* Now links to libdl on Unix platforms

* Adapted to fixed XSQLDA_LENGTH function in ibase60 unit

packages/ibase/testib60.pp

@@ -1,5 +1,9 @@
 program testib;
 
+{$IFDEF Unix}
+{$LINKLIB dl}
+{$ENDIF}
+
 uses Ibase60, strings;
 
 {$h-}
@@ -69,7 +73,7 @@ begin
     DoError(Status)
   else
     Writeln ('OK.');
-  getmem (sqlda,XSQLDA_Length*3);
+  getmem (sqlda,XSQLDA_Length(3));
   sqlda^.sqln:=3;
   sqlda^.sqld:=3;
   sqlda^.version:=1;
@@ -144,8 +148,4 @@ begin
     Writeln ('OK.')
   else
     doerror(status);
-end.  $Log$
-end.  Revision 1.2  2000-07-13 11:33:25  michael
-end.  + removed logs
-end. 
-}
+end.