aboutsummaryrefslogtreecommitdiff
path: root/gcc/fortran/trans.c
diff options
context:
space:
mode:
authorUros Bizjak <ubizjak@gmail.com>2014-12-31 15:50:10 +0100
committerUros Bizjak <uros@gcc.gnu.org>2014-12-31 15:50:10 +0100
commit1a33dc9ec24fed0406de07f54e0442915e3cfedb (patch)
tree5b0e17f5acd2cb905b0d28cea526ba21ab59c791 /gcc/fortran/trans.c
parente8ef82d74f40e216b3a1c9707a79a3bd0b6c953d (diff)
downloadgcc-1a33dc9ec24fed0406de07f54e0442915e3cfedb.zip
gcc-1a33dc9ec24fed0406de07f54e0442915e3cfedb.tar.gz
gcc-1a33dc9ec24fed0406de07f54e0442915e3cfedb.tar.bz2
trans-array.c (trans_array_bound_check): Use xasprintf instead of unchecked asprintf.
* trans-array.c (trans_array_bound_check): Use xasprintf instead of unchecked asprintf. (gfc_conv_array_ref): Ditto. (gfc_conv_ss_startstride): Ditto. (gfc_trans_dummy_array_bias): Ditto. (gfc_conv_array_parameter): Ditto. * trans-decl.c (gfc_generate_function_code): Ditto. * trans-expr.c (gfc_conv_substring): Ditto. (gfc_conv_procedure_call): Ditto. * trans-io.c (gfc_trans_io_runtime_check): Ditto. (set_string): Ditto. * trans.c (trans-runtime_error_vararg): Ditto. From-SVN: r219126
Diffstat (limited to 'gcc/fortran/trans.c')
-rw-r--r--gcc/fortran/trans.c10
1 files changed, 5 insertions, 5 deletions
diff --git a/gcc/fortran/trans.c b/gcc/fortran/trans.c
index 7c54b8e..af6830c 100644
--- a/gcc/fortran/trans.c
+++ b/gcc/fortran/trans.c
@@ -418,18 +418,18 @@ trans_runtime_error_vararg (bool error, locus* where, const char* msgid,
if (where)
{
line = LOCATION_LINE (where->lb->location);
- asprintf (&message, "At line %d of file %s", line,
- where->lb->file->filename);
+ message = xasprintf ("At line %d of file %s", line,
+ where->lb->file->filename);
}
else
- asprintf (&message, "In file '%s', around line %d",
- gfc_source_file, LOCATION_LINE (input_location) + 1);
+ message = xasprintf ("In file '%s', around line %d",
+ gfc_source_file, LOCATION_LINE (input_location) + 1);
arg = gfc_build_addr_expr (pchar_type_node,
gfc_build_localized_cstring_const (message));
free (message);
- asprintf (&message, "%s", _(msgid));
+ message = xasprintf ("%s", _(msgid));
arg2 = gfc_build_addr_expr (pchar_type_node,
gfc_build_localized_cstring_const (message));
free (message);