peter 26 years ago
parent
commit
4c71171fa9
3 changed files with 5 additions and 5 deletions
  1. 2 2
      bugs/bug0230.pp
  2. 2 2
      bugs/bug0236.pp
  3. 1 1
      bugs/readme.txt

+ 2 - 2
bugs/bug0230.pp

@@ -7,8 +7,8 @@ var
    e : extended;
    e : extended;
 
 
 begin
 begin
- e:=0.0;
+ e:=-1.0;
  writeln(ln(e));
  writeln(ln(e));
- writeln(ln(0));
+// writeln(ln(0));
  writeln(power(0,1.0));
  writeln(power(0,1.0));
 end .
 end .

+ 2 - 2
bugs/bug0236.pp

@@ -22,7 +22,7 @@ procedure test;
  
  
  begin
  begin
    new(hp);
    new(hp);
-   hp^.en:=two;
+   hp^.en:=zero;
    new(hp^.next);
    new(hp^.next);
    hp^.next^.en:=three;
    hp^.next^.en:=three;
    t:=hp^.en;
    t:=hp^.en;
@@ -32,4 +32,4 @@ procedure test;
 
 
 begin
 begin
   test;
   test;
-end.
+end.

+ 1 - 1
bugs/readme.txt

@@ -284,6 +284,7 @@ Fixed bugs:
   bug0231.pp   Problem with comments                                OK 0.99.11 (PFV)
   bug0231.pp   Problem with comments                                OK 0.99.11 (PFV)
   bug0233.pp   Problem with enum sets in args                       OK 0.99.11 (PFV)
   bug0233.pp   Problem with enum sets in args                       OK 0.99.11 (PFV)
   bug0235.pp   Val(cardinal) bug                                    OK 0.99.11 (JM)
   bug0235.pp   Val(cardinal) bug                                    OK 0.99.11 (JM)
+  bug0236.pp   Problem with range check of subsets !! compile with -Cr OK 0.99.11 (PFV)
 
 
 
 
 Unproducable bugs:
 Unproducable bugs:
@@ -319,4 +320,3 @@ bug0230.pp   several strange happen on the ln function: ln(0): no
 bug0232.pp   const. procedure variables need a special syntax
 bug0232.pp   const. procedure variables need a special syntax
              if they use calling specification modifiers
              if they use calling specification modifiers
 bug0234.pp   New with void pointer
 bug0234.pp   New with void pointer
-bug0236.pp   Problem with range check of subsets !! compile with -Cr