Re: Issue 1355 in lilypond: Segfault with define-music-function

[lilypond]

Updates:
        Status: Fixed
        Labels: fixed_2_13_37

Comment #2 on issue 1355 by n.puttock: Segfault with define-music-function
http://code.google.com/p/lilypond/issues/detail?id=1355

Here's a sample error log from the test snippet which demonstrates the  
correct behaviour:

music.ly:3:12: In procedure ly:event-property in expression  
(ly:event-property arg (quote name)):
music.ly:3:12: Wrong type argument in position 1 (expecting Stream_event):  
#<Prob: Music C++: Music((origin . #<location music.ly:6:8>) (elements  
#<Prob: Music C++: Music((duration . #<Duration 4 >) (pitch . #<Pitch a >)  
(origin . #<location music.ly:6:8>))((display-methods #<procedure #f (note  
parser)>) (name . NoteEvent) (types general-music event note-event  
rhythmic-event melodic-event)) >
))((display-methods #<procedure #f (expr parser)> #<procedure #f (expr  
parser)> #<procedure #f (chord parser)>) (name . EventChord)  
(iterator-ctor . #<primitive-procedure  
ly:event-chord-iterator::constructor>) (length-callback .  
#<primitive-procedure ly:music-sequence::maximum-length-callback>)  
(to-relative-callback . #<primitive-procedure  
ly:music-sequence::event-chord-relative-callback>) (types general-music  
event-chord simultaneous-music)) >

LilyPond [music.ly] exited with return code 1.