Fix test for go32v2, by adding explicit loading of cpall unit

git-svn-id: trunk@36353 -

tests/test/tcpstr1.pp

@@ -1,6 +1,11 @@
 {$ifdef go32v2}
+  {$define USE_INTERNAL_UNICODE}
+{$endif}
+
+{$ifdef USE_INTERNAL_UNICODE}
   {$define USE_FPWIDESTRING_UNIT}
   {$define USE_UNICODEDUCET_UNIT}
+  {$define USE_CPALL_UNIT}
 {$endif}
 {$ifdef unix}
 uses
@@ -13,6 +18,9 @@ uses
  {$ifdef USE_UNICODEDUCET_UNIT}
   unicodeducet,
  {$endif}
+ {$ifdef USE_CPALL_UNIT}
+  cpall,
+ {$endif}
  { The unit strings is not really used here,
    but simpifies the conditional construction
    for fpwidestring and unicodeducet use }