Commit c39c7b34 by Dave Love

Layout change.

From-SVN: r19847
parent 1794ae47
...@@ -737,8 +737,9 @@ ffeste_io_dolio_ (ffebld expr) ...@@ -737,8 +737,9 @@ ffeste_io_dolio_ (ffebld expr)
num_elements = size_binop (CEIL_DIV_EXPR, num_elements = size_binop (CEIL_DIV_EXPR,
TYPE_SIZE (TREE_TYPE (TREE_TYPE (variable))), size); TYPE_SIZE (TREE_TYPE (TREE_TYPE (variable))), size);
num_elements = size_binop (CEIL_DIV_EXPR, num_elements = size_binop (CEIL_DIV_EXPR,
num_elements, size_int (TYPE_PRECISION num_elements,
(char_type_node))); size_int (TYPE_PRECISION
(char_type_node)));
num_elements = convert (ffecom_f2c_ftnlen_type_node, num_elements = convert (ffecom_f2c_ftnlen_type_node,
num_elements); 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