* Skip UTF-8 BOM.

git-svn-id: trunk@10732 -

tests/utils/testu.pp

@@ -157,6 +157,8 @@ begin
   while not eof(t) do
    begin
      readln(t,s);
+     if Copy(s,1,3)=#$EF#$BB#$BF then
+       delete(s,1,3);
      if s<>'' then
       begin
         TrimB(s);