Merged revisions 246,269 via svnmerge from

/trunk

git-svn-id: branches/fixes_2_0@347 -

.gitattributes

@@ -5910,6 +5910,7 @@ tests/webtbs/tw3973.pp svneol=native#text/plain
 tests/webtbs/tw3977.pp svneol=native#text/plain
 tests/webtbs/tw3977.txt svneol=native#text/plain
 tests/webtbs/tw4013.pp svneol=native#text/plain
+tests/webtbs/tw4055.pp svneol=native#text/plain
 tests/webtbs/tw4058.pp svneol=native#text/plain
 tests/webtbs/ub1873.pp svneol=native#text/plain
 tests/webtbs/ub1883.pp svneol=native#text/plain

.gitignore

@@ -0,0 +1,6 @@
+compiler/*.bak
+compiler/*.exe
+compiler/*.o
+compiler/*.ppu
+compiler/*.s
+compiler/*.tmp

tests/webtbs/tw4055.pp

@@ -0,0 +1,11 @@
+{$WRITEABLECONST OFF}
+
+procedure TestBuf(const Buf; Size: Integer);
+begin
+end;
+
+const A : Byte = 1;
+
+begin
+  TestBuf(A, 1);
+end.