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;
 
 begin
- e:=0.0;
+ e:=-1.0;
  writeln(ln(e));
- writeln(ln(0));
+// writeln(ln(0));
  writeln(power(0,1.0));
 end .

+ 2 - 2
bugs/bug0236.pp

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

+ 1 - 1
bugs/readme.txt

@@ -284,6 +284,7 @@ Fixed bugs:
   bug0231.pp   Problem with comments                                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)
+  bug0236.pp   Problem with range check of subsets !! compile with -Cr OK 0.99.11 (PFV)
 
 
 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
              if they use calling specification modifiers
 bug0234.pp   New with void pointer
-bug0236.pp   Problem with range check of subsets !! compile with -Cr