lilypond-0.1.7

diff --git a/lily/bar-column.cc b/lily/bar-column.cc
new file mode 100644 (file)
index 0000000..123b512
--- /dev/null
+++ b/lily/bar-column.cc
@@ -0,0 +1,35 @@
+/*
+  bar-column.cc -- implement Bar_column
+
+  source file of the GNU LilyPond music typesetter
+
+  (c) 1997 Han-Wen Nienhuys <hanwen@stack.nl>
+*/
+
+#include "bar.hh"
+#include "bar-column.hh"
+
+Bar_column::Bar_column()
+{
+    bar_l_ =0;
+    breakable_b_ = true;
+}
+
+void
+Bar_column::set_bar(Bar*b)
+{
+    Script_column::add_support( b );
+    bar_l_ = b;        
+}
+
+void
+Bar_column::do_substitute_dependency(Score_elem*o,Score_elem*n)
+{
+    Script_column::do_substitute_dependency(o,n);
+    if ( o == bar_l_ ) {
+       bar_l_ = n ? (Bar*)n->item() : 0;
+    }
+}
+
+IMPLEMENT_IS_TYPE_B1(Bar_column, Script_column);
+