From: Han-Wen Nienhuys <hanwen@xs4all.nl>
Date: Thu, 8 Aug 2002 10:33:32 +0000 (+0000)
Subject: (scm_int2num): guile 1.4 compatibility.
X-Git-Tag: release/1.5.72~27
X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=a46b59beb21d301d2a81ccfe2091f5d978c48974;p=lilypond.git

(scm_int2num): guile 1.4 compatibility.
---

diff --git a/ChangeLog b/ChangeLog
index 3912f4f24c..acc6853502 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,5 +1,7 @@
 2002-08-08  Han-Wen Nienhuys  <hanwen@cs.uu.nl>
 
+	* lily/include/lily-guile.hh (scm_int2num): guile 1.4 compatibility. 
+
 	* scm/grob-description.scm (all-grob-descriptions): set
 	X-offset-callbacks for TextScript
 
diff --git a/lily/include/lily-guile.hh b/lily/include/lily-guile.hh
index 18ee25577e..db21226950 100644
--- a/lily/include/lily-guile.hh
+++ b/lily/include/lily-guile.hh
@@ -48,6 +48,7 @@
 #define fix_guile_1_4_scm_primitive_eval(form) scm_eval_3 (form, 1, SCM_EOL)
 #define scm_primitive_eval(form) fix_guile_1_4_scm_primitive_eval (form)
 
+#define scm_int2num(x) scm_long2num (x)  
 #define scm_current_module() (SCM)0
 #define scm_set_current_module(x) (void)x
 #define scm_c_resolve_module(x) (SCM)0