https://gcc.gnu.org/bugzilla/show_bug.cgi?id=123000
--- Comment #3 from Andrew Pinski <pinskia at gcc dot gnu.org> ---
Reduced testcase (creduced did a decent job at reducing it):
```
BEGIN INT a;
MODE ITEM = STRUCT(REF ITEM b);
[a] ITEM d;
BEGIN STRING card, INT cp, CHAR c,
PROC e = VOID : IF cp = UPB card THEN IF c = "" THEN 1 FI FI;
BEGIN INT f;
f END END END
```
options: `-ftrivial-auto-var-init=zero -O1 -fstropping=upper`
We get:
```
In function ‘__algol68_main’:
a681: error: location references block not in block tree
&"numelems%"[0]
numelems%_32 = .DEFERRED_INIT (4, 2, &"numelems%"[0]);
a681: error: location references block not in block tree
&"index%"[0]
index%_33 = .DEFERRED_INIT (4, 2, &"index%"[0]);
a681: error: location references block not in block tree
&"elems%"[0]
elems%_34 = .DEFERRED_INIT (4, 2, &"elems%"[0]);
a681: error: location references block not in block tree
&"elem_offset%"[0]
elem_offset%_35 = .DEFERRED_INIT (4, 2, &"elem_offset%"[0]);
during GIMPLE pass: ssa
a681: internal compiler error: verify_gimple failed
0x2d99102 internal_error(char const*, ...)
../../gcc/diagnostic-global-context.cc:787
0x1764930 verify_gimple_in_cfg(function*, bool, bool)
../../gcc/tree-cfg.cc:5599
0x1586588 execute_function_todo
../../gcc/passes.cc:2097
0x1585220 do_per_function
../../gcc/passes.cc:1696
0x158676b execute_todo
../../gcc/passes.cc:2149
Please submit a full bug report, with preprocessed source (by using
-freport-bug).
Please include the complete backtrace with any bug report.
See <https://gcc.gnu.org/bugs/> for instructions.
```
