Parcourir la source

* handle also lines with spaces before the open brace

pierre il y a 22 ans
Parent
commit
4d4ae8d4fe
1 fichiers modifiés avec 1 ajouts et 0 suppressions
  1. 1 0
      tests/utils/testu.pp

+ 1 - 0
tests/utils/testu.pp

@@ -156,6 +156,7 @@ begin
      readln(t,s);
      if s<>'' then
       begin
+        TrimB(s);
         if s[1]='{' then
          begin
            delete(s,1,1);