]> git.donarmstrong.com Git - lilypond.git/blob - input/regression/markup-eps.ly
Coverage fix: add skyline-debug test.
[lilypond.git] / input / regression / markup-eps.ly
1 \header {
2
3   texidoc = "The epsfile markup command reads an EPS file"
4
5 }
6 \version "2.10.0"
7
8 #(let* ((port (open-output-file "box.eps")))
9
10   (display "%!PS-Adobe-3.0 EPSF-3.0
11 %%BoundingBox: 5 5 105 105
12 10 setlinewidth 10 10 moveto 0 90 rlineto 90 0 rlineto 0 -90 rlineto
13 closepath stroke" port)
14
15   (close port))
16
17 { c''4-\markup { \box \epsfile #X #10 #"box.eps" } }