Re: Difficult tweaks - not working!

[Mats Bengtsson]

I really recommend to copy examples from the WWW version
of the manual. There you can click on each example to see
the code that produced it.

You probably didn't realize that a semicolon in Scheme
code means that the rest of the line is a comment.
Since you have removed some line breaks, for example
after such comment lines, you have effectively commented
out some code. Especially, this causes a problem at the
following line, since you have then commented out a
number of closing parenthesis, which breaks the syntax:

; then do it. (set! (ly:grob-property grob 'style) style)))) 


  /Mats


Vivian Barty-Taylor wrote:

> I'm having trouble with the example described 
> in the "difficult tweaks" section of the manual.
> I'm wanting a stem with two different noteheads 
> on it. I started by copying the code from the manual 
> (correcting the 'curly' ' symbols this time!) then 
> changed various parameters. My code now looks like 
> this:
>
> #(define ((set-position-font-size pos style) 
> grob origin current) 
> (let* 
> 	((interfaces 
> 		(ly:grob-property grob 'interfaces))
> 		(position (ly:grob-property grob 'staff-position))) 
> 	(if (and 
> 		; is this a note head? (memq 'note-head-interface interfaces)
> 		; is the Y coordinate right? 
> 		(= pos position)) 
>
> 		; then do it. (set! (ly:grob-property grob 'style) style)))) 
>
> \relative { 
> 	c 
> 	\applyoutput #(set-position-font-size -2 #'cross) 
> <c e g> }
>
> When I try to compile it I get the error output:
>
> GUILE signaled an error for the expression beginning here
> #
>  (define ((set-position-font-size pos style) grob origin current) 
> /Users/anneke/Desktop/Vivian/Lilypond/Noteheads1.ly:1:2: 
> error: syntax error, unexpected '('
> # 
>  (define ((set-position-font-size pos style) grob 
> origin current) end of file in /Users/anneke/Desktop/
> Vivian/Lilypond/Noteheads1.ly
> /Users/anneke/Desktop/Vivian/Lilypond/Noteheads1.ly:18:1: 
> In expression (set-position-font-size -2 
> cross):
> /Users/anneke/Desktop/Vivian/Lilypond/Noteheads1.ly:18:1: 
> Unbound variable: set-position-font-
> size
>
> What is wrong?!
>
> Many thanks,
> Vivian Barty-Taylor,
> Netherlands.
>
>
>
> _______________________________________________
> lilypond-user mailing list
> address@hidden
> http://lists.gnu.org/mailman/listinfo/lilypond-user
>  


--
=============================================
        Mats Bengtsson
        Signal Processing
        Signals, Sensors and Systems
        Royal Institute of Technology
        SE-100 44  STOCKHOLM
        Sweden
        Phone: (+46) 8 790 8463                         
       Fax:   (+46) 8 790 7260
        Email: address@hidden
        WWW: http://www.s3.kth.se/~mabe
=============================================