aboutsummaryrefslogtreecommitdiff
path: root/gdb/guile/scm-math.c
diff options
context:
space:
mode:
Diffstat (limited to 'gdb/guile/scm-math.c')
-rw-r--r--gdb/guile/scm-math.c3
1 files changed, 0 insertions, 3 deletions
diff --git a/gdb/guile/scm-math.c b/gdb/guile/scm-math.c
index 74d5075..b82af47 100644
--- a/gdb/guile/scm-math.c
+++ b/gdb/guile/scm-math.c
@@ -76,7 +76,6 @@ vlscm_unop_gdbthrow (enum valscm_unary_opcode opcode, SCM x,
{
struct gdbarch *gdbarch = get_current_arch ();
const struct language_defn *language = current_language;
- SCM result = SCM_BOOL_F;
scoped_value_mark free_values;
@@ -142,7 +141,6 @@ vlscm_binop_gdbthrow (enum valscm_binary_opcode opcode, SCM x, SCM y,
struct gdbarch *gdbarch = get_current_arch ();
const struct language_defn *language = current_language;
struct value *arg1, *arg2;
- SCM result = SCM_BOOL_F;
struct value *res_val = NULL;
SCM except_scm;
@@ -791,7 +789,6 @@ vlscm_convert_typed_value_from_scheme (const char *func_name,
else if (scm_is_string (obj))
{
size_t len;
- struct cleanup *cleanup;
if (type != NULL)
{