Add scm_t_dynwind_flags casts

There is a handful of calls to

  scm_dynwind_begin (0);

where the parameter is an enum, scm_t_dynwind_flags.  In C++, we have no
choice but to add an explicit cast, since there is no enum value that
represents 0 (no flags set).

gdb/ChangeLog:

	* guile/scm-breakpoint.c (gdbscm_set_breakpoint_stop_x): Add
	scm_t_dynwind_flags casts.
	* guile/scm-cmd.c (gdbscm_parse_command_name): Likewise.
	* guile/scm-ports.c (gdbscm_open_memory): Likewise.
	* guile/scm-value.c (gdbscm_value_to_string): Likewise.
This commit is contained in:
Simon Marchi 2015-10-27 09:34:30 -04:00
parent 70b8286a97
commit c6486df5f1
5 changed files with 13 additions and 5 deletions

View File

@ -1,3 +1,11 @@
2015-10-27 Simon Marchi <simon.marchi@polymtl.ca>
* guile/scm-breakpoint.c (gdbscm_set_breakpoint_stop_x): Add
scm_t_dynwind_flags casts.
* guile/scm-cmd.c (gdbscm_parse_command_name): Likewise.
* guile/scm-ports.c (gdbscm_open_memory): Likewise.
* guile/scm-value.c (gdbscm_value_to_string): Likewise.
2015-10-27 Simon Marchi <simon.marchi@polymtl.ca>
* ax.h (ax_raw_byte): New declaration.

View File

@ -956,7 +956,7 @@ gdbscm_set_breakpoint_stop_x (SCM self, SCM newvalue)
" this breakpoint."),
ext_lang_capitalized_name (extlang));
scm_dynwind_begin (0);
scm_dynwind_begin ((scm_t_dynwind_flags) 0);
gdbscm_dynwind_xfree (error_text);
gdbscm_out_of_range_error (FUNC_NAME, SCM_ARG1, self, error_text);
/* The following line, while unnecessary, is present for completeness

View File

@ -530,7 +530,7 @@ gdbscm_parse_command_name (const char *name,
msg = xstrprintf (_("could not find command prefix '%s'"), prefix_text);
xfree (prefix_text);
xfree (result);
scm_dynwind_begin (0);
scm_dynwind_begin ((scm_t_dynwind_flags) 0);
gdbscm_dynwind_xfree (msg);
gdbscm_out_of_range_error (func_name, arg_pos,
gdbscm_scm_from_c_string (name), msg);
@ -546,7 +546,7 @@ gdbscm_parse_command_name (const char *name,
msg = xstrprintf (_("'%s' is not a prefix command"), prefix_text);
xfree (prefix_text);
xfree (result);
scm_dynwind_begin (0);
scm_dynwind_begin ((scm_t_dynwind_flags) 0);
gdbscm_dynwind_xfree (msg);
gdbscm_out_of_range_error (func_name, arg_pos,
gdbscm_scm_from_c_string (name), msg);

View File

@ -1139,7 +1139,7 @@ gdbscm_open_memory (SCM rest)
&start_arg_pos, &start,
&size_arg_pos, &size);
scm_dynwind_begin (0);
scm_dynwind_begin ((scm_t_dynwind_flags) 0);
if (mode == NULL)
mode = xstrdup ("r");

View File

@ -1158,7 +1158,7 @@ gdbscm_value_to_string (SCM self, SCM rest)
Make sure we don't leak. This is done via scm_dynwind_begin, et.al. */
discard_cleanups (cleanups);
scm_dynwind_begin (0);
scm_dynwind_begin ((scm_t_dynwind_flags) 0);
gdbscm_dynwind_xfree (encoding);
gdbscm_dynwind_xfree (buffer);