Make arguments like Context.GrobName accessible as symbol lists

Documentation/ja/notation/pitches.itely

 @c -*- coding: utf-8; mode: texinfo; documentlanguage: ja -*-
 @ignore
     Translation of GIT committish: d5647c5fd1c38d4124d2374725b923f4901f3661
 
     When revising a translation, copy the HEAD committish of the
     version that you are working on.  See TRANSLATION for details.
 @end ignore
 
-@c \version "2.16.0"
+@c \version "2.17.6"
 
 @c Translators: Yoshiki Sawada
 @c Translation status: post-GDP
 
 
 @node ピッチ
 @section ピッチ
 @translationof Pitches
 
 @lilypondfile[quote]{pitches-headword.ly}
@@ skipping 1444 matching lines @@
 @funindex voice
 @funindex default
 
 臨時記号の譜刻の仕方には多くの異なる規約があります。@c
 LilyPond はどの臨時記号スタイルを使用するのかを指定するための関数を@c
 提供します。@c
 この関数は以下のように呼び出されます:
 
 @example
 \new Staff <<
-  \accidentalStyle "voice"
+  \accidentalStyle voice
   @{ @dots{} @}
 >>
 @end example
 
 指定された臨時記号スタイルは、デフォルトでは、カレントの @code{Staff} に@c
 適用されます
 (スタイル @code{piano} と @code{piano-cautionary} は例外です。@c
 これらは以下で説明します)。@c
 オプションとして、この関数は 2 つ目の引数をとることができ、@c
 それによってスタイルを変更すべき範囲 (スコープ) を指定できます。@c
 例えば、カレントの @code{StaffGroup} のすべての譜で同じスタイルを使うには、@c
 以下のようにします:
 
 @example
-\accidentalStyle #'StaffGroup "voice"
+\accidentalStyle StaffGroup.voice
 @end example
 
 サポートされる臨時記号スタイルを以下で示します。@c
 それぞれのスタイルを実際に示すために、以下の例を使用します:
 
 @lilypond[verbatim,quote]
 musicA = {
   <<
     \relative c' {
       cis'8 fis, bes4 <a cis>8 f bis4 |
@@ skipping 21 matching lines @@
       dis'4 |
       \change Staff = down
       <fis, a cis>4 gis <f a d>2 |
     }
   }
 }
 
 \new PianoStaff {
   <<
     \context Staff = "up" {
-      \accidentalStyle "default"
+      \accidentalStyle default
       \musicA
     }
     \context Staff = "down" {
-      \accidentalStyle "default"
+      \accidentalStyle default
       \musicB
     }
   >>
 }
 @end lilypond
 
 両方の譜で同じ臨時記号スタイルを使うのなら、@c
 この例の最後のブロックを以下で置き換えられます:
 
 @example
 \new PianoStaff @{
   <<
     \context Staff = "up" @{
       %%% 次の行を変更したいスタイルに合わせて変更してください:
-      \accidentalStyle #'Score "default"
+      \accidentalStyle Score.default
       \musicA
     @}
     \context Staff = "down" @{
       \musicB
     @}
   >>
 @}
 @end example
 
 
@@ skipping 42 matching lines @@
       dis'4 |
       \change Staff = down
       <fis, a cis>4 gis <f a d>2 |
     }
   }
 }
 
 \new PianoStaff {
   <<
     \context Staff = "up" {
-      \accidentalStyle "default"
+      \accidentalStyle default
       \musicA
     }
     \context Staff = "down" {
-      \accidentalStyle "default"
+      \accidentalStyle default
       \musicB
     }
   >>
 }
 @end lilypond
 
 @item voice
 
 @cindex accidental style, voice (voice 臨時記号スタイル)
 @cindex voice accidental style (voice 臨時記号スタイル)
@@ skipping 47 matching lines @@
       dis'4 |
       \change Staff = down
       <fis, a cis>4 gis <f a d>2 |
     }
   }
 }
 
 \new PianoStaff {
   <<
     \context Staff = "up" {
-      \accidentalStyle "voice"
+      \accidentalStyle voice
       \musicA
     }
     \context Staff = "down" {
-      \accidentalStyle "voice"
+      \accidentalStyle voice
       \musicB
     }
   >>
 }
 @end lilypond
 
 @item modern
 
 @cindex accidentals, modern style (modern 臨時記号スタイル)
 @cindex modern style accidentals (modern 臨時記号スタイル)
@@ skipping 45 matching lines @@
       dis'4 |
       \change Staff = down
       <fis, a cis>4 gis <f a d>2 |
     }
   }
 }
 
 \new PianoStaff {
   <<
     \context Staff = "up" {
-      \accidentalStyle "modern"
+      \accidentalStyle modern
       \musicA
     }
     \context Staff = "down" {
-      \accidentalStyle "modern"
+      \accidentalStyle modern
       \musicB
     }
   >>
 }
 @end lilypond
 
 @item modern-cautionary
 
 @cindex accidentals, modern cautionary style (modern-cautionary 臨時記号スタイル)
 @cindex modern accidental style (modern 臨時記号スタイル)
@@ skipping 39 matching lines @@
       dis'4 |
       \change Staff = down
       <fis, a cis>4 gis <f a d>2 |
     }
   }
 }
 
 \new PianoStaff {
   <<
     \context Staff = "up" {
-      \accidentalStyle "modern-cautionary"
+      \accidentalStyle modern-cautionary
       \musicA
     }
     \context Staff = "down" {
-      \accidentalStyle "modern-cautionary"
+      \accidentalStyle modern-cautionary
       \musicB
     }
   >>
 }
 @end lilypond
 
 @item modern-voice
 
 @cindex accidental style, modern (modern 臨時記号スタイル)
 @cindex accidentals, modern (modern 臨時記号)
@@ skipping 43 matching lines @@
       dis'4 |
       \change Staff = down
       <fis, a cis>4 gis <f a d>2 |
     }
   }
 }
 
 \new PianoStaff {
   <<
     \context Staff = "up" {
-      \accidentalStyle "modern-voice"
+      \accidentalStyle modern-voice
       \musicA
     }
     \context Staff = "down" {
-      \accidentalStyle "modern-voice"
+      \accidentalStyle modern-voice
       \musicB
     }
   >>
 }
 @end lilypond
 
 @cindex accidental style, cautionary, modern voice (modern-voice-cautionary 臨時記号スタイル)
 @cindex accidental style, modern voice cautionary (modern-voice-cautionary 臨時記号スタイル)
 @cindex accidental style, voice, modern cautionary (modern-voice-cautionary 臨時記号スタイル)
 
@@ skipping 37 matching lines @@
       dis'4 |
       \change Staff = down
       <fis, a cis>4 gis <f a d>2 |
     }
   }
 }
 
 \new PianoStaff {
   <<
     \context Staff = "up" {
-      \accidentalStyle "modern-voice-cautionary"
+      \accidentalStyle modern-voice-cautionary
       \musicA
     }
     \context Staff = "down" {
-      \accidentalStyle "modern-voice-cautionary"
+      \accidentalStyle modern-voice-cautionary
       \musicB
     }
   >>
 }
 @end lilypond
 
 @item piano
 
 @cindex accidental style, piano (ピアノ臨時記号スタイル)
 @cindex accidentals, piano (ピアノ臨時記号)
@@ skipping 41 matching lines @@
       dis'4 |
       \change Staff = down
       <fis, a cis>4 gis <f a d>2 |
     }
   }
 }
 
 \new PianoStaff {
   <<
     \context Staff = "up" {
-      \accidentalStyle "piano"
+      \accidentalStyle piano
       \musicA
     }
     \context Staff = "down" {
       \musicB
     }
   >>
 }
 @end lilypond
 
 @item piano-cautionary
@@ skipping 38 matching lines @@
       dis'4 |
       \change Staff = down
       <fis, a cis>4 gis <f a d>2 |
     }
   }
 }
 
 \new PianoStaff {
   <<
     \context Staff = "up" {
-      \accidentalStyle "piano-cautionary"
+      \accidentalStyle piano-cautionary
       \musicA
     }
     \context Staff = "down" {
       \musicB
     }
   >>
 }
 @end lilypond
 
 @item neo-modern
@@ skipping 42 matching lines @@
       dis'4 |
       \change Staff = down
       <fis, a cis>4 gis <f a d>2 |
     }
   }
 }
 
 \new PianoStaff {
   <<
     \context Staff = "up" {
-      \accidentalStyle "neo-modern"
+      \accidentalStyle neo-modern
       \musicA
     }
     \context Staff = "down" {
-      \accidentalStyle "neo-modern"
+      \accidentalStyle neo-modern
       \musicB
     }
   >>
 }
 @end lilypond
 
 @item neo-modern-cautionary
 
 @cindex neo-modern-cautionary accidental style (neo-modern-cautionary 臨時記号スタイル)
 @cindex accidental style, neo-modern-cautionary (neo-modern-cautionary 臨時記号スタイル)
@@ skipping 32 matching lines @@
       dis'4 |
       \change Staff = down
       <fis, a cis>4 gis <f a d>2 |
     }
   }
 }
 
 \new PianoStaff {
   <<
     \context Staff = "up" {
-      \accidentalStyle "neo-modern-cautionary"
+      \accidentalStyle neo-modern-cautionary
       \musicA
     }
     \context Staff = "down" {
-      \accidentalStyle "neo-modern-cautionary"
+      \accidentalStyle neo-modern-cautionary
       \musicB
     }
   >>
 }
 @end lilypond
 
 @item neo-modern-voice
 
 @cindex neo-modern-voice accidental style (neo-modern-voice 臨時記号スタイル)
 @cindex accidental style, neo-modern-voice (neo-modern-voice 臨時記号スタイル)
@@ skipping 34 matching lines @@
       dis'4 |
       \change Staff = down
       <fis, a cis>4 gis <f a d>2 |
     }
   }
 }
 
 \new PianoStaff {
   <<
     \context Staff = "up" {
-      \accidentalStyle "neo-modern-voice"
+      \accidentalStyle neo-modern-voice
       \musicA
     }
     \context Staff = "down" {
-      \accidentalStyle "neo-modern-voice"
+      \accidentalStyle neo-modern-voice
       \musicB
     }
   >>
 }
 @end lilypond
 
 @item neo-modern-voice-cautionary
 
 @cindex neo-modern-voice-cautionary accidental style (neo-modern-voice-cautionary 臨時記号スタイル)
 @cindex accidental style, neo-modern-voice-cautionary (neo-modern-voice-cautionary 臨時記号スタイル)
@@ skipping 32 matching lines @@
       dis'4 |
       \change Staff = down
       <fis, a cis>4 gis <f a d>2 |
     }
   }
 }
 
 \new PianoStaff {
   <<
     \context Staff = "up" {
-      \accidentalStyle "neo-modern-voice-cautionary"
+      \accidentalStyle neo-modern-voice-cautionary
       \musicA
     }
     \context Staff = "down" {
-      \accidentalStyle "neo-modern-voice-cautionary"
+      \accidentalStyle neo-modern-voice-cautionary
       \musicB
     }
   >>
 }
 @end lilypond
 
 @item dodecaphonic
 
 @cindex dodecaphonic accidental style (dodecaphonic 臨時記号スタイル)
 @cindex dodecaphonic style, neo-modern (neo-modern 12 音スタイル)
@@ skipping 37 matching lines @@
       dis'4 |
       \change Staff = down
       <fis, a cis>4 gis <f a d>2 |
     }
   }
 }
 
 \new PianoStaff {
   <<
     \context Staff = "up" {
-      \accidentalStyle "dodecaphonic"
+      \accidentalStyle dodecaphonic
       \musicA
     }
     \context Staff = "down" {
-      \accidentalStyle "dodecaphonic"
+      \accidentalStyle dodecaphonic
       \musicB
     }
   >>
 }
 @end lilypond
 
 @item teaching
 
 @cindex teaching accidental style (teaching 臨時記号スタイル)
 @cindex accidental style, teaching (teaching 臨時記号スタイル)
@@ skipping 38 matching lines @@
       \change Staff = down
       <fis, a cis>4 gis <f a d>2 |
     }
   }
 }
 
 \new PianoStaff {
   <<
     \context Staff = "up" {
       \key fis \minor
-      \accidentalStyle "teaching"
+      \accidentalStyle teaching
       \musicA
     }
     \context Staff = "down" {
       \key fis \minor
-      \accidentalStyle "teaching"
+      \accidentalStyle teaching
       \musicB
     }
   >>
 }
 @end lilypond
 
 
 
 @item no-reset
 
@@ skipping 34 matching lines @@
       dis'4 |
       \change Staff = down
       <fis, a cis>4 gis <f a d>2 |
     }
   }
 }
 
 \new PianoStaff {
   <<
     \context Staff = "up" {
-      \accidentalStyle "no-reset"
+      \accidentalStyle no-reset
       \musicA
     }
     \context Staff = "down" {
-      \accidentalStyle "no-reset"
+      \accidentalStyle no-reset
       \musicB
     }
   >>
 }
 @end lilypond
 
 @item forget
 
 @cindex forget accidental style (forget 臨時記号スタイル)
 @cindex accidental style, forget (forget 臨時記号スタイル)
@@ skipping 34 matching lines @@
       dis'4 |
       \change Staff = down
       <fis, a cis>4 gis <f a d>2 |
     }
   }
 }
 
 \new PianoStaff {
   <<
     \context Staff = "up" {
-      \accidentalStyle "forget"
+      \accidentalStyle forget
       \musicA
     }
     \context Staff = "down" {
-      \accidentalStyle "forget"
+      \accidentalStyle forget
       \musicB
     }
   >>
 }
 @end lilypond
 @end table
 
 @seealso
 コード断片集:
 @rlsrnamed{Pitches,ピッチ}
@@ skipping 25 matching lines @@
 臨時記号の忠告的なキャンセルは 1 つ前の小節を見て行われます。@c
 しかしながら、@code{\repeat volta N} セクションの後にくる
 @code{\alternative} ブロックでは、@c
 キャンセルの算出はその前に @emph{譜刻された} 小節ではなく、@c
 その前に @emph{演奏された} 小節を見て行われると演奏者は予想します。@c
 以下の例では、2 番目の差し替え小節の中にあるナチュラル @code{c}
 にナチュラル記号は必要ありません。
 
 @lilypond[quote]
 {
-  \accidentalStyle "modern"
+  \accidentalStyle modern
   \time 2/4
   \repeat volta 2 {
     c'2
   }
   \alternative {
      cis'
      c'
   }
 }
 @end lilypond
 
 以下の方法で解決できます:
 局部的に臨時記号スタイルを @code{forget} に変更する関数を定義します:
 
 @lilypond[verbatim,quote]
 forget = #(define-music-function (parser location music) (ly:music?) #{
-  \accidentalStyle "forget"
+  \accidentalStyle forget
   #music
-  \accidentalStyle "modern"
+  \accidentalStyle modern
 #})
 {
-  \accidentalStyle "modern"
+  \accidentalStyle modern
   \time 2/4
   \repeat volta 2 {
     c'2
   }
   \alternative {
      cis'
      \forget c'
   }
 }
 @end lilypond
@@ skipping 99 matching lines @@
 @cindex guitar note heads (ギターの符頭)
 @cindex note head styles (符頭のスタイル)
 @cindex styles, note heads (符頭のスタイル)
 
 @funindex cross
 
 符頭を変更することができます:
 
 @lilypond[verbatim,quote,relative=2]
 c4 b
-\override NoteHead #'style = #'cross
+\override NoteHead.style = #'cross
 c4 b
-\revert NoteHead #'style
+\revert NoteHead.style
 a b
-\override NoteHead #'style = #'harmonic
+\override NoteHead.style = #'harmonic
 a b
-\revert NoteHead #'style
+\revert NoteHead.style
 c4 d e f
 @end lilypond
 
 すべての符頭スタイルを調べるには、@ref{Note head styles} を参照してください。
 
 @code{cross} スタイルはさまざまな音楽的意図を表すために使用されます。@c
 以下の定義済みコマンドは符頭を譜コンテキストとタブ譜コンテキストで変更し、@c
 何らかの音楽的意味を表すために使用することができます:
 
 @lilypond[verbatim,quote,relative=2]
@@ skipping 272 matching lines @@
 @endpredefined
 
 @seealso
 コード断片集:
 @rlsrnamed{Pitches,ピッチ}
 
 内部リファレンス:
 @rinternals{Pitch_squash_engraver},
 @rinternals{Voice},
 @rinternals{RhythmicStaff}