From a77ffc4b0f698dba76a23576e07a1935c54be55f Mon Sep 17 00:00:00 2001 From: hanwen Date: Tue, 13 Jul 2004 20:41:15 +0000 Subject: [PATCH] (scm_from_int): add scm_from_int glue. --- ChangeLog | 4 ++++ lily/include/lily-guile.hh | 1 + 2 files changed, 5 insertions(+) diff --git a/ChangeLog b/ChangeLog index 4fbe797a27..eed9ba651a 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,3 +1,7 @@ +2004-07-13 Han-Wen Nienhuys + + * lily/include/lily-guile.hh (scm_from_int): add scm_from_int glue. + 2004-07-13 Jan Nieuwenhuizen * SConstruct: Configure only pristine build tree or on user diff --git a/lily/include/lily-guile.hh b/lily/include/lily-guile.hh index ba971fb20a..0b5e2a0163 100644 --- a/lily/include/lily-guile.hh +++ b/lily/include/lily-guile.hh @@ -70,6 +70,7 @@ inline SCM scm_c_make_vector (int k, SCM val) { #define scm_gc_unregister_collectable_memory(a,b,c) scm_done_free(b) #define scm_gc_register_collectable_memory(a,b,c) scm_done_malloc(b) #define SCM_VECTOR_REF(v,i) (SCM_VELTS((v))[(i)]) +#define scm_from_int(x) SCM_MAKINUM(x) #define scm_hash_table_p scm_vector_p #endif -- 2.39.5