tw20821.pp:

  * test program attached to the bug report was incorrectly transformed to a test for the test suite

git-svn-id: trunk@32962 -

tests/webtbs/tw20821.pp

@@ -8,7 +8,7 @@ begin
     halt(1);
   if b<>Byte(%10101010) then
     halt(1);
-  if b<>Byte(%10101010) then
+  if b<>%10101010 then
     halt(1);
   WriteLn('Ok');
 end.