1! RUN: bbc %s -o - | tco | FileCheck %s
2! RUN: %flang -emit-llvm -S -mmlir -disable-external-name-interop %s -o - | FileCheck %s
3
4  COMPLEX c
5  c%RE = 3.14
6  CALL sub(c)
7END
8
9! Verify that the offset in the struct does not regress from i32.
10! CHECK-LABEL: define void @_QQmain()
11! CHECK: getelementptr { float, float }, ptr %{{[0-9]+}}, i64 0, i32 0
12
13