freepascal.compiler/tests/tbs0259.pp

{ $OPT= -O1}

VAR time1,time2 : Real;
BEGIN
  time1 := 0;
  time2 := time1*time1;
END.