Issue 5167/6: Changes: show \markup xxx = ... \etc assignments

[lilypond.git] / ly / portugues.ly

diff --git a/ly/portugues.ly b/ly/portugues.ly
index 8c297c5937ffc3ce99b626f1c5c8ee8fa898683b..40077b864e6068791ec18e778728f794d9008727 100644 (file)
--- a/ly/portugues.ly
+++ b/ly/portugues.ly
@@ -1,7 +1,7 @@
 %%%% common Portuguese names for notes
 %%%% This file is part of LilyPond, the GNU music typesetter.
 %%%%
-%%%% Copyright (C) 2004--2009 Pedro Kröger <kroeger@pedrokroeger.net>
+%%%% Copyright (C) 2010--2015 Valentin Villenave <valentin@villenave.net>
 %%%%
 %%%% LilyPond is free software: you can redistribute it and/or modify
 %%%% it under the terms of the GNU General Public License as published by
@@ -16,100 +16,8 @@
 %%%% You should have received a copy of the GNU General Public License
 %%%% along with LilyPond.  If not, see <http://www.gnu.org/licenses/>.
 
-\version "2.12.0"
+%%%% Legacy file. (see scm/define-note-names.scm)
 
-%{
+\version "2.16.0"
 
-  b    = flat (bemol)
-  bb   = double-flat
-  bqt  = quarter-tone flat
-  btqt = three-quarter-tones flat
-
-  s    = sharp (sustenido)
-  ss   = double-sharp
-  sqt  = quarter-tone sharp
-  stqt = three-quarter-tones sharp
-
-     English: c   d   e   f   g   a   b
-  Portuguese: do  re  mi  fa  sol la  si
-
-  Adapted from espanol.ly and italiano.ly.
-
-%}
-
-pitchnamesPortuguese = #`(
-       (dobb . ,(ly:make-pitch -1 0 DOUBLE-FLAT))
-       (dobtqt . ,(ly:make-pitch -1 0 THREE-Q-FLAT))
-       (dob . ,(ly:make-pitch -1 0 FLAT))
-       (dobqt . ,(ly:make-pitch -1 0 SEMI-FLAT))
-       (do . ,(ly:make-pitch -1 0 NATURAL))
-       (dosqt . ,(ly:make-pitch -1 0 SEMI-SHARP))
-       (dos . ,(ly:make-pitch -1 0 SHARP))
-       (dostqt . ,(ly:make-pitch -1 0 THREE-Q-SHARP))
-       (doss . ,(ly:make-pitch -1 0 DOUBLE-SHARP))
-
-       (rebb . ,(ly:make-pitch -1 1 DOUBLE-FLAT))
-       (rebtqt . ,(ly:make-pitch -1 1 THREE-Q-FLAT))
-       (reb . ,(ly:make-pitch -1 1 FLAT))
-       (rebqt . ,(ly:make-pitch -1 1 SEMI-FLAT))
-       (re . ,(ly:make-pitch -1 1 NATURAL))
-       (resqt . ,(ly:make-pitch -1 1 SEMI-SHARP))
-       (res . ,(ly:make-pitch -1 1 SHARP))
-       (restqt . ,(ly:make-pitch -1 1 THREE-Q-SHARP))
-       (ress . ,(ly:make-pitch -1 1 DOUBLE-SHARP))
-
-       (mibb . ,(ly:make-pitch -1 2 DOUBLE-FLAT))
-       (mibtqt . ,(ly:make-pitch -1 2 THREE-Q-FLAT))
-       (mib . ,(ly:make-pitch -1 2 FLAT))
-       (mibqt . ,(ly:make-pitch -1 2 SEMI-FLAT))
-       (mi . ,(ly:make-pitch -1 2 NATURAL))
-       (misqt . ,(ly:make-pitch -1 2 SEMI-SHARP))
-       (mis . ,(ly:make-pitch -1 2 SHARP))
-       (mistqt . ,(ly:make-pitch -1 2 THREE-Q-SHARP))
-       (miss . ,(ly:make-pitch -1 2 DOUBLE-SHARP))
-
-       (fabb . ,(ly:make-pitch -1 3 DOUBLE-FLAT))
-       (fabtqt . ,(ly:make-pitch -1 3 THREE-Q-FLAT))
-       (fab . ,(ly:make-pitch -1 3 FLAT))
-       (fabqt . ,(ly:make-pitch -1 3 SEMI-FLAT))
-       (fa . ,(ly:make-pitch -1 3 NATURAL))
-       (fasqt . ,(ly:make-pitch -1 3 SEMI-SHARP))
-       (fas . ,(ly:make-pitch -1 3 SHARP))
-       (fastqt . ,(ly:make-pitch -1 3 THREE-Q-SHARP))
-       (fass . ,(ly:make-pitch -1 3 DOUBLE-SHARP))
-
-       (solbb . ,(ly:make-pitch -1 4 DOUBLE-FLAT))
-       (solbtqt . ,(ly:make-pitch -1 4 THREE-Q-FLAT))
-       (solb . ,(ly:make-pitch -1 4 FLAT))
-       (solbqt . ,(ly:make-pitch -1 4 SEMI-FLAT))
-       (sol . ,(ly:make-pitch -1 4 NATURAL))
-       (solsqt . ,(ly:make-pitch -1 4 SEMI-SHARP))
-       (sols . ,(ly:make-pitch -1 4 SHARP))
-       (solstqt . ,(ly:make-pitch -1 4 THREE-Q-SHARP))
-       (solss . ,(ly:make-pitch -1 4 DOUBLE-SHARP))
-
-       (labb . ,(ly:make-pitch -1 5 DOUBLE-FLAT))
-       (labtqt . ,(ly:make-pitch -1 5 THREE-Q-FLAT))
-       (lab . ,(ly:make-pitch -1 5 FLAT))
-       (labqt . ,(ly:make-pitch -1 5 SEMI-FLAT))
-       (la . ,(ly:make-pitch -1 5 NATURAL))
-       (lasqt . ,(ly:make-pitch -1 5 SEMI-SHARP))
-       (las . ,(ly:make-pitch -1 5 SHARP))
-       (lastqt . ,(ly:make-pitch -1 5 THREE-Q-SHARP))
-       (lass . ,(ly:make-pitch -1 5 DOUBLE-SHARP))
-
-       (sibb . ,(ly:make-pitch -1 6 DOUBLE-FLAT))
-       (sibtqt . ,(ly:make-pitch -1 6 THREE-Q-FLAT))
-       (sib . ,(ly:make-pitch -1 6 FLAT))
-       (sibqt . ,(ly:make-pitch -1 6 SEMI-FLAT))
-       (si . ,(ly:make-pitch -1 6 NATURAL))
-       (sisqt . ,(ly:make-pitch -1 6 SEMI-SHARP))
-       (sis . ,(ly:make-pitch -1 6 SHARP))
-       (sistqt . ,(ly:make-pitch -1 6 THREE-Q-SHARP))
-       (siss . ,(ly:make-pitch -1 6 DOUBLE-SHARP))
-
-)
-
-pitchnames = \pitchnamesPortuguese
-
-#(ly:parser-set-note-names parser pitchnames)
+\language "portugues"