[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: newbie question on scheme functions
From: |
Nicolas Sceaux |
Subject: |
Re: newbie question on scheme functions |
Date: |
Fri, 31 Dec 2004 00:07:51 +0100 |
User-agent: |
Gnus/5.1007 (Gnus v5.10.7) Emacs/21.3 (gnu/linux) |
Andrea Rossato <address@hidden> writes:
> I'm trying to find a cleaner solution: is it possible to define that
> function inside a .ly file?
>
> I tried, by adding a # before the definition, but I get an error message.
Putting the sharp sign should really do it:
#(define-public (note-name->italian-markup pitch)
"Return Italian pitch markup for PITCH."
(make-line-markup
(list
(make-simple-markup
(vector-ref #("Do" "Re" "Mi" "Fa" "Sol" "La" "Si")
(ly:pitch-notename pitch)))
(accidental->markup (ly:pitch-alteration pitch)))))
nicolas