]> git.donarmstrong.com Git - lilypond.git/blobdiff - lily/include/lily-guile.hh
Merge branch 'master' into translation
[lilypond.git] / lily / include / lily-guile.hh
index 5bcd235e2753f027caf8e9128f28f766b2ba96ee..f2b8f08ba17bfa00fcae3aacf13035d68a30aa17 100644 (file)
@@ -97,13 +97,13 @@ SCM ly_hash2alist (SCM tab);
 SCM ly_hash_table_keys (SCM tab);
 
 SCM ly_assoc_prepend_x (SCM alist, SCM key, SCM val);
-inline bool ly_is_fraction (SCM x) { return SCM_FRACTIONP (x) || scm_is_integer (x); }
 
 inline bool ly_is_list (SCM x) { return scm_is_true (scm_list_p (x)); }
 inline bool ly_cheap_is_list (SCM x) { return scm_is_pair (x) || x == SCM_EOL; }
 inline bool ly_is_procedure (SCM x) { return scm_is_true (scm_procedure_p (x)); }
 inline bool ly_is_port (SCM x) { return scm_is_true (scm_port_p (x)); }
 
+bool ly_is_rational (SCM);
 /*
   want to take the address of this function; scm_is_symbol() is a
   macro.