flang/test/Semantics/bind-c07.f90

   1 ! RUN: bbc -emit-fir -o - %s | FileCheck %s
   2
   3 module 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
   9 end module
  10
  11 ! CHECK-LABEL: _QMbind_c_typeE.di.t.tcptr