Explorar el Código

* the test made compilable also on other platforms than only Unix and Windows

git-svn-id: trunk@29699 -
Tomas Hajny hace 10 años
padre
commit
e1b37dcc46
Se han modificado 1 ficheros con 2 adiciones y 4 borrados
  1. 2 4
      tests/webtbs/tw6822b.pp

+ 2 - 4
tests/webtbs/tw6822b.pp

@@ -12,12 +12,10 @@ var
 const
 const
 {$ifdef unix}
 {$ifdef unix}
 libname = './libtw6822a.'+SharedSuffix;
 libname = './libtw6822a.'+SharedSuffix;
+{$else unix}
+libname = 'tw6822a.' + SharedSuffix;
 {$endif unix}
 {$endif unix}
 
 
-{$ifdef windows}
-libname = 'tw6822a.dll';
-{$endif windows}
-
 begin
 begin
   writeln('hello from loader program');
   writeln('hello from loader program');
   h:= loadlibrary(libname);
   h:= loadlibrary(libname);