[Bug fortran/92006] storage_size() returns incorrect value on unlimited polymorphic variable (CLASS(*)) when passed a CHARACTER variable

[sgk at troutmask dot apl.washington.edu]

https://gcc.gnu.org/bugzilla/show_bug.cgi?id=92006

--- Comment #4 from Steve Kargl <sgk at troutmask dot apl.washington.edu> ---
On Tue, Oct 08, 2019 at 03:22:01AM +0000, urbanjost at comcast dot net wrote:
> https://gcc.gnu.org/bugzilla/show_bug.cgi?id=92006
> 
> --- Comment #3 from urbanjost at comcast dot net ---
> (In reply to kargl from comment #2)
> > Depends on, if not a duplicate, of 84006
> 
> 84006 is showing an ICE when calling STORAGE_SIZE() with an unallocated
> variable, which I believe is invalid code. This problem only occurs with an
> unlimited polymorphic variable that has been called with a CHARACTER variable,
> and produces an incorrect result, not an ICE. Is it certain the problems are
> related? If I change the CHARACTER variable to any other type including
> user-defined types I did not get a problem.
> 

I don't use CLASS.  I know nothing about CLASS or
how it's implemented.  I see only what is in bugzilla.
If someone fixes one problem, s/he might fix both.

Feel free to remove the link between the PRs.