pierre пре 26 година
родитељ
комит
bf4e54eaa4
2 измењених фајлова са 24 додато и 3 уклоњено
  1. 18 0
      bugs/bug0257.pp
  2. 6 3
      bugs/readme.txt

+ 18 - 0
bugs/bug0257.pp

@@ -0,0 +1,18 @@
+{$mode tp}
+
+type proc = procedure(a : longint);
+procedure test(b : longint);
+begin
+  Writeln('Test ',b);
+end;
+
+var
+  t : proc;
+
+begin
+  t:=test;
+  t:=proc(test);
+  test(3);
+  t(5);
+end.
+

+ 6 - 3
bugs/readme.txt

@@ -308,6 +308,10 @@ Fixed bugs:
   bug0250.pp   error with Ansistrings and loops.                    OK 0.99.11 (PFV)
   bug0251.pp   typed const are not aligned correctly                OK 0.99.11 (PM)
   bug0253.pp   problem with overloaded procedures and forward       OK 0.99.11 (PFV)
+  bug0254.pp   problem of endless loop if string at end of main
+               file without new line.                               OK 0.99.11 (PM)
+  bug0256.pp   problem with conditionnals in TP mode                OK 0.99.11 (PM)
+  bug0257.pp   problem with procvars in tp mode                     OK 0.99.11 (PM)
 
 
 Unproducable bugs:
@@ -341,10 +345,9 @@ Unfixed bugs:
 bug0232.pp   const. procedure variables need a special syntax
              if they use calling specification modifiers
 bug0237.pp   Can't have sub procedures with names defined in interface
-bug0244.pp   nested procedures can't have same name as global ones
+bug0244.pp   nested procedures can't have same name as global ones (same as bug0237)
 bug0245.pp   assigning pointers to address of consts is allowed (refused by BP !)
 bug0246.pp   const para can be changed without error
 bug0252.pp   typecasting not possible within typed const
-bug0254.pp   problem of endless loop if string at end of main file without new line.
 bug0255.pp   internal error 10 with in and function calls
-bug0256.pp   problem with conditionnals in TP mode
+