bsc-pm / mcxx

Mercurium is a C/C++/Fortran source-to-source compilation infrastructure aimed at fast prototyping developed by the Programming Models group at the Barcelona Supercomputing Center
GNU Lesser General Public License v3.0
70 stars 23 forks source link

mfc class and self not supported #30

Open rupertford opened 6 years ago

rupertford commented 6 years ago
function get_tmask(self) result(tmask)
  implicit none
  class (grid_type), target, intent(in) :: self
  integer, pointer :: tmask(:,:)
  tmask => self%tmask
  return
end function get_tmask
grid_mod.f90:3:3: error: sorry: CLASS type-specifier not implemented
grid_mod.f90:5:12: error: entity 'self' does not have any IMPLICIT type