diff options
Diffstat (limited to 'tests/examplefiles/lilypond/example.ly.output')
| -rw-r--r-- | tests/examplefiles/lilypond/example.ly.output | 87 |
1 files changed, 47 insertions, 40 deletions
diff --git a/tests/examplefiles/lilypond/example.ly.output b/tests/examplefiles/lilypond/example.ly.output index e82aa6a4..0aafee9d 100644 --- a/tests/examplefiles/lilypond/example.ly.output +++ b/tests/examplefiles/lilypond/example.ly.output @@ -11,7 +11,7 @@ '% it with Guile 1 (as in official releases as of this writing),' Comment.Single '\n' Whitespace -'% remove the "commented form" below.' Comment.Single +'% remove the "commented forms" below.' Comment.Single '\n\n' Whitespace '%{\n All supported constructs are covered in\n this file. For example, multi-line comments.\n\n These are non-nested. The following will\n end the whole comment:\n %{ %}' Comment.Multiline @@ -109,59 +109,66 @@ '\n' Whitespace '#' Punctuation -' ' Text +' ' Text.Whitespace '#;(' Comment -'This is a commented form. After it, we are still in Scheme mode.' Comment +'This is a commented form. There is another just after.' Comment ')' Comment -'\n' Text +'\n ' Text.Whitespace +'#;' Comment +'+inf.0' Comment +'\n ' Text.Whitespace +';; After these comments, we are still in Scheme mode.' Comment.Single +'\n' Text.Whitespace '(' Punctuation 'define-music-function' Name.Builtin.SchemeFunction -' ' Text +' ' Text.Whitespace '(' Punctuation 'music' Name.Function -' ' Text +' ' Text.Whitespace 'n' Name.Variable ')' Punctuation -' ' Text +' ' Text.Whitespace '(' Punctuation 'ly:music?' Name.Builtin.SchemeFunction -' ' Text +' ' Text.Whitespace 'index?' Name.Builtin.SchemeFunction ')' Punctuation -'\n ' Text +'\n ' Text.Whitespace '(' Punctuation -'let* ' Keyword +'let*' Keyword +' ' Text.Whitespace '(' Punctuation '(' Punctuation 'repeated' Name.Function -' ' Text +' ' Text.Whitespace '(' Punctuation -'make-list' Name.Function -' ' Text +'make-list' Name.Builtin.SchemeBuiltin +' ' Text.Whitespace 'n' Name.Variable -' ' Text +' ' Text.Whitespace 'music' Name.Variable ')' Punctuation ')' Punctuation -'\n ' Text +'\n ' Text.Whitespace '(' Punctuation 'copied' Name.Function -' ' Text +' ' Text.Whitespace '(' Punctuation -'map ' Name.Builtin.SchemeBuiltin +'map' Name.Builtin.SchemeBuiltin +' ' Text.Whitespace 'ly:music-deep-copy' Name.Builtin.SchemeFunction -' ' Text +' ' Text.Whitespace 'repeated' Name.Variable ')' Punctuation ')' Punctuation ')' Punctuation -'\n ' Text +'\n ' Text.Whitespace '; This is a Scheme comment.' Comment.Single -'\n ' Text +'\n ' Text.Whitespace '(' Punctuation 'make-sequential-music' Name.Builtin.SchemeFunction -' ' Text +' ' Text.Whitespace 'copied' Name.Variable ')' Punctuation ')' Punctuation @@ -176,15 +183,15 @@ '#' Punctuation '(' Punctuation 'define-music-function' Name.Builtin.SchemeFunction -' ' Text +' ' Text.Whitespace '(' Punctuation 'music' Name.Function ')' Punctuation -' ' Text +' ' Text.Whitespace '(' Punctuation 'ly:music?' Name.Builtin.SchemeFunction ')' Punctuation -'\n ' Text +'\n ' Text.Whitespace '#{' Punctuation '\n ' Whitespace '% LilyPond syntax here.' Comment.Single @@ -198,12 +205,12 @@ '1' Literal.Number '\n ' Whitespace '#' Punctuation -' ' Text +' ' Text.Whitespace '; Scheme syntax again.' Comment.Single -'\n ' Text +'\n ' Text.Whitespace '(' Punctuation 'ly:music-deep-copy' Name.Builtin.SchemeFunction -' ' Text +' ' Text.Whitespace 'music' Name.Variable ')' Punctuation '\n ' Whitespace @@ -214,34 +221,34 @@ '#' Punctuation '(' Punctuation 'define-markup-command' Name.Builtin.SchemeFunction -' ' Text +' ' Text.Whitespace '(' Punctuation 'small-italic' Name.Function -' ' Text +' ' Text.Whitespace 'layout' Name.Variable -' ' Text +' ' Text.Whitespace 'props' Name.Variable -' ' Text +' ' Text.Whitespace 'arg' Name.Variable ')' Punctuation -' ' Text +' ' Text.Whitespace '(' Punctuation 'markup?' Name.Builtin.SchemeFunction ')' Punctuation -'\n ' Text +'\n ' Text.Whitespace '(' Punctuation 'interpret-markup' Name.Builtin.SchemeFunction -' ' Text +' ' Text.Whitespace 'layout' Name.Variable -' ' Text +' ' Text.Whitespace 'props' Name.Variable -'\n ' Text +'\n ' Text.Whitespace '(' Punctuation 'make-small-markup' Name.Builtin.SchemeFunction -' ' Text +' ' Text.Whitespace '(' Punctuation 'make-italic-markup' Name.Builtin.SchemeFunction -' ' Text +' ' Text.Whitespace 'arg' Name.Variable ')' Punctuation ')' Punctuation @@ -301,8 +308,8 @@ '#' Punctuation '(' Punctuation -'symbol->string' Name.Variable -' ' Text +'symbol->string' Name.Builtin.SchemeBuiltin +' ' Text.Whitespace "'some-symbol" Literal.String.Symbol ')' Punctuation '\n\n' Whitespace |