Commit c39c7b34 by Dave Love

Layout change.

From-SVN: r19847
parent 1794ae47
......@@ -737,8 +737,9 @@ ffeste_io_dolio_ (ffebld expr)
num_elements = size_binop (CEIL_DIV_EXPR,
TYPE_SIZE (TREE_TYPE (TREE_TYPE (variable))), size);
num_elements = size_binop (CEIL_DIV_EXPR,
num_elements, size_int (TYPE_PRECISION
(char_type_node)));
num_elements,
size_int (TYPE_PRECISION
(char_type_node)));
num_elements = convert (ffecom_f2c_ftnlen_type_node,
num_elements);
}
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment