Browse Source

tests: fix test for unixes

git-svn-id: trunk@19511 -
paul 14 năm trước cách đây
mục cha
commit
f5d2c3a446
1 tập tin đã thay đổi với 6 bổ sung0 xóa
  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}