]> git.donarmstrong.com Git - lilypond.git/commitdiff
*** empty log message ***
authorHan-Wen Nienhuys <hanwen@xs4all.nl>
Tue, 10 Dec 2002 23:43:21 +0000 (23:43 +0000)
committerHan-Wen Nienhuys <hanwen@xs4all.nl>
Tue, 10 Dec 2002 23:43:21 +0000 (23:43 +0000)
lily/font-metric.cc
lily/parser.yy
scm/drums.scm

index 93592ee4cf0285f5fbc5e23f431f6b3fa792f991..86f9700083d449dc9158735b4e7b4a8df8d5f916 100644 (file)
@@ -143,7 +143,6 @@ Font_metric::find_by_name (String) const
   return m;
 }
 
-
 LY_DEFINE(ly_find_glyph_by_name, "ly:find-glyph-by-name", 2 , 0, 0,
          (SCM font, SCM name),
          "This function retrieves a Molecule for the glyph named @var{name} in "
index 3483bbc3f67845178f1445780cdc856bb651bca5..7dccfe006b23040f09682c435841b8bd0d61b649 100644 (file)
 
 /*
   Two shift/reduce problems:
-    - empty music-list
-    - empty pre-events
-
-
-
-(bullshit.
-
-s/r:
 
 1.     foo = bar.
 
-       "bar" -> String -> Lyric -> Music
+       "bar" -> String -> Lyric -> Music -> music-assignment
 
-       "bar" -> String
+       "bar" -> String -> string-assignment
 
 
 2.  \repeat
index 9162e6821fe9457b1f43e2f5687c9db23cce033b..07420c0ef393c546260fe39e80b247a26e535ecb 100644 (file)
  )
 
 (define (make-head-type-elem t)
-   (let* ( (m (make-music-by-name 'Music)))
+   (let* ( (m (make-music-by-name 'OverrideProperty)))
      (set-mus-properties!
       m
-      `((iterator-ctor . ,Push_property_iterator::constructor)
-       (symbol . NoteHead)
+      `((symbol . NoteHead)
        (grob-property . style)
        (grob-value . ,t)
        (pop-first  . #t)))