s/\\plet *([1-9][0-9]*) *\/ *([2-9][0-9]*) *;/\\[$1\/$2/;
}
+sub convert_0_1_8_to_0_1_9
+{
+# sticky plet shorthand...
+# print "introduced plet and finger shorthands...\n";
+}
+
###############################################################
sub last_conversion
"0.1.6" => \&convert_0_1_5_to_0_1_6
,"0.1.7" => \&convert_0_1_6_to_0_1_7
,"0.1.8" => \&convert_0_1_7_to_0_1_8
+ ,"0.1.9" => \&convert_0_1_8_to_0_1_9
);
% Toplevel initialisation file.
-\version "0.1.8";
+\version "0.1.9";
breve = \duration { -1 0 }
longa = \duration { -2 0 }
TestedFeatures = "beams and beamflags";
}
-\version "0.1.8";
+\version "0.1.9";
\score{
\melodic { \multi 3 <
Ugh.. Wish we had grace notes.... It adds another dimension to this
piece of music. %}
-\version "0.1.8";
+\version "0.1.9";
cad = \melodic {
copyright = "public domain";
Tested = "test the Collision resolution ";
}
-\version "0.1.8";
+\version "0.1.9";
-\version "0.1.8";
+\version "0.1.9";
FontBody= \melodic{
\octave c';
\bar "|:";
% "(Feta definitively is not an abbreviation of Font-En-TjA)";
}
-\version "0.1.8";
+\version "0.1.9";
\include "font-body.ly"
\score{
% "(Feta definitively is not an abbreviation of Font-En-TjA)";
}
-\version "0.1.8";
+\version "0.1.9";
\include "font-body.ly"
\score{
TestedFeatures = "This file tests some nasty Gourlay spacings";
}
-\version "0.1.8";
+\version "0.1.9";
%{
-\version "0.1.8";
+\version "0.1.9";
blah = \melodic{
Tested Features: example file with comments
%}
-\version "0.1.8";
+\version "0.1.9";
% the % is a comment.
% \lbheel \lbheel \lfheel \lftoe
% \rbheel \rbtoe \rfheel \rftoe
-\version "0.1.8";
+\version "0.1.9";
\score{
\melodic {
-\version "0.1.8";
+\version "0.1.9";
ritme = \melodic{ %\octave ;
\partial 8;
% scales with accents.
%
-\version "0.1.8";
+\version "0.1.9";
blah = \melodic {
\meter 6/8;
\octave 'c ;
-\version "0.1.8";
+\version "0.1.9";
blah = \melodic {
"(Feta definitively is not an abbreviation of Font-En-TjA)";
}
-\version "0.1.8";
+\version "0.1.9";
shortlong = \melodic{
c4()c( c c |
-\version "0.1.8";
+\version "0.1.9";
\score{
\melodic{\octave c';
TestedFeatures = "This file tests various spacings";
}
-\version "0.1.8";
+\version "0.1.9";
multipart = \melodic{
\multi 3 <
}
-\version "0.1.8";
+\version "0.1.9";
beamintervals = \melodic{
\meter 7/4;
%}
-\version "0.1.8";
+\version "0.1.9";
toccata_commands = \melodic{
\meter 4/4;
Tested Features lyrics and chords
%}
-\version "0.1.8";
+\version "0.1.9";
melodie = \melodic {
\clef"violin";
Tested Features: lyrics, interleaving lyrics and staffs
%}
-\version "0.1.8";
+\version "0.1.9";
melody = \melodic{
\clef violin;
TEX {AA}|-|{PUNCT}|{ACCENT}|{NATIONAL}
WORD {A}{AN}*
ALPHAWORD {A}+
-INT -?{N}+
+DIGIT {N}
+UNSIGNED {N}+
+INT -?{UNSIGNED}
REAL ({INT}\.{N}*)|(-?\.{N}+)
KEYWORD \\{WORD}
WHITE [ \n\t\f]
return scan_escaped_word (YYText ()+1);
}
- {INT} {
+ {DIGIT} {
yylval.i = String_convert::dec2_i (String (YYText ()));
- return INT;
+ return DIGIT;
+ }
+
+ {UNSIGNED} {
+ yylval.i = String_convert::dec2_i (String (YYText ()));
+ return UNSIGNED;
}
\" {
\" {
start_quote ();
}
- {INT} {
+ {UNSIGNED} {
yylval.i = String_convert::dec2_i (String (YYText ()));
- return INT;
+ return UNSIGNED;
}
{NOTECOMMAND} {
return scan_escaped_word (YYText ()+1);
return REAL;
}
-{INT} {
+{UNSIGNED} {
yylval.i = String_convert::dec2_i (String (YYText ()));
- return INT;
+ return UNSIGNED;
}
[{}] {
= mudela_column_l_->mudela_score_l_->mudela_key_l_->notename_str (pitch_i_);
if (simple_plet_b_s)
- return name_str + Duration_convert::dur2_str (dur) + " ";
+ return name_str + Duration_convert::dur2_str (dur) + " ";
- //ugh
String str;
+ //ugh
if (dur.plet_b ())
str += String ("\\[")
+ String_convert::i2dec_str (dur.plet_.iso_i_, 0, 0)
mudela_stream_r << _("% midi copyright:") << copyright_str_ << "\n";
mudela_stream_r << _("% instrument:") << instrument_str_ << "\n";
+ // don't use last duration mode
+ mudela_stream_r << "\\duration 4;\n";
if (mudela_voice_p_list_.size() == 1)
mudela_voice_p_list_.top()->output (mudela_stream_r);
else
*os_p_ << filename_str_g;
*os_p_ << "\n\n";
// ugh
- *os_p_ << "\\version \"0.1.8\";\n";
+ *os_p_ << "\\version \"0.1.9\";\n";
}
void