* guile-snarf.c (parse_args): Abort if we haven't handled some

character type.

diff --git a/libguile/guile-snarf.c b/libguile/guile-snarf.c
index c074728..5feafd7 100644 (file)
--- a/libguile/guile-snarf.c
+++ b/libguile/guile-snarf.c
@@ -472,6 +472,9 @@ parse_args (char *keyword)
              else
                add_char (&arg, c);
              break;
+
+           default:
+             abort ();
            }
 
          c = arglist_getc (keyword);