[Bug testsuite/58851] FAIL: gfortran.dg/unlimited_polymorphic_13.f90 -O0 execution test

[sch...@linux-m68k.org]

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

--- Comment #13 from Andreas Schwab <sch...@linux-m68k.org> ---
     case (10)
      sz = storage_size(r3)*2