3 #(ly:set-option 'warning-as-error #f)
4 #(ly:expect-warning (_ "Test warning\n"))
5 #(ly:expect-warning (_ "already have slur"))
9 Test the different loglevels of lilypond. Run this file with --loglevel=NONE,
10 ERROR, WARNING, PROGRESS, DEBUG to see the different loglevels. The errors
11 are commented out. Comment them in to check the output manually.
15 %%%% message functions of the Input class:
16 #(display "\nMessage functions of the Input class:\n")
18 messageTest = #(define-music-function (parser location) ()
19 (ly:input-message location "Test ly:input-message" )
23 % #(display "-) Testing message\n")
24 \messageTest % message
25 % #(display "-) Testing warning\n")
27 % #(display "-) Testing error\n")
31 %%%% message functions in the warn.hh file:
32 #(display "Message functions in the warn.hh file:\n")
34 % #(display "-) Testing debug\n")
35 #(ly:debug "Test debug\n")
36 % #(display "-) Testing progress\n")
37 #(ly:progress "Test progress\n")
38 % #(display "-) Testing message\n")
39 #(ly:message "Test message\n")
40 % #(display "-) Testing warning\n")
41 #(ly:warning "Test warning\n")
42 % #(display "-) Testing error\n")
43 % #(ly:error "Test error\n")