input/regression/markup-depth-non-terminating.ly

   1 \version "2.15.12"
   2 #(ly:set-option 'warning-as-error #f)
   3 #(ly:expect-warning (ly:translate-cpp-warning-scheme "Markup depth exceeds maximal value of %d; Markup: %s") 1024 "recursive-explosion-markup")
   4
   5 \header {
   6   texidoc = "Markups have a maximum depth to prevent non-termination."
   7
   8 }
   9
  10 % A simple markup function that calls itself and increases its argument, so
  11 % it will grow forever, unless we terminate it.
  12 #(define-markup-command (recursive-explosion layout props nr)
  13   (number?)
  14   (interpret-markup layout props (make-recursive-explosion-markup (+ nr 1))))
  15
  16 \markup { Test: \recursive-explosion #1 }