* Do not use console I/O in DLL on wince.

git-svn-id: trunk@10747 -

tests/webtbs/tw6822a.pp

@@ -6,5 +6,7 @@ uses
   uw6822a;
 
 begin
+{$ifndef wince}
   writeln('hello from library');
+{$endif wince}
 end.

tests/webtbs/uw6822a.pp

@@ -9,11 +9,15 @@ var
   t: text;
 
 initialization
+{$ifndef wince}
   writeln('Unit 1');
   writeln('initialization');
+{$endif wince}
 finalization
+{$ifndef wince}
   writeln('Unit 1'); // problem
   writeln('finalization'); 
+{$endif wince}
   assign(t,'uw6822a.txt');
   rewrite(t);
   close(t);