Eliminate make_cleanup_ui_file_delete / make ui_file a class hierarchy

[thirdparty/binutils-gdb.git] / gdb / guile / scm-frame.c

diff --git a/gdb/guile/scm-frame.c b/gdb/guile/scm-frame.c
index 9b5159e139b5f1dcea5ad78ce909a46b1e0303e6..994f92d41c8eef80aa7795379c1f9b2b2b6c3c38 100644 (file)
--- a/gdb/guile/scm-frame.c
+++ b/gdb/guile/scm-frame.c
@@ -156,15 +156,12 @@ static int
 frscm_print_frame_smob (SCM self, SCM port, scm_print_state *pstate)
 {
   frame_smob *f_smob = (frame_smob *) SCM_SMOB_DATA (self);
-  struct ui_file *strfile;
 
   gdbscm_printf (port, "#<%s ", frame_smob_name);
 
-  strfile = mem_fileopen ();
-  fprint_frame_id (strfile, f_smob->frame_id);
-  std::string s = ui_file_as_string (strfile);
-  gdbscm_printf (port, "%s", s.c_str ());
-  ui_file_delete (strfile);
+  string_file strfile;
+  fprint_frame_id (&strfile, f_smob->frame_id);
+  gdbscm_printf (port, "%s", strfile.c_str ());
 
   scm_puts (">", port);