blob: b2f5fc1f83d9ed610a1aee86f0f30b273a32ec31 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
|
{ %CPU=i386 }
{ %OPT= -O1 }
{ Old file: tbs0259.pp }
{ problem with optimizer for real math (use -O1) OK 0.99.12 (PM) }
{ -O1 is not allowed for m68k }
VAR time1,time2 : Real;
BEGIN
time1 := 0;
time2 := time1*time1;
END.
|
