diff options
| author | fxcoudert <fxcoudert@138bc75d-0d04-0410-961f-82ee72b054a4> | 2008-02-25 08:36:15 +0000 |
|---|---|---|
| committer | fxcoudert <fxcoudert@138bc75d-0d04-0410-961f-82ee72b054a4> | 2008-02-25 08:36:15 +0000 |
| commit | 8fb9e3cd1dcb3f648e4f51eaf6d8bb8dd22f088e (patch) | |
| tree | 762dc6796ed285b4d67938d43837434f3b44d4b8 /gcc/fortran/trans-const.h | |
| parent | 93635a8e9b9cb89e9d8282143c0fa55644732326 (diff) | |
| download | gcc-8fb9e3cd1dcb3f648e4f51eaf6d8bb8dd22f088e.tar.gz | |
PR fortran/34729
* trans-const.c (gfc_build_string_const): Don't call gettext.
(gfc_build_localized_string_const): New function.
* trans-const.h (gfc_build_localized_string_const): New prototype.
* trans.c (gfc_trans_runtime_check): Use
gfc_build_localized_string_const instead of gfc_build_string_const.
(gfc_call_malloc): Likewise.
(gfc_allocate_with_status): Likewise.
(gfc_allocate_array_with_status): Likewise.
(gfc_deallocate_with_status): Likewise.
(gfc_call_realloc): Likewise.
* trans-io.c (gfc_trans_io_runtime_check): Likewise.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@132612 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/fortran/trans-const.h')
| -rw-r--r-- | gcc/fortran/trans-const.h | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/gcc/fortran/trans-const.h b/gcc/fortran/trans-const.h index 04b60cfa13d..808a1a5d6af 100644 --- a/gcc/fortran/trans-const.h +++ b/gcc/fortran/trans-const.h @@ -38,6 +38,7 @@ void gfc_conv_constant (gfc_se *, gfc_expr *); tree gfc_build_string_const (int, const char *); tree gfc_build_cstring_const (const char *); +tree gfc_build_localized_cstring_const (const char *); /* Translate a string constant for a static initializer. */ tree gfc_conv_string_init (tree, gfc_expr *); |