Build: Remove .PRECIOUS flags.

[lilypond.git] / scm / define-event-classes.scm

diff --git a/scm/define-event-classes.scm b/scm/define-event-classes.scm
index c632e430a95f37a1dd184e8a8cdef5e4906ce132..875993b4078b36ec5cda6d32d90a236329a65f00 100644 (file)
--- a/scm/define-event-classes.scm
+++ b/scm/define-event-classes.scm
@@ -1,6 +1,6 @@
 ;;;; This file is part of LilyPond, the GNU music typesetter.
 ;;;;
-;;;; Copyright (C) 2005--2011 Erik Sandberg <mandolaerik@gmail.com>
+;;;; Copyright (C) 2005--2012 Erik Sandberg <mandolaerik@gmail.com>
 ;;;;
 ;;;; LilyPond is free software: you can redistribute it and/or modify
 ;;;; it under the terms of the GNU General Public License as published by
@@ -35,7 +35,8 @@
       harmonic-event hyphen-event laissez-vibrer-event mark-event
       multi-measure-text-event note-grouping-event
       pes-or-flexa-event repeat-tie-event spacing-section-event
-      layout-instruction-event completize-extender-event break-span-event))
+      layout-instruction-event completize-extender-event break-span-event
+      alternative-event))
 
     (layout-instruction-event . (apply-output-event))
     (script-event . (articulation-event text-script-event))
@@ -86,7 +87,8 @@
                      (cons leaf
                            (hashq-ref ancestor-lookup
                                       (cadr heritage)
-                                      '()))))))
+                                      '())))))
+  *unspecified*)
 
 ;; TODO: Allow entering more complex classes, by taking unions.
 (define-public (ly:make-event-class leaf)