1! RUN: bbc -emit-fir -o - %s | FileCheck %s 2 3module bind_c_type 4 use, intrinsic :: iso_c_binding 5 6 type, bind(C) :: t 7 type(c_ptr) :: tcptr = C_NULL_PTR 8 end type 9end module 10 11! CHECK-LABEL: _QMbind_c_typeE.di.t.tcptr 12