DURATION {DURNAME}\.*
FULLNOTE {PITCH}{DURATION}?
WORD [a-zA-Z][a-zA-Z0-9_]+
-REAL [0-9]+(\.[0-9]*)?
+REAL -?[0-9]+(\.[0-9]*)?
%%
}
<notes>[ \t\n]+ {
}
-<notes>%.*$ {
+<notes>[%#].*$ {
}
<notes>\$ {
#include "tex.hh"
#include "scalar.hh"
-Real
-Lookup::internote()
+
+Lookup::Lookup()
{
- return ball(4).dim.y.length()/2;
+ texsetting = "\\unknowntexsetting";
+ symtables_ = new Symtables;
}
-void
-Lookup::parse(Text_db&t)
+Lookup::Lookup(Lookup const &s)
+{
+ texsetting = s.texsetting;
+ symtables_ = new Symtables(*s.symtables_);
+}
+Lookup::~Lookup()
{
- symtables_->read(t) ;
+ delete symtables_;
}
-Lookup::Lookup()
+void
+Lookup::add(String s, Symtable*p)
{
- symtables_ = new Symtables;
+ symtables_->add(s, p);
}
-Lookup::~Lookup()
+/****************/
+
+Real
+Lookup::internote()
{
- delete symtables_;
+ return ball(4).dim.y.length()/2;
}
Symbol
return ret;
}
-/****************************************************************/
-// bare bones.
Symbol
return s;
}
-/****************************************************************/
-
-
Symbol
Lookup::meter(svec<Scalar> a)
s.tex = substitute_args(src,a);
return s;
}
-
-
// utility functions for PScore
#include "debug.hh"
+#include "lookup.hh"
#include "spanner.hh"
#include "paper.hh"
#include "molecule.hh"
{
int l=1;
+ ts << "\n "<< paper_->lookup_->texsetting << "%(Tex id)\n";
for (PCursor<Line_of_score*> lic(lines); lic.ok(); lic++) {
ts << "% line of score no. " << l++ <<"\n";
ts << lic->TeXstring();