From 890d2a6218a368c28641ac439edf4ee171eed4df Mon Sep 17 00:00:00 2001
From: hanwen <hanwen>
Date: Mon, 26 Jul 2004 17:44:40 +0000
Subject: [PATCH] (scm_is_int): compat glue.

---
 ChangeLog                  | 4 ++++
 lily/include/lily-guile.hh | 1 +
 2 files changed, 5 insertions(+)

diff --git a/ChangeLog b/ChangeLog
index 992f5ef7ab..e55f9813e1 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,7 @@
+2004-07-26  Han-Wen Nienhuys   <hanwen@xs4all.nl>
+
+	* lily/include/lily-guile.hh (scm_is_int): compat glue.
+
 2004-07-25  Pedro Kroger  <kroeger@pedrokroeger.net>
 
 	* input/regression/page-layout.ly: new file.
diff --git a/lily/include/lily-guile.hh b/lily/include/lily-guile.hh
index 45f0f820b1..e3139c281b 100644
--- a/lily/include/lily-guile.hh
+++ b/lily/include/lily-guile.hh
@@ -21,6 +21,7 @@
 #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_is_int(x) SCM_INUMP (x)
 #define scm_hash_table_p scm_vector_p
 #endif /* SCM_MINOR_VERSION < 7 */
 
-- 
2.11.4.GIT