+2005-08-12 Jan Nieuwenhuizen <janneke@gnu.org>
+
+ * lily/lily-guile.cc (parse_symbol_list): Bugfix.
+
2005-08-11 Jan Nieuwenhuizen <janneke@gnu.org>
* mf/GNUmakefile (get-*-fonts): Rename from get-*-pfa. Copy SVG
('\n[ \t]*,', ','),
# dangling semicolon
('\n[ \t]*;', ';'),
+ # delete gratuitous blocks
+ ('''(?ux)\n([ ]|\t\s*){\n\s*(.*?)(?![{}]|\b(do|for|else|if|switch|while)\b);\n\s*}''',
+ '\n\\2;'),
# brace open
('(\w)[ \t]*([^\s]*){([ \t]*\n)', '\\1\\2\n{\n'),
# brace open backslash
(shift) *-d;
a = 0 ? *x : *y;
+
+{
+ if (foo)
+ {
+ a = 1;
+ }
+}
+
+ if (prev_delta_pitch < - 1)
+ {
+ glyph_name = "svaticana.reverse.plica";
+ }
+ if (prev_delta_pitch < - 1)
+ {
+ glyph_name = svaticana.reverse.plica;
+ }
+ if (prev_delta_pitch < - 1)
+ {
+ glyph_name = "2";
+ }
'''
def test ():
return s;
}
-/* LST is whitespace separated list of symbols. */
+/* SYMBOLS is a whitespace separated list. */
SCM
-parse_symbol_list (char const *lst)
+parse_symbol_list (char const *symbols)
{
- String s = lst;
+ while (isspace (*symbols))
+ *symbols++;
+ String s = symbols;
s.substitute ('\n', ' ');
s.substitute ('\t', ' ');
return ly_string_array_to_scm (String_convert::split (s, ' '));