diff options
Diffstat (limited to 'gdb/scm-lang.c')
-rw-r--r-- | gdb/scm-lang.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/gdb/scm-lang.c b/gdb/scm-lang.c index 82b6a1c..7f31ba4 100644 --- a/gdb/scm-lang.c +++ b/gdb/scm-lang.c @@ -105,7 +105,7 @@ scm_unpack (type, valaddr, context) else return 1; } - switch (7 & svalue) + switch (7 & (int) svalue) { case 2: case 6: /* fixnum */ return svalue >> 2; @@ -114,7 +114,7 @@ scm_unpack (type, valaddr, context) return SCM_ICHR (svalue); else if (SCM_IFLAGP (svalue)) { - switch (svalue) + switch ((int) svalue) { #ifndef SICP case SCM_EOL: |