/* Register groupings for GDB, the GNU debugger.
- Copyright (C) 2002, 2003, 2007, 2008 Free Software Foundation, Inc.
+ Copyright (C) 2002, 2003, 2007, 2008, 2009 Free Software Foundation, Inc.
Contributed by Red Hat.
reggroups_dump (current_gdbarch, gdb_stdout);
else
{
+ struct cleanup *cleanups;
struct ui_file *file = gdb_fopen (args, "w");
if (file == NULL)
perror_with_name (_("maintenance print reggroups"));
+ cleanups = make_cleanup_ui_file_delete (file);
reggroups_dump (current_gdbarch, file);
- ui_file_delete (file);
+ do_cleanups (cleanups);
}
}