X-Git-Url: http://git.hcoop.net/bpt/guile.git/blobdiff_plain/73be1d9e8ef3744723949752311e60d6a0f89342..77c2594f2f88fc8c2ec79126c9f04c9eb8b2d057:/libguile/environments.h

diff --git a/libguile/environments.h b/libguile/environments.h
index cc5f76bcb..c5a9ba8a9 100644
--- a/libguile/environments.h
+++ b/libguile/environments.h
@@ -59,8 +59,8 @@ struct scm_environment_funcs {
 
 
 #define SCM_ENVIRONMENT_SUCCESS SCM_BOOL_T
-#define SCM_ENVIRONMENT_BINDING_IMMUTABLE SCM_MAKINUM (0)
-#define SCM_ENVIRONMENT_LOCATION_IMMUTABLE SCM_MAKINUM (1)
+#define SCM_ENVIRONMENT_BINDING_IMMUTABLE scm_from_int (0)
+#define SCM_ENVIRONMENT_LOCATION_IMMUTABLE scm_from_int (1)
 #define SCM_ENVIRONMENT_LOCATION_NO_CELL SCM_BOOL_F
 
 SCM_API scm_t_bits scm_tc16_environment;