This commit is contained in:
peter 1999-04-09 10:59:16 +00:00
parent ae6eb56352
commit 4c71171fa9
3 changed files with 5 additions and 5 deletions

View File

@ -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 .

View File

@ -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.

View File

@ -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