Frac/Int problem

[Kevin A. Foss]

Hello again,
        I was trying the latest alpha and trying to get the new
int/frac functions to work, however the first piece of code I tried
caused gpc to dump core :(

program test(output);

begin
        writeln(frac(3.14));
end.

As does running frac on a declared const:
const
        r = 3.14;
begin
        writeln(frac(r));
end.

It works fine if I run frac across a variable real tho:
var
        r : real VALUE 3.14;
begin
        writeln(frac(r));
end.

Similiar results with int().

-Kevin
--
Kevin A. Foss   ---   kfoss at mint.net
--