]> git.donarmstrong.com Git - lilypond.git/blobdiff - input/regression/general-scheme-bindings.ly
Issue 5167/6: Changes: show \markup xxx = ... \etc assignments
[lilypond.git] / input / regression / general-scheme-bindings.ly
index ad625ff25a7953f81024debc4d09be882ac71646..b810d9b2e76dbf1855b844b121b2815247063d2f 100644 (file)
@@ -1,18 +1,21 @@
 \header {
 
-  texidoc = "This file tests various Scheme utiliity functions." 
+  texidoc = "This file tests various Scheme utility functions." 
 
 }
 
 
-\version "2.11.8"
+\version "2.19.22"
 
 %% todo : use macro, to show the statement tested. 
 #(ly:progress "~a\n" (ly:expand-environment "${HOME} $HOME $$ "))
-#(ly:font-config-display-fonts)
 
-#(ly:progress "~A\n" (ly:duration->string (ly:make-duration 2 2 3 7)))
-#(ly:parser-parse-string (ly:parser-clone parser) "foo  = #1 #(ly:progress \"hello there\n\")")
+
+%% very platform dependent.
+%% #(ly:font-config-display-fonts)
+
+#(ly:progress "~A\n" (ly:duration->string (ly:make-duration 2 2 3/7)))
+#(ly:parser-parse-string (ly:parser-clone) "foo  = #1 #(ly:progress \"hello there\n\")")
 
 #(ly:progress "~a\n" (ly:truncate-list! (iota 5) 10))
 #(ly:progress "~a\n" (ly:truncate-list! (iota 10) 5))