3 ! PR 44929: [OOP] Parsing error of derived type name starting with 'REAL'
5 ! Contributed by Satish.BD <bdsatish@gmail.com>
9 class(real_type), allocatable :: obj
10 real(8), allocatable :: r8
12 allocate(real_type :: obj)
14 allocate( real(kind=8) :: r8)
15 allocate(real(8) :: r8 )