Browse Source

tests: fix test for unixes

git-svn-id: trunk@19511 -
paul 13 years ago
parent
commit
f5d2c3a446
1 changed files with 6 additions and 0 deletions
  1. 6 0
      tests/test/tcpstr17.pp

+ 6 - 0
tests/test/tcpstr17.pp

@@ -5,6 +5,12 @@ program tcpstr17;
   {$codepage utf8}
 {$endif}
 {$apptype console}
+
+{$ifdef unix}
+uses
+  cwstring;
+{$endif}
+
 type
   TOEMStr = type AnsiString(866);
 {$ifndef FPC}