https://gcc.gnu.org/bugzilla/show_bug.cgi?id=124411
Bug ID: 124411
Summary: Multiple is not initialized to all zero values
(complex multiple)
Product: gcc
Version: 16.0
Status: UNCONFIRMED
Severity: normal
Priority: P3
Component: algol68
Assignee: algol68 at gcc dot gnu.org
Reporter: jpl.algol68 at gmail dot com
Target Milestone: ---
A multiple of mode complex is not initialized to have all zero values.
Code example showing behavior:
begin
int n:=2**4;
[0:n-1] compl x;
for i from Lwb x to Upb x do
puts(("i: " + whole(i, 3) + " x: " + "(" +
fixed(re'x[i], 12, 8) + ", " + fixed(im'x[i], 12, 8) + ")'n"))
od
end
Sometimes running the executable produces zero values. But, re-running will
produce non-zero values. Example output (on running the third time):
i: +0 x: ( +0.00000000, +0.00000000)
i: +1 x: ( -0.00000000, +0.00000000)
i: +2 x: ( +0.00000000, +0.00000000)
i: +3 x: ( -0.00000000, +0.00000000)
i: +4 x: ( -0.00000000, +0.00000000)
i: +5 x: ( +1510968.923, +0.00000000)
i: +6 x: ( +1510968.446, +0.00000000)
i: +7 x: ( +0.00000000, +0.00000000)
i: +8 x: ( +0.00000000, +0.00000000)
i: +9 x: ( +0.00000000, +0.00000000)
i: +10 x: ( +0.00000000, +0.00000000)
i: +11 x: ( +0.00000000, +0.00000000)
i: +12 x: ( +1510996.103, +0.00000000)
i: +13 x: ( +1510995.006, +0.00000000)
i: +14 x: ( +1510968.446, +0.00000000)
i: +15 x: ( -0.00000000, +0.00000000)
