X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=input%2Fregression%2Floglevels.ly;h=23ff272078645e77309f6694a0ef82a6cfe3896c;hb=84df877933ef6b3b9915e58bf0ca8bd7d92fea3d;hp=705ed3299d974e101b7ef843cecb9184bbc3afa5;hpb=b8e19438b2d69674efcf408586950e384d5e4b06;p=lilypond.git diff --git a/input/regression/loglevels.ly b/input/regression/loglevels.ly index 705ed3299d..23ff272078 100644 --- a/input/regression/loglevels.ly +++ b/input/regression/loglevels.ly @@ -1,4 +1,4 @@ -\version "2.15.9" +\version "2.16.0" #(ly:set-option 'warning-as-error #f) #(ly:expect-warning (_ "Test warning\n")) @@ -13,31 +13,31 @@ are commented out. Comment them in to check the output manually. } %%%% message functions of the Input class: -#(display "\nMessage functions of the Input class:\n") +#(display "\nMessage functions of the Input class:\n" (current-error-port)) messageTest = #(define-music-function (parser location) () (ly:input-message location "Test ly:input-message" ) (make-music 'Music)) { -% #(display "-) Testing message\n") +% #(display "-) Testing message\n" (current-error-port)) \messageTest % message -% #(display "-) Testing warning\n") +% #(display "-) Testing warning\n" (current-error-port)) c4( c( c) % warning -% #(display "-) Testing error\n") +% #(display "-) Testing error\n" (current-error-port)) % sr % error } %%%% message functions in the warn.hh file: -#(display "Message functions in the warn.hh file:\n") +#(display "Message functions in the warn.hh file:\n" (current-error-port)) -% #(display "-) Testing debug\n") +% #(display "-) Testing debug\n" (current-error-port)) #(ly:debug "Test debug\n") -% #(display "-) Testing progress\n") +% #(display "-) Testing progress\n" (current-error-port)) #(ly:progress "Test progress\n") -% #(display "-) Testing message\n") +% #(display "-) Testing message\n" (current-error-port)) #(ly:message "Test message\n") -% #(display "-) Testing warning\n") +% #(display "-) Testing warning\n" (current-error-port)) #(ly:warning "Test warning\n") -% #(display "-) Testing error\n") -% #(ly:error "Test error\n") +% #(display "-) Testing error\n" (current-error-port)) +% #(ly:error "Test error\n" (current-error-port))