local $base="lilypond/";
local @examples=("wohltemperirt");
-system 'make html';
+system 'pod2html';
print "resetting refs.\n";
"gs -q -sDEVICE=ppmraw -sOutputFile=- -r200 -dNOPAUSE $a.ps -c quit |pnmscale 0.5| ppmtogif > $a.gif"
}
-system "mkdir docxx; make -C.. docxx; ln ../docxx/* ./docxx/;"
-
-system "tar cf website.tar *.html *.gif *.png *.ps docxx/;" .
-"gzip -9 website.tar;"
+system "mkdir docxx; make -C.. docxx; ln ../docxx/* ./docxx/;" .
+ "tar cf website.tar *.html *.gif *.png *.ps docxx/;" .
+ "gzip -9 website.tar;"
mtor << on_b;
}
+int
+Bar_req::compare(const Bar_req &c1)const
+{
+ return type_str_ == c1.type_str_;
+}
+
void
Bar_req::do_print() const
{
- mtor << type;
+ mtor << type_str_;
+}
+
+Bar_req::Bar_req(String s)
+{
+ type_str_ = s;
}
Partial_measure_req::Partial_measure_req(Moment m)
void
Barcheck_req::do_print() const{}
-Bar_req::Bar_req(String s)
-{
- type = s;
-}
/* *************** */
void
Clef_change_req::do_print() const