]> git.donarmstrong.com Git - lilypond.git/blob - src/meter.cc
release: 0.0.9
[lilypond.git] / src / meter.cc
1 #include "string.hh"
2 #include "molecule.hh"
3 #include "meter.hh"
4 #include "paper.hh"
5 #include "lookup.hh"
6
7
8 Meter::Meter(svec<String> a)
9     :args(a)
10 {
11 }
12 void
13 Meter::preprocess()
14 {    
15     Parametric_symbol *p = paper()->lookup_->meter("general");
16     Symbol s = p->eval(args);
17     delete p;
18     output = new Molecule(Atom(s));
19 }
20