mirror of
https://git.savannah.gnu.org/git/guile.git
synced 2025-06-30 06:50:31 +02:00
Remove private var_no_applicable_method capture
* libguile/goops.c (var_no_applicable_method): Remove unused capture. (sym_no_applicable_method): Remove unused symbol.
This commit is contained in:
parent
984d43b632
commit
cf0a678ba3
1 changed files with 0 additions and 4 deletions
|
@ -75,13 +75,11 @@
|
|||
static SCM var_make_standard_class = SCM_BOOL_F;
|
||||
static SCM var_slot_unbound = SCM_BOOL_F;
|
||||
static SCM var_slot_missing = SCM_BOOL_F;
|
||||
static SCM var_no_applicable_method = SCM_BOOL_F;
|
||||
static SCM var_change_class = SCM_BOOL_F;
|
||||
static SCM var_make = SCM_BOOL_F;
|
||||
|
||||
SCM_SYMBOL (sym_slot_unbound, "slot-unbound");
|
||||
SCM_SYMBOL (sym_slot_missing, "slot-missing");
|
||||
SCM_SYMBOL (sym_no_applicable_method, "no-applicable-method");
|
||||
SCM_SYMBOL (sym_memoize_method_x, "memoize-method!");
|
||||
SCM_SYMBOL (sym_change_class, "change-class");
|
||||
|
||||
|
@ -1703,8 +1701,6 @@ SCM_DEFINE (scm_sys_goops_loaded, "%goops-loaded", 0, 0, 0,
|
|||
scm_module_variable (scm_module_goops, sym_slot_unbound);
|
||||
var_slot_missing =
|
||||
scm_module_variable (scm_module_goops, sym_slot_missing);
|
||||
var_no_applicable_method =
|
||||
scm_module_variable (scm_module_goops, sym_no_applicable_method);
|
||||
var_change_class =
|
||||
scm_module_variable (scm_module_goops, sym_change_class);
|
||||
setup_extended_primitive_generics ();
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue