@@ -0,0 +1,9 @@
+{
+ No type declaration necessary ????
+}
+procedure p(handle1,handle2);
+begin
+end;
+
+end.
@@ -182,3 +182,4 @@ bug0131.pp internal error 10 with highdimension arrays
bug0132.pp segmentation fault with type loop
bug0133.pp object type declaration not 100% compatibile with TP7
bug0135.pp Unsupported subrange type construction.
+bug0136.pp No types necessary in the procedure header