!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(1:2)%var=mystruct(2:3)%varEND Program testcase_fold