Commit 8e421af9 by Francois-Xavier Coudert Committed by François-Xavier Coudert

re PR fortran/47552 (CTIME: Valgrind warning "depends on uninitialised value")

        PR fortran/47552
        * trans-intrinsic.c (gfc_conv_intrinsic_ctime): Fix type of
        the string length variable.

From-SVN: r170898
parent b057bff4
2011-03-12 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org>
PR fortran/47552
* trans-intrinsic.c (gfc_conv_intrinsic_ctime): Fix type of
the string length variable.
2011-03-11 Janus Weil <janus@gcc.gnu.org> 2011-03-11 Janus Weil <janus@gcc.gnu.org>
PR fortran/47768 PR fortran/47768
......
...@@ -1501,7 +1501,7 @@ gfc_conv_intrinsic_ctime (gfc_se * se, gfc_expr * expr) ...@@ -1501,7 +1501,7 @@ gfc_conv_intrinsic_ctime (gfc_se * se, gfc_expr * expr)
args = XALLOCAVEC (tree, num_args); args = XALLOCAVEC (tree, num_args);
var = gfc_create_var (pchar_type_node, "pstr"); var = gfc_create_var (pchar_type_node, "pstr");
len = gfc_create_var (gfc_get_int_type (8), "len"); len = gfc_create_var (gfc_charlen_type_node, "len");
gfc_conv_intrinsic_function_args (se, expr, &args[2], num_args - 2); gfc_conv_intrinsic_function_args (se, expr, &args[2], num_args - 2);
args[0] = gfc_build_addr_expr (NULL_TREE, var); args[0] = gfc_build_addr_expr (NULL_TREE, var);
......
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