From 70536e15af56db31075d72bef6db37b84098d698 Mon Sep 17 00:00:00 2001 From: Peter TB Brett Date: Sat, 10 Dec 2011 22:51:40 +0000 Subject: [PATCH] scheme-api: Remove redundant checks in edascm_to_object_glist(). These checks are repeated by edascm_to_object(), which edascm_to_object_glist calls. --- libgeda/src/scheme_object.c | 7 ------- 1 file changed, 7 deletions(-) diff --git a/libgeda/src/scheme_object.c b/libgeda/src/scheme_object.c index 1d9ce3f9f..901c2be02 100644 --- a/libgeda/src/scheme_object.c +++ b/libgeda/src/scheme_object.c @@ -107,13 +107,6 @@ edascm_to_object_glist (SCM objs, const char *subr) for (lst = objs; lst != SCM_EOL; lst = SCM_CDR (lst)) { SCM smob = SCM_CAR (lst); - EDASCM_ASSERT_SMOB_VALID (smob); - if (!EDASCM_OBJECTP (smob)) { - scm_error_scm (wrong_type_arg_sym, - scm_from_utf8_string (subr), - scm_from_utf8_string (_("Expected a gEDA object, found ~A")), - scm_list_1 (smob), scm_list_1 (smob)); - } result = g_list_prepend (result, (gpointer) edascm_to_object (smob)); } -- 2.11.4.GIT