mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-04-30 11:50:28 +02:00
Code Activity

Remove useless scm_s_slot_set_x export

Browse source 
* libguile/goops.c:
* libguile/goops.h (scm_s_slot_set_x): Remove unused and useless
  export.
This commit is contained in:
Andy Wingo 2015-01-06 11:56:23 -05:00
parent 036c508402
commit 005c078f27
2 changed files with 0 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

2
libguile/goops.c
View file

@ -977,8 +977,6 @@ SCM_DEFINE (scm_slot_set_x, "slot-set!", 3, 0, 0,
} }
#undef FUNC_NAME #undef FUNC_NAME
const char *scm_s_slot_set_x = s_scm_slot_set_x;
SCM_DEFINE (scm_slot_bound_p, "slot-bound?", 2, 0, 0, SCM_DEFINE (scm_slot_bound_p, "slot-bound?", 2, 0, 0,
(SCM obj, SCM slot_name), (SCM obj, SCM slot_name),
"Return @code{#t} if the slot named @var{slot_name} of @var{obj}\n" "Return @code{#t} if the slot named @var{slot_name} of @var{obj}\n"

1
libguile/goops.h
View file

@ -212,7 +212,6 @@ SCM_API SCM scm_class_scm;
SCM_API SCM scm_class_int; SCM_API SCM scm_class_int;
SCM_API SCM scm_class_float; SCM_API SCM scm_class_float;
SCM_API SCM scm_class_double; SCM_API SCM scm_class_double;
SCM_API const char *scm_s_slot_set_x;
SCM_API SCM scm_module_goops; SCM_API SCM scm_module_goops;