diff options
Diffstat (limited to 'gdb/guile/scm-lazy-string.c')
| -rw-r--r-- | gdb/guile/scm-lazy-string.c | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/gdb/guile/scm-lazy-string.c b/gdb/guile/scm-lazy-string.c index a874e68..5dd386a 100644 --- a/gdb/guile/scm-lazy-string.c +++ b/gdb/guile/scm-lazy-string.c @@ -309,7 +309,7 @@ lsscm_safe_lazy_string_to_value (SCM string, int arg_pos, return NULL; } - TRY + try { struct type *type = tyscm_scm_to_type (ls_smob->type); struct type *realtype = check_typedef (type); @@ -336,12 +336,11 @@ lsscm_safe_lazy_string_to_value (SCM string, int arg_pos, break; } } - CATCH (except, RETURN_MASK_ALL) + catch (const gdb_exception_RETURN_MASK_ALL &except) { *except_scmp = gdbscm_scm_from_gdb_exception (except); return NULL; } - END_CATCH return value; } |