X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=lily%2Finclude%2Flily-guile.hh;h=f2b8f08ba17bfa00fcae3aacf13035d68a30aa17;hb=ce43b953f70e2b7b36e11f3cb2bb0f179fc3b1a3;hp=059e5aa0cc49ba4f1d8bf49a1019f8455758b494;hpb=e6f638c8c580606d38ebd5f8df4d0ea7558f1137;p=lilypond.git diff --git a/lily/include/lily-guile.hh b/lily/include/lily-guile.hh index 059e5aa0cc..f2b8f08ba1 100644 --- a/lily/include/lily-guile.hh +++ b/lily/include/lily-guile.hh @@ -103,6 +103,7 @@ 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.