input/regression/quote-grace.ly

   1
   2 \header {
   3
   4   texidoc = "Quotes may contain grace notes. The grace note leading up
   5   to an unquoted note is not quoted."
   6
   7 }
   8 \paper { ragged-right= ##t }
   9
  10 \version "2.9.13"
  11 quoted = \relative c'' {
  12   R1
  13   \grace g16 f4 \grace a16 bes4 \grace b16 c4 c4
  14 }
  15
  16 \addquote quoted \quoted
  17
  18
  19 <<
  20   \new Staff {
  21     \set Staff.instrumentName = "quoted"
  22     \quoted
  23     }
  24   \new Staff \new Voice \relative c'' {
  25     \set Staff.instrumentName = "quoted"
  26     R1
  27     \cueDuring #"quoted" #1  { \grace s16. r2 }
  28     c2^"original"
  29   }
  30 >>