X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=scm%2Fchord-entry.scm;h=d8587dcf839cefc843f734c9abf97ed6af6b993c;hb=cd9b21c7688389e6be24eec51e54be327ae5bdd1;hp=06cc077ce4a1395e206f664c3d3406ea48d9f94e;hpb=2613eed0a13ce118cb11f83057d9d79fc6973a4e;p=lilypond.git diff --git a/scm/chord-entry.scm b/scm/chord-entry.scm index 06cc077ce4..d8587dcf83 100644 --- a/scm/chord-entry.scm +++ b/scm/chord-entry.scm @@ -1,6 +1,6 @@ ;;;; This file is part of LilyPond, the GNU music typesetter. ;;;; -;;;; Copyright (C) 2004--2011 Han-Wen Nienhuys +;;;; Copyright (C) 2004--2012 Han-Wen Nienhuys ;;;; ;;;; LilyPond is free software: you can redistribute it and/or modify ;;;; it under the terms of the GNU General Public License as published by @@ -15,6 +15,9 @@ ;;;; You should have received a copy of the GNU General Public License ;;;; along with LilyPond. If not, see . +; for define-safe-public when byte-compiling using Guile V2 +(use-modules (scm safe-utility-defs)) + (define-public (construct-chord-elements root duration modifications) "Build a chord on root using modifiers in @var{modifications}. @code{NoteEvents} have duration @var{duration}.