Nicolas Sceaux wrote:
Create that music-display.scm file, in the same directory as
displayscheme.ly, with the code from
http://lists.gnu.org/archive/html/lilypond-devel/2004-11/msg00029.html
In my best attempt to extract the code from that email I get:
GNU LilyPond 2.4.2
Processing `displayscheme.ly'
Parsing...
Backtrace:
In /usr/share/guile/1.6/srfi/srfi-1.scm:
637: 50 (if (null? rest) (map1 f list1) ...)
...
628: 51 (begin (set-cdr! p (list (f #))) (lp (cdr ls) (cdr p)))
629: 52* [set-cdr! (" 'direction 1") ...
629: 53* [list ...
629: 54* [#<procedure #f (prop)> (text #<procedure number-markup #> #)]
In music-display.scm:
32: 55 [format:format #f "~%~v_'~a ~a" 28 text ...
35: 56* (cond (# #) (# #) (#t #))
36: 57 [format:format #f "(list~{~a~})" ...
37: 58* [map #<procedure #f (mus)> (#<procedure number-markup #> #)]
In /usr/share/guile/1.6/srfi/srfi-1.scm:
637: 59 (if (null? rest) (map1 f list1) ...)
...
628: 60 (begin (set-cdr! p (list (f #))) (lp (cdr ls) (cdr p)))
629: 61* [set-cdr! (" number-markup") ...
629: 62* [list ...
629: 63* [#<procedure #f (mus)> (#<procedure simple-markup #> "1")]
In music-display.scm:
38: 64 [format:format #f "~%~v_~a" 39 ...
40: 65* [mus:pretty-string (#<procedure simple-markup #> "1")]
In unknown file:
?: 66 (let ((depth #)) (if (not #) (error "Too many arguments.")) ...)
In music-display.scm:
...
28: 67 (cond (# #) (# #) (# #) ...)
61: 68* (and (list? obj) (markup-function? (car obj)))
61: 69 (markup-function? (car obj))
music-display.scm:61:27: In expression (markup-function? (car obj)): music-display.scm:61:27: Unbound variable: markup-function?
Paul
_______________________________________________ lilypond-user mailing list [EMAIL PROTECTED] http://lists.gnu.org/mailman/listinfo/lilypond-user
