[Bug fortran/58793] Wrong value for _vtab for intrinsic types with CLASS(*): storage_size of class(*) gives wrong result

[pault at gcc dot gnu.org]

http://gcc.gnu.org/bugzilla/show_bug.cgi?id=58793

--- Comment #5 from Paul Thomas <pault at gcc dot gnu.org> ---
Created attachment 31054
  --> http://gcc.gnu.org/bugzilla/attachment.cgi?id=31054&action=edit
Fix for the PR

This combines a rather obvious fix with Tobias' testcase.

I'll submit tomorrow.

Paul