gdb/fortran: Introduce fortran-operator.def file
[deliverable/binutils-gdb.git] / gdb / f-valprint.c
index 5f9dd4dedb8453ce2a6b66bf5a3271ba1304d5c1..37b0ed5176de88f3d9817705d8051acc2795035b 100644 (file)
@@ -407,17 +407,17 @@ info_common_command_for_block (const struct block *block, const char *comname,
            printf_filtered ("%s = ",
                             SYMBOL_PRINT_NAME (common->contents[index]));
 
-           TRY
+           try
              {
                val = value_of_variable (common->contents[index], block);
                value_print (val, gdb_stdout, &opts);
              }
 
-           CATCH (except, RETURN_MASK_ERROR)
+           catch (const gdb_exception_error &except)
              {
-               printf_filtered ("<error reading variable: %s>", except.message);
+               printf_filtered ("<error reading variable: %s>",
+                                except.what ());
              }
-           END_CATCH
 
            putchar_filtered ('\n');
          }
This page took 0.03378 seconds and 4 git commands to generate.