------- Comment #5 from hjl at lucon dot org  2006-05-18 22:21 -------
There are

   2042           /* Zero the first stride to indicate a temporary.  */
   2043           tmp = gfc_conv_descriptor_stride (info->descriptor,
gfc_rank_cst[0]);
   2044           gfc_add_modify_expr (&se->pre, tmp,
   2045                                convert (TREE_TYPE (tmp),
integer_zero_node));

in gfc_conv_function_call. Later transpose is called on it. But we never
restore the first stride.


-- 


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

Reply via email to