Bläddra i källkod

- svnmerge is a piece of crap; manually remove file
which should have been deleted by svnmerge.

git-svn-id: branches/fixes_2_2@7838 -

daniel 18 år sedan
förälder
incheckning
86195562a7
2 ändrade filer med 0 tillägg och 31 borttagningar
  1. 0 1
      .gitattributes
  2. 0 30
      tests/tbf/tb0201.pp

+ 0 - 1
.gitattributes

@@ -5679,7 +5679,6 @@ tests/tbf/tb0198.pp svneol=native#text/plain
 tests/tbf/tb0199.pp -text
 tests/tbf/tb0199.pp -text
 tests/tbf/tb0199a.pp -text
 tests/tbf/tb0199a.pp -text
 tests/tbf/tb0200.pp svneol=native#text/x-pascal
 tests/tbf/tb0200.pp svneol=native#text/x-pascal
-tests/tbf/tb0201.pp svneol=native#text/x-pascal
 tests/tbf/ub0115.pp svneol=native#text/plain
 tests/tbf/ub0115.pp svneol=native#text/plain
 tests/tbf/ub0149.pp svneol=native#text/plain
 tests/tbf/ub0149.pp svneol=native#text/plain
 tests/tbf/ub0158a.pp svneol=native#text/plain
 tests/tbf/ub0158a.pp svneol=native#text/plain

+ 0 - 30
tests/tbf/tb0201.pp

@@ -1,30 +0,0 @@
-program tb0201;
-
-{$mode objfpc}
-{$H-}
-{$Q+,R+}
-
-uses sysutils;
-
-var a:string;
-    b:string[63];
-    c:char;
-    w:word;
-
-begin
-  a:='';
-  b:='';
-  w:=257;
-  try
-    c:=a[w];
-    writeln('string[255] failure');
-    halt(1);
-  except
-  end;
-  try
-    c:=b[w];
-    writeln('string[63] failure');
-    halt(2);
-  except
-  end;
-end.