Re: emacs mode test file

[Arjan Bos]

James,

AFAIK there is no such file. Maybe there should be one for regression- 
testing purposes? Perhaps the best way to go is to start with your own  
files and fix all the colouring options.


However, I don't know how familiar you are with the emacs variety of  
lisp, elisp, but as you know lilypond ships with a complete emacs  
mode. You could try to read that in order to re-create it for nano.  
Basically the file lilypond-font-lock.el defines the different levels  
of colouring. Looking at it, the colouring is split into several  
regexp's that evaluate to a face. And a face is basically a colour and  
some other markup on a font.
So you could create an index per font-lock-*-face and check what it  
does. This could give you a head start on what types of syntax get  
which colours.


Oh, and it uses a generated file for the keywords called lilypond- 
words.el. Perhaps you could build on that?


HTH,
Arjan

On 9 mei 2008, at 08:54, James E. Bailey wrote:

is there a file that shows all of the pretty color options that the  
emacs mode shows? I may attempt a nanorc that does something  
similar, and I'd just like to know what options there are. Rather,  
I'd like to know what emacs does so I can emulate it somewhat.



___
lilypond-user mailing list
lilypond-user@gnu.org
http://lists.gnu.org/mailman/listinfo/lilypond-user




___
lilypond-user mailing list
lilypond-user@gnu.org
http://lists.gnu.org/mailman/listinfo/lilypond-user

emacs mode test file

[James E. Bailey]

is there a file that shows all of the pretty color options that the  
emacs mode shows? I may attempt a nanorc that does something similar,  
and I'd just like to know what options there are. Rather, I'd like to  
know what emacs does so I can emulate it somewhat.



___
lilypond-user mailing list
lilypond-user@gnu.org
http://lists.gnu.org/mailman/listinfo/lilypond-user

Re: [PATCH] Added chromatic ledger and internal ledger lines. Sample test file is

[Kevin Dalley]

One more patch for the chromatic staff.  I reverted this change.  My
original version does not work at all when a ledger line is at
position 0.  This will do better, but the ledger line code still needs
some revisions for this case.

Please tell me if you would like a patch which starts from the current
2.11.  I'm willing to give it a try, if I can figure out enough git.

>From b530144219ff01bb837b559859f5a16ab5548709 Mon Sep 17 00:00:00 2001
From: Kevin Dalley <[EMAIL PROTECTED]>
Date: Sat, 24 Mar 2007 18:33:55 -0700
Subject: [PATCH] Ignore pos if pos is 0.
Restores original behavior, though this should be fixed to allow for ledger 
lines
at position 0.
---
 lily/ledger-line-spanner.cc |2 +-
 1 files changed, 1 insertions(+), 1 deletions(-)

diff --git a/lily/ledger-line-spanner.cc b/lily/ledger-line-spanner.cc
index 8401d2d..1ec9a68 100644
--- a/lily/ledger-line-spanner.cc
+++ b/lily/ledger-line-spanner.cc
@@ -526,7 +526,7 @@ Ledger_line_spanner::print (SCM smob)
   Item *h = dynamic_cast (heads[i]);
 
   int pos = Staff_symbol_referencer::get_rounded_position (h);
-  if (!staff_extent.contains (pos - sign (pos)))
+  if (pos && !staff_extent.contains (pos - sign (pos)))
{
  Interval ledger_size;
  Real left_shorten;
-- 
1.5.0.3



___
lilypond-user mailing list
lilypond-user@gnu.org
http://lists.gnu.org/mailman/listinfo/lilypond-user

Re: [PATCH] Added chromatic ledger and internal ledger lines. Sample test file is

[Kevin Dalley]

Oops.  I forgot my virtual destructor.

>From 5cc0407d62fd9cf02960cc5996b30578862e8e4c Mon Sep 17 00:00:00 2001
From: Kevin Dalley <[EMAIL PROTECTED]>
Date: Wed, 7 Mar 2007 00:04:37 -0800
Subject: [PATCH] Added virtual destructor for Layout_pos

---
 lily/note-heads-engraver.cc |3 +++
 1 files changed, 3 insertions(+), 0 deletions(-)

diff --git a/lily/note-heads-engraver.cc b/lily/note-heads-engraver.cc
index 4e9b0fe..52b7c5a 100644
--- a/lily/note-heads-engraver.cc
+++ b/lily/note-heads-engraver.cc
@@ -26,6 +26,9 @@ class Layout_pos
 {
 public:
   virtual int pos(Pitch* pit) = 0;
+  virtual ~Layout_pos()
+  {
+  }
 };
 
 class Layout_pos_traditional : public Layout_pos
-- 
1.4.4.4



___
lilypond-user mailing list
lilypond-user@gnu.org
http://lists.gnu.org/mailman/listinfo/lilypond-user

Errors while running simple test file

[pjdraud]

I just downloaded and compiled Lilypod from source (there is no current bonary
for my distro).  I used the simple test file from the tutorial, and this is the
output:

--
GNU LilyPond 2.4.2
Processing `test.ly'
Parsing...
Interpreting music... [2]
Preprocessing graphical objects...
Calculating line breaks... [2]
Interpreting music...
MIDI output to `test.midi'...
Track...
Backtrace:
In /usr/local/share/lilypond/2.4.2/scm/page-layout.scm:
  72: 29  (set! stencil (ly:stencil-combine-at-edge stencil Y ...))
  73: 30* [ly:stencil-combine-at-edge #f 1 -1 ...
  74: 31* [Text_interface::interpret_markup #< Output_def> ((# # # ...)) ...]
In unknown file:
   ?: 32* [get-coding-vector "latin1"]
In /usr/local/share/lilypond/2.4.2/scm/encoding.scm:
 124: 33* [caddr ...
 124: 34* [get-coding "latin1"]
 105: 35  (let ((entry #)) (if entry (cons # #) (if # # #)))
...
 107: 36  [cons "latin1.enc" ...
 107: 37* [force #>]
In unknown file:
   ?: 38* [#]
In /usr/local/share/lilypond/2.4.2/scm/encoding.scm:
  76: 39* [get-coding-from-file "latin1.enc"]
  65: 40  (let* ((coding #) (com #) (vec #) (tab #)) (list com vec tab))
  65: 41* [read-encoding-file "latin1.enc"]
  15: 42  (let* ((path #) (unused #) (raw #) (string #) ...) (cons command 
vector))
  19: 43* [match:substring #f 1]
In unknown file:
   ?: 44  (let* ((matchnum #) (start #) (end #)) (and start end ...))
   ?: 45* [match:start #f 1]
   ?: 46  (let* ((matchnum (if # # 1)) (start (car #))) (if (= start -1) #f 
start))
   ?: 47* [car ...
   ?: 48* [vector-ref #f 2]

: In procedure vector-ref in expression (vector-ref match 
matchnum):
: Wrong type argument in position 1: #f
--

I also ran the script to set up the paths and environment variables.  What could
be causing this error?


Illinois State University Webmail https://webmail2.ilstu.edu



___
lilypond-user mailing list
lilypond-user@gnu.org
http://lists.gnu.org/mailman/listinfo/lilypond-user

re: Test file

[Carter Brey]

My thanks to both Paul and Thorkil for their kind replies. I apologize 
to the for the [spam] header in my last post; my antispam utility 
(PopFile) is still learning, and I forgot to alter the header before 
replying. Sic transit cloaca mundi.

CB



___
Lilypond-user mailing list
[EMAIL PROTECTED]
http://mail.gnu.org/mailman/listinfo/lilypond-user

Re: Test file

[Paul Scott]

Carter Brey wrote:

Hi all,

This is one of the files I've tried to compile with Lily 2.0.1, both 
before and after running it through convert-ly. I only get error 
messages in either case.

If it runs for you, please let me know.
It doesn't run for me.  convert-ly didn't seem to convert to the new 
\markup  Attached is a version of your file with most of the remaining 
errors converted to \markup.  I left you two things to correct.

HTH,

Paul Scott

#(ly:set-option 'old-relative)
#(set! point-and-click line-location)

\version "1.9.8"

\header{
title = "Study in Tango"
subtitle = "For solo Cello"
composer = "Carter Brey"
dedication = "In Memory of Stephen Kates"
tagline = "New York City, July, 2002"
copyright = "Copyright © 2002 by Carter Brey"
}

\score{
\notes{
\property Staff.midiInstrument = #"cello"
\key d \minor
\time 5/4
\clef tenor
\property Voice.TupletBracket \override #'padding = #1
\property Voice.TextScript \override #'extra-offset = #'( -3 . 0 )
\property Voice.Hairpin \override #'extra-offset = #'(0 . -1)
\relative c'' {a4\sfp->^\markup{ \column < \large \bold Introduction 
\large \italic "very free" > }(^\fermata ~
\property Voice.TextScript \revert #'extra-offset 
\times 8/7  { a32[\< bes a g a bes  a)]} \property Voice.TupletBracket 
\set #'number-visibility = ##f \times 8/7  { g[( a g f g a  g)]} 
\times 8/7  { f[( g f e f g  f)]} \times 8/7  { e[( f e d e f ) e\!]} 
a,4-0\f \clef bass \property Voice.Hairpin \revert #'extra-offset 
\times 8/7  { a32[-3\mf\<( bes a g a bes  a)]} 
\times 8/7  { g[( a g f g a  g)]} \times 8/7  { f[( g f e f g  f)]} 
\times 8/7  { e[^""^\markup{ \italic rall. } ( f e d e f ) e\!]}
\property Voice.DynamicText \override #'extra-offset = #'(0 . -1.5)
16\f  f-- d-- f-- bes^""^""^\markup{ \italic accel. } f) d' 
bes f' d bes' f d' bes f' d
\clef treble bes' f d' bes 
\property Voice.DynamicText \revert #'extra-offset 
f'4->^\fermata \times 8/7  { e32[(\pp f e d e f  e)]} \times 8/7  { 
d[( e d c d e  d)]}
\times 8/7  { c[( d c bes c d  c)]} \times 8/7  { bes[( c bes a bes c  
bes)]}
\times 8/7  { a[\<( bes a g a bes  a)]}  \times 8/7  { bes[( c bes a 
bes c  bes)]}
\times 8/7  { a[( bes a g a bes  a)]} \times 8/7  { g[( a g f g a  
g)]} \times 8/7  { f[( g f e f g ) f\!]} 
e4\f \clef bass \smalla,,32[_\markup{ \italic dim. } ( cis e a e 
cis a cis]  \clef tenor 
\times 8/11   { e32[ a cis e cis a cis e
a  cis   e)]} \clef treble \normalsize a4\p^\fermata \clef bass   
a,,,16[\ff-^^""^""^\markup{ \large \bold Allegro } g)-^ f-^ e-^] 
\time 10/16 \bar "||" }
\stemUp
[->( ) ]  [->( ) ] [-> ] [-> ]
\stemBoth
\property Voice.TupletBracket \set #'number-visibility = ##t
\times 6/7 {32(-> bes a gis a bes  a)} \times 6/7 {(-> bes a 
gis a bes  a)} 
\times 4/5 {(-> bes a gis  a)} \times 4/5 {(-> bes a gis  a)}
\stemDown
16[  ) ]
[( )  ]
[ ] [ ] 
\stemBoth
\clef tenor \times 6/7 {32( bes' a' g' a' bes'  a')}  
\times 6/7  {a'( bes' a' g' a' bes'  a')}  
\times 4/5 {a'( bes' a' g'  a')} \times 4/5 {a'( bes' a' g'  a')} 
\clef treble
\relative c'' { \times 6/8  { d32[( c bes a g f e  d)]} \times 6/8  { 
c'[( bes a g f e d  c)]}bes[( c d e f g a  bes)]
\times 6/7 {( f e d e f  e)} \times 6/7 {( f e d e f  e)} 
\times 4/5 {( f e d  e)} \times 4/5 {( f e d  e)}
\clef bass \times 6/8  { d[\mf( c bes a g f e  d)]} \times 6/8  { c'[( 
bes a g f e d  c)]}bes[( c d e f g a  bes)]
\times 6/7 {( f e d e f  e)} \times 6/7 {( f e d e f  e)}   
e[\<( f g a
b cis d ) e\!]}
\stemDown
16[(\f ) ] [( ) ] [ ] 
[ ]
[( ) ] [( ) ] [ ]  [ ]
\stemBoth
\property Voice.TupletBracket \override #'padding = #1.5
\relative c'' { \times 16/17 {a32( g fis e d cis b a g fis e d cis b a 
g  fis)}}
\stemUp 16[ ] \stemBoth
\relative c'' { \times 16/17 {a32( g f e d c bes a g f e d c bes a g  
f)}e[( f g
 f)]}
\property Voice.TupletBracket \override #'padding = #1
\stemUp 16[( ) ] [( ) ] 
\stemBoth [ ] [ ]
\clef treble \relative c'' { \times 6/7 {b32( c b ais b c  b)} \times 
6/7 {b( c b ais b c
 b)} \times 4/5 {b( c b ais  b)} \times 4/5 {b( c b ais  b)}
   

Test file

[Carter Brey]

Hi all,

This is one of the files I've tried to compile with Lily 2.0.1, both 
before and after running it through convert-ly. I only get error 
messages in either case.

If it runs for you, please let me know.

Many many thanks,
Carter
#(set! point-and-click line-location)

\version "1.6.5"

\header{
title = "Study in Tango"
subtitle = "For solo Cello"
composer = "Carter Brey"
dedication = "In Memory of Stephen Kates"
tagline = "New York City, July, 2002"
copyright = "Copyright © 2002 by Carter Brey"
}

\score{
\notes{
\property Staff.midiInstrument = #"cello"
\key d \minor
\time 5/4
\clef tenor
\property Voice.TupletBracket \override #'padding = #1
\property Voice.TextScript \override #'extra-offset = #'( -3 . 0 )
\property Voice.Hairpin \override #'extra-offset = #'(0 . -1)
\relative c'' {a4\sfp->^#'(lines ((large bold)"Introduction") ((large 
italic) "very free"))(^\fermata ~
\property Voice.TextScript \revert #'extra-offset 
\times 8/7 {[a32\< bes a g a bes )a]} \property Voice.TupletBracket 
\set #'number-visibility = ##f \times 8/7 {[g( a g f g a )g]} 
\times 8/7 {[f( g f e f g )f]} \times 8/7 {[e( f e d e f )\!e]} 
a,4-0\f \clef bass \property Voice.Hairpin \revert #'extra-offset 
\times 8/7 {[a32-3\mf\<( bes a g a bes )a]} 
\times 8/7 {[g( a g f g a )g]} \times 8/7 {[f( g f e f g )f]} \times 
8/7 {[e^""^#'((italic) "rall.")( f e d e f )\!e]}
\property Voice.DynamicText \override #'extra-offset = #'(0 . -1.5)
  f-- d-- f-- bes^""^""^#'((italic) "accel.") f d' bes f' 
d bes' f d' bes f' d
\clef treble bes' f d' bes 
\property Voice.DynamicText \revert #'extra-offset 
f'4->^\fermata \times 8/7 {[e32(\pp f e d e f )e]} \times 8/7 {[d( e d 
c d e )d]}
\times 8/7 {[c( d c bes c d )c]} \times 8/7 {[bes( c bes a bes c )bes]}
\times 8/7 {[a\<( bes a g a bes )a]}  \times 8/7 {[bes( c bes a bes c 
)bes]}
\times 8/7 {[a( bes a g a bes )a]} \times 8/7 {[g( a g f g a )g]} 
\times 8/7 {[f( g f e f g )\!f]} 
e4\f \clef bass \small  [a,,32_#'((italic) "dim.")( cis e a e cis a 
cis]  \clef tenor 
\times 8/11  {[e32 a cis e cis a cis e
a  cis  )e]} \clef treble \normalsize a4\p^\fermata \clef bass 
[a,,,16\ff-^^""^""^#'((large bold) "Allegro") g-^ f-^ e-^] 
\time 10/16 \bar "||" }
\stemUp
[( a,>  ]  [( b,>  ] [ c> ] [ d> ]
\stemBoth
\property Voice.TupletBracket \set #'number-visibility = ##t
\times 6/7 { a> bes a gis a bes )a} \times 6/7 { a> bes a 
gis a bes )a} 
\times 4/5 { a> bes a gis )a} \times 4/5 { a> bes a gis )a}
\stemDown
[   ]
[   ]
[ ] [ ] 
\stemBoth
\clef tenor \times 6/7 { bes' a' g' a' bes' )a'}  \times 
6/7  {a'( bes' a' g' a' bes' )a'}  
\times 4/5 {a'( bes' a' g' )a'} \times 4/5 {a'( bes' a' g' )a'} \clef 
treble
\relative c'' { \times 6/8 {[d32( c bes a g f e )d]} \times 6/8 {[c'( 
bes a g f e d )c]}  [bes( c d e f g a )bes]
\times 6/7 { f e d e f )e} \times 6/7 { f e d e f )e} 
\times 4/5 { f e d )e} \times 4/5 { f e d )e}
\clef bass \times 6/8 {[d\mf( c bes a g f e )d]} \times 6/8 {[c'( bes 
a g f e d )c]}  [bes( c d e f g a )bes]
\times 6/7 { f e d e f )e} \times 6/7 { f e d e f )e} 
[e\<( f g a
b cis d )\!e]}
\stemDown
[  ] [  ] [ ] 
[ ]
[  ] [  ] [ ]  
[ ]
\stemBoth
\property Voice.TupletBracket \override #'padding = #1.5
\relative c'' { \times 16/17 {a32( g fis e d cis b a g fis e d cis b a 
g )fis}}
\stemUp [ ] \stemBoth
\relative c'' { \times 16/17 {a32( g f e d c bes a g f e d c bes a g 
)f}  [e( f g
)f]}
\property Voice.TupletBracket \override #'padding = #1
\stemUp [  ] [  ] 
\stemBoth [ ] [ ]
\clef treble \relative c'' { \times 6/7 {b32( c b ais b c )b} \times 
6/7 {b( c b ais b c
)b} \times 4/5 {b( c b ais )b} \times 4/5 {b( c b ais )b}
\property Voice.TupletBracket \set #'number-visibility = ##f
\clef tenor \times 6/7 {e,\>( f e dis e f )e} \times 6/7 {e( f e dis e 
f )e} \times 4/5
{a,( bes a g )a} \times 4/5 {a( bes a g ) \!a}}

<{\times 6/7 { bes a g a bes )a} \times 6/7 { bes a g a bes )a}
\times 4/5 { bes a g )a} \times 4/5 { bes a g )a}