(parse_symbol_list): Bugfix.

[lilypond.git] / flower / include / guile-compatibility.hh

diff --git a/flower/include/guile-compatibility.hh b/flower/include/guile-compatibility.hh
index a3a1a511f0de492f1eb46d513a871dee2e8c16db..6fa3b32b8885f7ea5409be5b21e994d63daa3ad7 100644 (file)
--- a/flower/include/guile-compatibility.hh
+++ b/flower/include/guile-compatibility.hh
@@ -24,7 +24,7 @@ inline SCM scm_car (SCM x)
     abort ();
   return SCM_CAR (x);
 }
-#define SCM_I_CONSP(x) SCM_CONSP(x)
+#define SCM_I_CONSP(x) SCM_CONSP (x)
 inline SCM scm_caar (SCM x) { return SCM_CAAR (x); }
 inline SCM scm_cdar (SCM x) { return SCM_CDAR (x); }
 inline SCM scm_cadr (SCM x) { return SCM_CADR (x); }