From: fred <fred>
Date: Sun, 24 Mar 2002 19:35:50 +0000 (+0000)
Subject: lilypond-0.0.43
X-Git-Tag: release/1.5.59~5158
X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=f1e8cb384417a3679bd563161f66675e2ad4fb59;p=lilypond.git

lilypond-0.0.43
---

diff --git a/lily/voice-elt.cc b/lily/voice-elt.cc
index f244327c5f..5b59242c75 100644
--- a/lily/voice-elt.cc
+++ b/lily/voice-elt.cc
@@ -1,5 +1,5 @@
 /*
-  voiceelt.cc -- implement Voice_element
+  voice-elt.cc -- implement Voice_element
 
   source file of the LilyPond music typesetter
 
@@ -15,6 +15,14 @@
 #include "command-request.hh"
 
 
+void
+Voice_element::transpose(Melodic_req const&d)const
+{
+    for (iter_top(reqs,i); i.ok(); i++) {
+	i->transpose(d);
+      }
+}
+
 void
 Voice_element::print() const
 {
diff --git a/lily/voice.cc b/lily/voice.cc
index 47e9e28378..2294d57b2e 100644
--- a/lily/voice.cc
+++ b/lily/voice.cc
@@ -16,6 +16,13 @@
 #include "midi-stream.hh"
 #include "voice-element.hh"
 
+void
+Voice::transpose(Melodic_req const & d)const
+{
+     for (iter_bot(elts, i); i.ok(); i--)
+	i->transpose(d); 
+}
+
 void
 Voice::set_default_group(String s)
 {