Regression in parser

[Nicolas Sceaux]

Hi,

Using LilyPond from CVS, the following snippet causes a syntax error,
which 2.9.18 did not:

/******************************
testFunction = 
#(define-music-function (parser location) ()
  ;; test-data.ly contains music variable definitions
  (ly:parser-parse-string parser "\\include \"test-data.ly\"")
  (make-music 'SequentialMusic 'void #t))

\testFunction 

\new Staff { c' }
\******************************
==>
0ary-music-function.ly:14:11: error: syntax error, unexpected '{', expecting '='
\new Staff 
           { c' }

The same errors does not show if the music function takes an argument,
as in the following snippet:

/******************************
testFunction = 
#(define-music-function (parser location name) (string?)
  (ly:parser-parse-string parser
   (format #f "\\include \"~a\"" name))
  (make-music 'SequentialMusic 'void #t))


\testFunction "test-data.ly"

\new Staff { c' }
\******************************

robert:~/tmp nicolas$ cat test-data.ly
A = { c'' }
B = { d'' }

Note: both causes a seg fault, after the PDF has been produced. Idem for
previous version of LilyPond.

nicolas