if (address_arg != NULL && source_arg != NULL)
error (_("Must specify at most one of -pc and -source"));
+ stdio_file arg_outfile;
+
if (argv[outfile_idx] != NULL)
{
char *outfile_name;
error (_("Junk at end of command"));
outfile_name = tilde_expand (argv[outfile_idx]);
make_cleanup (xfree, outfile_name);
- outfile = gdb_fopen (outfile_name, FOPEN_WT);
- if (outfile == NULL)
+ if (!arg_outfile.open (outfile_name, FOPEN_WT))
perror_with_name (outfile_name);
- make_cleanup_ui_file_delete (outfile);
+ outfile = &arg_outfile;
}
if (address_arg != NULL)
{
if (!printed_objfile_header)
{
- fprintf_filtered (outfile,
- "\nPartial symtabs for objfile %s\n",
- objfile_name (objfile));
+ outfile->printf ("\nPartial symtabs for objfile %s\n",
+ objfile_name (objfile));
printed_objfile_header = 1;
}
dump_psymtab (objfile, ps, outfile);
{
if (!printed_objfile_header)
{
- fprintf_filtered (outfile,
- "\nPartial symtabs for objfile %s\n",
- objfile_name (objfile));
+ outfile->printf ("\nPartial symtabs for objfile %s\n",
+ objfile_name (objfile));
printed_objfile_header = 1;
}
dump_psymtab (objfile, ps, outfile);
&& source_arg == NULL
&& objfile->psymtabs_addrmap != NULL)
{
- fprintf_filtered (outfile, "\n");
+ outfile->puts ("\n");
dump_psymtab_addrmap (objfile, NULL, outfile);
}
}