X-Git-Url: https://git.hcoop.net/bpt/guile.git/blobdiff_plain/dd897aafbd218685874256405f740a0e9e1e7303..34d19ef64368a8bac8a32f799b71dc05dd587654:/libguile/objects.h

diff --git a/libguile/objects.h b/libguile/objects.h
index afeeb181a..5bf79fc9b 100644
--- a/libguile/objects.h
+++ b/libguile/objects.h
@@ -92,7 +92,7 @@
 	((SCM_OBJ_CLASS_FLAGS (obj) & SCM_CLASSF_ENTITY) != 0)
 #define SCM_ENTITY_PROCEDURE(obj) \
         (SCM_PACK (SCM_STRUCT_DATA (obj) [scm_struct_i_procedure]))
-#define SCM_SET_ENTITY_PROCEDURE(obj,v) \
+#define SCM_SET_ENTITY_PROCEDURE(obj, v) \
         (SCM_STRUCT_DATA (obj) [scm_struct_i_procedure] = SCM_UNPACK (v))
 #define SCM_ENTITY_SETTER(obj) (SCM_PACK (SCM_STRUCT_DATA (obj)[scm_struct_i_setter]))
 #define SCM_SET_ENTITY_SETTER(obj, v) \