4 texidoc = "Stems with overridden 'length should not confuse height estimation.
5 This example should fit snugly on one page.
9 #(define (assert-single-page layout props arg)
10 (if (and (= (chain-assoc-get 'page:page-number props -1)
11 (ly:output-def-lookup layout 'first-page-number))
12 (chain-assoc-get 'page:last? props -1))
13 (interpret-markup layout props arg)
14 (ly:error "failed to fit test on single page")))
17 #(set-paper-size "a6")
20 system-system-spacing = #'((padding . 1.2))
21 oddHeaderMarkup = \markup \on-the-fly #assert-single-page \null
28 \override Stem #'length = #0
34 \remove "Bar_number_engraver"