diff options
Diffstat (limited to 'gdb/f-lang.c')
| -rw-r--r-- | gdb/f-lang.c | 8 |
1 files changed, 8 insertions, 0 deletions
diff --git a/gdb/f-lang.c b/gdb/f-lang.c index 16ec9e0..869a95d 100644 --- a/gdb/f-lang.c +++ b/gdb/f-lang.c @@ -103,6 +103,14 @@ f_language::get_encoding (struct type *type) +struct value * +f_language::value_string (struct gdbarch *gdbarch, + const char *ptr, ssize_t len) const +{ + struct type *type = language_string_char_type (this, gdbarch); + return ::value_string (ptr, len, type); +} + /* A helper function for the "bound" intrinsics that checks that TYPE is an array. LBOUND_P is true for lower bound; this is used for the error message, if any. */ |