X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=lily%2Fdimensions.cc;h=451bf5ef3bb90f23d67370efb0bbf0884700c98f;hb=df7667c81afced0f9d6422b5cbaaf49fd5b3ae1f;hp=1979e576f0ea4a122c45343c41a398511a5ba02b;hpb=634ad74db688a5305f001917453c5cd15305c539;p=lilypond.git diff --git a/lily/dimensions.cc b/lily/dimensions.cc index 1979e576f0..451bf5ef3b 100644 --- a/lily/dimensions.cc +++ b/lily/dimensions.cc @@ -4,7 +4,6 @@ source file of the GNU LilyPond music typesetter (c) 1997--2005 Han-Wen Nienhuys - */ #include "lily-guile.hh" @@ -12,51 +11,51 @@ #include "warn.hh" LY_DEFINE (ly_pt, "ly:pt", - 1, 0, 0, (SCM num), - "@var{num} printer points") + 1, 0, 0, (SCM num), + "@var{num} printer points") { - SCM_ASSERT_TYPE(scm_is_number (num), num, SCM_ARG1, __FUNCTION__, - "number"); + SCM_ASSERT_TYPE (scm_is_number (num), num, SCM_ARG1, __FUNCTION__, + "number"); return scm_from_double (point_constant * scm_to_double (num)); } LY_DEFINE (ly_cm, "ly:cm", - 1, 0, 0, (SCM num), - "@var{num} cm") + 1, 0, 0, (SCM num), + "@var{num} cm") { - SCM_ASSERT_TYPE(scm_is_number (num), num, SCM_ARG1, __FUNCTION__, - "number"); + SCM_ASSERT_TYPE (scm_is_number (num), num, SCM_ARG1, __FUNCTION__, + "number"); return scm_from_double (cm_constant * scm_to_double (num)); } LY_DEFINE (ly_inch, "ly:inch", - 1, 0, 0, (SCM num), - "@var{num} inches") + 1, 0, 0, (SCM num), + "@var{num} inches") { - SCM_ASSERT_TYPE(scm_is_number (num), num, SCM_ARG1, __FUNCTION__, - "number"); + SCM_ASSERT_TYPE (scm_is_number (num), num, SCM_ARG1, __FUNCTION__, + "number"); return scm_from_double (inch_constant * scm_to_double (num)); } LY_DEFINE (ly_mm, "ly:mm", - 1, 0, 0, (SCM num), - "@var{num} mm") + 1, 0, 0, (SCM num), + "@var{num} mm") { - SCM_ASSERT_TYPE(scm_is_number (num), num, SCM_ARG1, __FUNCTION__, - "number"); + SCM_ASSERT_TYPE (scm_is_number (num), num, SCM_ARG1, __FUNCTION__, + "number"); return scm_from_double (mm_constant * scm_to_double (num)); } LY_DEFINE (ly_bp, "ly:bp", - 1, 0, 0, (SCM num), - "@var{num} bigpoints (1/72th inch)") + 1, 0, 0, (SCM num), + "@var{num} bigpoints (1/72th inch)") { - SCM_ASSERT_TYPE(scm_is_number (num), num, SCM_ARG1, __FUNCTION__, - "number"); + SCM_ASSERT_TYPE (scm_is_number (num), num, SCM_ARG1, __FUNCTION__, + "number"); return scm_from_double (bigpoint_constant * scm_to_double (num)); }