!This used to ICE as we chose the wrong type for the! temporary to hold type%var! fortran/18157program testcase_foldtype::structreal::var! its julian sec end type structtype(struct),dimension(:),pointer::mystructmystruct(:)%var=mystruct(:)%varEND Program testcase_fold