3 texidoc = "This file tests various Scheme utiliity functions."
10 %% todo : use macro, to show the statement tested.
11 #(ly:progress "~a" (ly:expand-environment "${HOME} $HOME $$ "))
12 #(ly:font-config-display-fonts)
13 #(ly:progress "~A" (ly:duration->string (ly:make-duration 2 2 3 7)))
16 #(ly:parser-parse-string (ly:parser-clone parser) "foo = #1 #(ly:progress \"hello there\n\")")