+ 147

bugs/bug0147.pp

@@ -0,0 +1,12 @@
+unit u;
+interface
+
+function b:boolean;
+
+implementation
+
+function b;
+begin
+end;
+
+end.

bugs/readme.txt

@@ -195,4 +195,4 @@ bug0143.pp   cannot concat string and array of char in $X+ mode
 bug0144.pp   problem with 'with object do'
 bug0145.pp   typed files with huges records (needs filerec.size:longint)
 bug0146.pp   no sizeof() for var arrays and the size is pushed incorrect
-
+bug0147.pp   function b; is not allowed in implementation