lilypond-0.0.9

diff --git a/src/sccol.cc b/src/sccol.cc
new file mode 100644 (file)
index 0000000..1dfc8f2
--- /dev/null
+++ b/src/sccol.cc
@@ -0,0 +1,28 @@
+#include "sccol.hh"
+#include "debug.hh"
+
+Score_column::Score_column(Real w)
+{
+    when = w;
+    pcol = new PCol(0);
+    musical = false;
+}
+
+bool
+Score_column::used() {
+    return pcol->used;
+}
+
+void
+Score_column::print() const
+{
+#ifndef NPRINT
+    mtor << "Score_column { mus "<< musical <<" at " <<  when<<'\n';
+    mtor << "durations: [";
+    for (int i=0; i < durations.sz(); i++)
+       mtor << durations[i] << " ";
+    mtor << "]\n";
+    pcol->print();
+    mtor << "}\n";
+#endif
+}

diff --git a/src/stcol.cc b/src/stcol.cc
new file mode 100644 (file)
index 0000000..799daed
--- /dev/null
+++ b/src/stcol.cc
@@ -0,0 +1,30 @@
+#include "stcol.hh"
+#include "sccol.hh"
+#include "voice.hh"
+
+bool
+Staff_column::mus() const
+{
+    return score_column->musical;
+}
+
+Real
+Staff_column::when() const
+{
+    return score_column->when;
+}
+
+void
+Staff_column::add(Voice_element*ve)
+{
+    Real d= ve->duration;
+    if (d){
+       score_column->durations.add(d);
+    }
+       
+    v_elts.add(ve);
+}
+
+Staff_column::Staff_column(Score_column*s) {
+    score_column = s;
+}