+++ /dev/null
-/*
- tex-lookup.hh -- declare Tex_lookup
-
- source file of the GNU LilyPond music typesetter
-
- (c) 1997--1998 Jan Nieuwenhuizen <janneke@gnu.org>
-*/
-
-#ifndef PS_LOOKUP_HH
-#define PS_LOOKUP_HH
-
-#include "lookup.hh"
-
-class Ps_lookup : public Lookup
-{
-public:
- Ps_lookup ();
- Ps_lookup (Lookup const& s);
- Ps_lookup (Symtables const& s);
- virtual ~Ps_lookup ();
-
- virtual Atom afm_find (String s) const;
- virtual Atom* atom_p (String, int, Box) const;
- virtual String character_str (int i) const;
- virtual Atom dashed_slur (Array<Offset> controls, Real thick, Real dash) const;
- virtual Atom hairpin (Real width, bool decresc, bool continued) const;
- virtual Lookup* lookup_p (Lookup const&) const;
- virtual Lookup* lookup_p (Symtables const&) const;
- virtual Paper_outputter* paper_outputter_p (Paper_stream*, Paper_def*, Scope*, String) const;
- virtual Paper_stream* paper_stream_p () const;
- virtual Atom plet (Real dy , Real dx, Direction dir) const;
- virtual Atom ps_beam (Real slope, Real width, Real thick) const;
- virtual Atom slur (Array<Offset> controls) const;
- virtual Atom stem (Real y1, Real y2) const;
- virtual Atom text (String style, String text) const;
- virtual String unknown_str () const;
- virtual Atom vbracket (Real &y) const;
-};
-
-#endif // PS_LOOKUP_HH
+++ /dev/null
-/*
- ps-outputter.hh -- declare Ps_outputter
-
- source file of the GNU LilyPond music typesetter
-
- (c) 1997--1998 Han-Wen Nienhuys <hanwen@cs.uu.nl>
-*/
-
-
-#ifndef PS_OUTPUTTER_HH
-#define PS_OUTPUTTER_HH
-
-#include "paper-outputter.hh"
-
-class Ps_outputter : public Paper_outputter
-{
-public:
- Ps_outputter (Paper_stream *);
- virtual ~Ps_outputter ();
-
- void switch_to_font (String);
- virtual void output_molecule (Molecule const*, Offset, char const*);
- virtual void start_line ();
- virtual void stop_line ();
-};
-
-#endif // PS_OUTPUTTER_HH
+++ /dev/null
-#ifndef PS_STREAM_HH
-#define PS_STREAM_HH
-
-#include "paper-stream.hh"
-
-/** PS output.
- Use this class for writing to a PS file.
- It counts braces to prevent nesting errors, and
- it will add a comment sign before each newline.
- */
-class Ps_stream : public Paper_stream
-{
-public:
- Ps_stream (String filename);
- virtual ~Ps_stream();
-
- virtual void header();
- virtual Paper_stream &operator <<(Scalar);
-};
-
-#endif // PS_STREAM_HH
+++ /dev/null
-/*
- tex-lookup.hh -- declare Tex_lookup
-
- source file of the GNU LilyPond music typesetter
-
- (c) 1997--1998 Han-Wen Nienhuys <hanwen@cs.uu.nl>
- Jan Nieuwenhuizen <janneke@gnu.org>
-*/
-
-#ifndef TEX_LOOKUP_HH
-#define TEX_LOOKUP_HH
-
-#include "ps-lookup.hh"
-
-class Tex_lookup : public Ps_lookup
-{
-public:
- Tex_lookup ();
- Tex_lookup (Lookup const& s);
- Tex_lookup (Symtables const& s);
- virtual ~Tex_lookup();
-
- virtual Atom afm_find (String s) const;
- virtual String character_str (int i) const;
- virtual Atom dashed_slur (Array<Offset> controls, Real thick, Real dash) const;
- virtual Atom* atom_p (String, int, Box) const;
- Atom embed (Atom a) const;
- virtual Atom hairpin (Real width, bool decresc, bool continued) const;
- virtual Lookup* lookup_p (Lookup const&) const;
- virtual Lookup* lookup_p (Symtables const&) const;
- virtual Paper_outputter* paper_outputter_p (Paper_stream*, Paper_def*, Scope*, String) const;
- virtual Paper_stream* paper_stream_p () const;
- virtual Atom plet (Real dy , Real dx, Direction dir) const;
- virtual String print_dimen (Real) const;
- virtual Atom ps_beam (Real slope, Real width, Real thick) const;
- virtual Atom slur (Array<Offset> controls) const;
- virtual Atom stem (Real y1, Real y2) const;
- virtual Atom text (String style, String text) const;
- virtual String unknown_str () const;
- virtual Atom vbracket (Real &y) const;
-};
-
-#endif // TEX_LOOKUP_HH
+++ /dev/null
-/*
- tex-outputter.hh -- declare Tex_outputter
-
- source file of the GNU LilyPond music typesetter
-
- (c) 1997--1998 Han-Wen Nienhuys <hanwen@cs.uu.nl>
-*/
-
-
-#ifndef TEX_OUTPUTTER_HH
-#define TEX_OUTPUTTER_HH
-
-#include "paper-outputter.hh"
-
-class Tex_outputter : public Paper_outputter
-{
-public:
- Tex_outputter (Paper_stream *);
- virtual ~Tex_outputter ();
-
- void switch_to_font (String);
- virtual void output_molecule (Molecule const*, Offset, char const*);
- virtual void start_line ();
- virtual void stop_line ();
-};
-
-#endif // TEX_OUTPUTTER_HH
+++ /dev/null
-#ifndef TEX_STREAM_HH
-#define TEX_STREAM_HH
-
-#include "paper-stream.hh"
-
-/** TeX output.
- Use this class for writing to a TeX file.
- It counts braces to prevent nesting errors, and
- it will add a comment sign before each newline.
- */
-class Tex_stream : public Paper_stream
-{
-public:
- Tex_stream (String filename);
- virtual ~Tex_stream();
-
- virtual void header();
- virtual Paper_stream &operator <<(Scalar);
-};
-
-#endif // TEX_STREAM_HH
+++ /dev/null
-/*
- ps-lookup.cc -- implement Ps_lookup
-
- source file of the GNU LilyPond music typesetter
-
- (c) 1997--1998 Jan Nieuwenhuizen <janneke@gnu.org>
-*/
-
-#include "ps-lookup.hh"
-#include "debug.hh"
-#include "dimensions.hh"
-#include "symtable.hh"
-#include "scalar.hh"
-#include "paper-def.hh"
-#include "string-convert.hh"
-#include "main.hh"
-#include "file-results.hh"
-#include "scope.hh"
-#include "paper-stream.hh"
-#include "ps-stream.hh"
-#include "ps-outputter.hh"
-#include "scope.hh"
-#include "dictionary-iter.hh"
-#include "identifier.hh"
-
-Ps_lookup::Ps_lookup ()
- : Lookup ()
-{
-}
-
-Ps_lookup::Ps_lookup (Lookup const& s)
- : Lookup (s)
-{
-}
-
-Ps_lookup::Ps_lookup (Symtables const& s)
- : Lookup (s)
-{
-}
-
-Ps_lookup::~Ps_lookup ()
-{
-}
-
-Atom
-Ps_lookup::afm_find (String s) const
-{
- return Lookup::afm_find (s, String ("(\\%03o) show "));
-}
-
-Atom*
-Ps_lookup::atom_p (String s, int n, Box b) const
-{
- for (int i = 0; i < n; i++)
- s.prepend ("% ");
- return new Atom (s, b);
-}
-
-String
-Ps_lookup::character_str (int i) const
-{
- return to_str (i, "(\\%03o)");
-}
-
-Atom
-Ps_lookup::dashed_slur (Array<Offset> controls, Real thick, Real dash) const
-{
- assert (controls.size () == 8);
-
- String ps;
-
- Real dx = controls[3].x () - controls[0].x ();
- Real dy = controls[3].y () - controls[0].y ();
-
- for (int i = 1; i < 4; i++)
- ps += String_convert::double_str (controls[i].x ()) + " "
- + String_convert::double_str (controls[i].y ()) + " ";
-
- ps += String_convert::double_str (controls[0].x ()) + " "
- + String_convert::double_str (controls[0].y ()) + " ";
-
- ps += String_convert::double_str (thick) + " ";
- Real on = dash > 1? thick * dash - thick : 0;
- Real off = 2 * thick;
- ps += "[" + String_convert::double_str (on) + " ";
- ps += String_convert::double_str (off) + "] ";
- ps += String_convert::int_str (0) + " ";
- ps += "draw_dashed_slur ";
-
- Atom a;
- a.str_ = ps;
-
- a.dim_[X_AXIS] = Interval (0, dx);
- a.dim_[Y_AXIS] = Interval (0 <? dy, 0 >? dy);
- a.font_ = font_;
- return a;
-}
-
-Atom
-Ps_lookup::hairpin (Real width, bool decresc, bool continued) const
-{
- Atom a;
- Real height = paper_l_->staffheight_f () / 6;
- String ps;
- ps += to_str (width) + " "
- + to_str (height) + " "
- + to_str (continued ? height/2 : 0) +
- + " draw_" + String (decresc ? "de" : "") + "cresc\n";
- a.str_ = ps;
-
-
- a.dim_.x () = Interval (0, width);
- a.dim_.y () = Interval (-2*height, 2*height);
- a.font_ = font_;
- return a;
-}
-
-Lookup*
-Ps_lookup::lookup_p (Lookup const& l) const
-{
- return new Ps_lookup (l);
-}
-
-Lookup*
-Ps_lookup::lookup_p (Symtables const& s) const
-{
- return new Ps_lookup (s);
-}
-extern char const *lily_version_number_sz ();
-
-String
-header_to_ps_string (Scope *head)
-{
- String s;
- String lily_id_str = "Lily was here, " +
- String (lily_version_number_sz ());
-
- s+= "/lily_id_string\n{" + lily_id_str + "} bind def\n";
-
- for (Dictionary_iter<Identifier*> i (*head); i.ok (); i++)
- {
- if (!i.val ()->access_String_identifier ())
- continue;
-
- String val = *i.val()->access_String_identifier ()->data_p_;
-
- s += "/mudela" + i.key () + "{" + val + "} bind def\n";
- }
-
- return s;
-}
-
-Paper_outputter*
-Ps_lookup::paper_outputter_p (Paper_stream* os_p, Paper_def* paper_l, Header* header_l, String origin_str) const
-{
- if (header_global_p)
- *os_p << header_to_ps_string (header_global_p);
-
- *os_p << _ ("\n% outputting Score, defined at: ") << origin_str << '\n';
-
- if (header_l)
- {
- *os_p << header_to_ps_string (header_l);
- }
-
- *os_p << paper_l->ps_output_settings_str ();
-
- if (experimental_features_global_b)
- *os_p << "turnOnExperimentalFeatures\n";
-
- return new Ps_outputter (os_p);
-}
-
-Paper_stream*
-Ps_lookup::paper_stream_p () const
-{
- String outname = base_output_str ();
-
- if (outname != "-")
- outname += ".ps";
- *mlog << _f ("PostScript output to %s...",
- outname == "-" ? String ("<stdout>") : outname ) << endl;
- target_str_global_array.push (outname);
- return new Ps_stream (outname);
-}
-
-Atom
-Ps_lookup::plet (Real dy , Real dx, Direction dir) const
-{
- String ps;
-
- ps += String_convert::double_str (dx) + " "
- + String_convert::double_str (dy) + " "
- + String_convert::int_str ( (int)dir) +
- " draw_plet ";
-
- Atom s;
- s.str_ = ps;
- return s;
-}
-
-Atom
-Ps_lookup::ps_beam (Real slope, Real width, Real thick) const
-{
- String ps;
- ps += to_str (width) + " "+ to_str (slope) + " " + to_str (thick)
- + " draw_beam ";
-
- Atom s;
- s.str_ = ps;
- return s;
-}
-
-Atom
-Ps_lookup::slur (Array<Offset> controls) const
-{
- assert (controls.size () == 8);
-
- String ps;
-
- Real dx = controls[3].x () - controls[0].x ();
- Real dy = controls[3].y () - controls[0].y ();
-
- for (int i = 5; i < 8; i++)
- ps += String_convert::double_str (controls[i].x ()) + " "
- + String_convert::double_str (controls[i].y ()) + " ";
-
- ps += String_convert::double_str (controls[4].x ()) + " "
- + String_convert::double_str (controls[4].y ()) + " ";
-
- for (int i = 1; i < 4; i++)
- ps += String_convert::double_str (controls[i].x ()) + " "
- + String_convert::double_str (controls[i].y ()) + " ";
-
- ps += String_convert::double_str (controls[0].x ()) + " "
- + String_convert::double_str (controls[0].y ()) + " ";
-
- ps += " draw_slur ";
-
- Atom s;
- s.str_ = ps;
-
- s.dim_[X_AXIS] = Interval (0, dx);
- s.dim_[Y_AXIS] = Interval (0 <? dy, 0 >? dy);
- s.font_ = font_;
- return s;
-}
-
-Atom
-Ps_lookup::stem (Real y1, Real y2) const
-{
- return Lookup::stem (y1, y2, "\n% % % % draw_stem ");
-}
-
-Atom
-Ps_lookup::text (String style, String text) const
-{
- return Lookup::text (style, "(" + text + ")");
-}
-
-String
-Ps_lookup::unknown_str () const
-{
- return "unknown ";
-}
-
-Atom
-Ps_lookup::vbracket (Real &y) const
-{
- Atom psbracket;
- Real min_y = paper_l_->staffheight_f ();
- if (y < min_y)
- {
- warning (_ ("bracket")
- + " " + _ ("too small") + " (" + print_dimen (y) + ")");
-// y = min_y;
- }
- psbracket.str_ = to_str (y) + " draw_bracket ";
- psbracket.dim_[Y_AXIS] = Interval (-y/2,y/2);
- psbracket.dim_[X_AXIS] = Interval (0,4 PT);
- return psbracket;
-}
-
-
-
+++ /dev/null
-/*
- ps-outputter.cc -- implement Ps_outputter
-
- source file of the GNU LilyPond music typesetter
-
- (c) 1997--1998 Han-Wen Nienhuys <hanwen@cs.uu.nl>
- Jan Nieuwenhuizen <janneke@gnu.org>
-*/
-
-#include "ps-outputter.hh"
-#include "ps-stream.hh"
-#include "molecule.hh"
-#include "atom.hh"
-#include "array.hh"
-#include "string-convert.hh"
-#include "debug.hh"
-
-Ps_outputter::Ps_outputter (Paper_stream *s)
- :Paper_outputter (s)
-{
-}
-
-Ps_outputter::~Ps_outputter ()
-{
-}
-
-/*
- 26 fonts ought to be enough for anyone.
-*/
-static String
-ps_font_command(int i)
-{
-// urg
-// return "%\\font" + String_convert::form_str ("%c", 'A' + i) + "\n";
- return "\n/feta20 findfont 12 scalefont setfont ";
-}
-
-void
-Ps_outputter::switch_to_font (String fontname)
-{
- if (!fontname.length_i () || fontname == current_font_)
- return;
-
- current_font_ = fontname;
- int i=0;
- for (; i< font_arr_.size (); i++)
- if (font_arr_[i] == fontname)
- {
- *outstream_l_ <<ps_font_command (i) << "\n";
- return ;
- }
-
-
- font_arr_.push (fontname);
- *outstream_l_ << "%\\font" + ps_font_command (i) << "% =" + fontname << "\n";
- *outstream_l_<< ps_font_command (i) << "\n";
-}
-
-void
-Ps_outputter::output_molecule (Molecule const*m, Offset o, char const *nm)
-{
- if (check_debug)
- *outstream_l_ << String ("\n%start: ") << nm << "\n";
-
- Paper_outputter::output_molecule (m, o, nm, "% % {%}placebox \n");
-}
-
-void
-Ps_outputter::start_line ()
-{
- *outstream_l_ << "\nstart_line {\n";
-}
-
-void
-Ps_outputter::stop_line ()
-{
- *outstream_l_ << "}\nstop_line\n";
- current_font_ = "";
- font_arr_.clear ();
-}
+++ /dev/null
-/*
- tex-stream.cc -- implement Ps_stream
-
- source file of the GNU LilyPond music typesetter
-
- (c) 1997--1998 Han-Wen Nienhuys <hanwen@cs.uu.nl>
- Jan Nieuwenhuizen <janneke@gnu.org>
-*/
-
-#include <fstream.h>
-#include <time.h>
-
-#include "main.hh"
-#include "ps-stream.hh"
-#include "debug.hh"
-
-Ps_stream::Ps_stream (String filename)
- : Paper_stream (filename)
-{
- header ();
-}
-
-Ps_stream::~Ps_stream ()
-{
- *os << "\nshowpage\n";
-}
-
-void
-Ps_stream::header ()
-{
- *os << _ ("%!PS-Adobe-3.0\n");
- // urg, merge with Tex
- *os << _ ("%%Creator: ");
- if (no_timestamps_global_b)
- *os << "GNU LilyPond\n";
- else
- *os << get_version_str () << '\n';
- *os << _ ("%%Automatically generated");
- if (no_timestamps_global_b)
- *os << ".\n";
- else
- {
- *os << _ (", at ");
- time_t t (time (0));
- *os << ctime (&t) << "%\n";
- }
-}
-
-// print string. don't forget indent.
-Paper_stream&
-Ps_stream::operator << (Scalar s)
-{
- return Paper_stream::operator << (s);
-}
-
+++ /dev/null
-/*
- tex-lookup.cc -- implement Tex_lookup
-
- source file of the GNU LilyPond music typesetter
-
- (c) 1997--1998 Jan Nieuwenhuizen <janneke@gnu.org>
- Jan Nieuwenhuizen <janneke@gnu.org>
-*/
-
-#include "tex-lookup.hh"
-#include "debug.hh"
-#include "symtable.hh"
-#include "scalar.hh"
-#include "paper-def.hh"
-#include "string-convert.hh"
-#include "main.hh"
-#include "file-results.hh"
-#include "scope.hh"
-#include "paper-stream.hh"
-#include "tex-stream.hh"
-#include "tex-outputter.hh"
-#include "dictionary-iter.hh"
-#include "identifier.hh"
-
-Tex_lookup::Tex_lookup ()
- : Ps_lookup ()
-{
-}
-
-Tex_lookup::Tex_lookup (Lookup const& s)
- : Ps_lookup (s)
-{
-}
-
-Tex_lookup::Tex_lookup (Symtables const& s)
- : Ps_lookup (s)
-{
-}
-
-Tex_lookup::~Tex_lookup()
-{
-}
-
-Atom
-Tex_lookup::afm_find (String s) const
-{
- return Lookup::afm_find (s, String ("\\char%d"));
-}
-
-Atom*
-Tex_lookup::atom_p (String s, int n, Box b) const
-{
- if (s.length_i ())
- s.prepend ("\\");
- for (int i = 0; i < n; i++)
- s += "{%}";
- return new Atom (s, b);
-}
-
-String
-Tex_lookup::character_str (int i) const
-{
- return Lookup::character_str (i);
-}
-
-Atom
-Tex_lookup::dashed_slur (Array<Offset> controls, Real thick, Real dash) const
-{
- return embed (Ps_lookup::dashed_slur (controls, thick, dash));
-}
-
-Atom
-Tex_lookup::embed (Atom a) const
-{
- a.str_ = "\\embeddedps{\n" + a.str_ + "}";
- return a;
-}
-
-Atom
-Tex_lookup::hairpin (Real width, bool decresc, bool continued) const
-{
- return embed (Ps_lookup::hairpin (width, decresc, continued));
-}
-
-Atom
-Tex_lookup::plet (Real dy , Real dx, Direction dir) const
-{
- return embed (Ps_lookup::plet (dy, dx, dir));
-}
-
-Lookup*
-Tex_lookup::lookup_p (Lookup const& l) const
-{
- return new Tex_lookup (l);
-}
-
-Lookup*
-Tex_lookup::lookup_p (Symtables const& s) const
-{
- return new Tex_lookup (s);
-}
-
-extern char const *lily_version_number_sz ();
-
-String
-header_to_tex_string (Scope *head)
-{
- String s;
- String lily_id_str = "Lily was here, " +
- String (lily_version_number_sz ());
- s+= "\\def\\LilyIdString{" + lily_id_str + "}\n";
-
- for (Dictionary_iter<Identifier*> i(*head); i.ok (); i++)
- {
- if (!i.val ()->access_String_identifier ())
- continue;
-
- String val = *i.val()->access_String_identifier ()->data_p_;
- s += "\\def\\mudela" + i.key () + "{" + val + "}\n";
- }
- return s;
-}
-
-
-Paper_outputter*
-Tex_lookup::paper_outputter_p (Paper_stream* os_p, Paper_def* paper_l, Scope* header_l, String origin_str) const
-{
- if (header_global_p)
- *os_p << header_to_tex_string(header_global_p);
-
- *os_p << _ ("\n% outputting Score, defined at: ") << origin_str << '\n';
-
- if (header_l)
- *os_p << header_to_tex_string (header_global_p);
-
-
- *os_p << paper_l->tex_output_settings_str ();
-
- if (experimental_features_global_b)
- *os_p << "\\turnOnExperimentalFeatures%\n";
-
- *os_p << "\\turnOnPostScript%\n";
-
- return new Tex_outputter (os_p);
-}
-
-Paper_stream *
-Tex_lookup::paper_stream_p () const
-{
- String outname = base_output_str ();
-
- Paper_stream* p;
- if (outname != "-")
- outname += ".tex";
- *mlog << _f ("TeX output to %s...",
- outname == "-" ? String ("<stdout>") : outname ) << endl;
- p = new Tex_stream (outname);
- target_str_global_array.push (outname);
- return p;
-}
-
-String
-Tex_lookup::print_dimen (Real r) const
-{
- String s = to_str (r, "%.3f");
- if (s.index_i ("NaN") != -1)
- {
- warning (_ ("NaN"));
- s = "0.0";
- }
- return Lookup::print_dimen (r) + "pt";
-}
-
-Atom
-Tex_lookup::ps_beam (Real slope, Real width, Real thick) const
-{
- return embed (Ps_lookup::ps_beam (slope, width, thick));
-}
-
-Atom
-Tex_lookup::slur (Array<Offset> controls) const
-{
- return embed (Ps_lookup::slur (controls));
-}
-
-Atom
-Tex_lookup::stem (Real y1, Real y2) const
-{
- return Lookup::stem (y1, y2, "\\kern %\\vrule width % height % depth %");
-}
-
-Atom
-Tex_lookup::text (String style, String text) const
-{
- return Lookup::text (style, text);
-}
-
-String
-Tex_lookup::unknown_str () const
-{
- return "\\unknown";
-}
-
-Atom
-Tex_lookup::vbracket (Real &y) const
-{
- return embed (Ps_lookup::vbracket (y));
-}
-
+++ /dev/null
-/*
- tex-outputter.cc -- implement Tex_outputter
-
- source file of the GNU LilyPond music typesetter
-
- (c) 1997--1998 Han-Wen Nienhuys <hanwen@cs.uu.nl>
- Jan Nieuwenhuizen <janneke@gnu.org>
-*/
-
-#include "tex-outputter.hh"
-#include "tex-stream.hh"
-#include "molecule.hh"
-#include "atom.hh"
-#include "array.hh"
-#include "string-convert.hh"
-#include "debug.hh"
-
-Tex_outputter::Tex_outputter (Paper_stream *s)
- :Paper_outputter (s)
-{
-}
-
-Tex_outputter::~Tex_outputter ()
-{
-}
-
-/*
- 26 fonts ought to be enough for anyone.
-*/
-static String
-tex_font_command(int i)
-{
- return "\\font" +String_convert::form_str ("%c", 'A' + i) ;
-}
-
-void
-Tex_outputter::switch_to_font (String fontname)
-{
- if (!fontname.length_i () || fontname == current_font_)
- return;
-
- current_font_ = fontname;
- int i=0;
- for (; i< font_arr_.size (); i++)
- if (font_arr_[i] == fontname)
- {
- *outstream_l_ <<tex_font_command (i) << "\n";
- return ;
- }
-
-
- font_arr_.push (fontname);
- *outstream_l_ << "\\font" + tex_font_command (i) << "=" + fontname << "\n";
- *outstream_l_<< tex_font_command (i);
-}
-
-void
-Tex_outputter::output_molecule (Molecule const*m, Offset o, char const *nm)
-{
- if (check_debug)
- *outstream_l_ << String ("\n%start: ") << nm << "\n";
-
- Paper_outputter::output_molecule (m, o, nm, "\\placebox{%}{%}{%}");
-}
-
-void
-Tex_outputter::start_line ()
-{
- *outstream_l_ << "\\hbox{%\n";
-}
-
-void
-Tex_outputter::stop_line ()
-{
- *outstream_l_ << "}";
- *outstream_l_ << "\\interscoreline";
- current_font_ = "";
- font_arr_.clear ();
-}
+++ /dev/null
-/*
- tex-stream.cc -- implement Tex_stream
-
- source file of the GNU LilyPond music typesetter
-
- (c) 1997--1998 Han-Wen Nienhuys <hanwen@cs.uu.nl>
-
-*/
-
-#include <fstream.h>
-#include <time.h>
-
-#include "main.hh"
-#include "tex-stream.hh"
-#include "debug.hh"
-
-Tex_stream::Tex_stream (String filename)
- : Paper_stream (filename)
-{
- header ();
-}
-
-Tex_stream::~Tex_stream ()
-{
- *os << "\n\\EndLilyPondOutput";
-}
-
-void
-Tex_stream::header ()
-{
- // urg, merge with Ps
- *os << _ ("% Creator: ");
- if (no_timestamps_global_b)
- *os << "GNU LilyPond\n";
- else
- *os << get_version_str () << '\n';
- *os << _ ("% Automatically generated");
- if (no_timestamps_global_b)
- *os << ".\n";
- else
- {
- *os << _ (", at ");
- time_t t (time (0));
- *os << ctime (&t) << "%\n";
- }
-}
-
-// print string. don't forget indent.
-Paper_stream&
-Tex_stream::operator << (Scalar s)
-{
- return Paper_stream::operator << (s);
-}
-
+++ /dev/null
-\input mfplain
-\input modes
-\dump
-
+++ /dev/null
-# Initial_outfiles.make
-
-localinstall: localinstall-files
-
-localinstall-files: $(INSTALLATION_OUT_FILES)
- -$(INSTALL) -d $(INSTALLATION_OUT_DIR)
- $(foreach i, $(INSTALLATION_OUT_FILES), \
- $(INSTALL) -m 644 $(i) $(INSTALLATION_OUT_DIR) && )true
-
-localuninstall: localuninstall-files
-
-localuninstall-files:
- $(foreach i, $(notdir $(INSTALLATION_OUT_FILES)), \
- rm -f $(INSTALLATION_OUT_DIR)/$(i) && ) true
- -rmdir $(INSTALLATION_OUT_DIR)
+++ /dev/null
-# Initial_outfiles.sub.make
-
-include $(depth)/make/stepmake.make
-include $(stepdir)/install-outfiles.make
-
+++ /dev/null
-# Installfiles.make
-
-localinstall: localinstall-files
-
-localinstall-files:
- -$(INSTALL) -d $(INSTALLATION_DIR)
- $(foreach i, $(INSTALLATION_FILES),\
- $(INSTALL) -m 644 $(i) $(INSTALLATION_DIR) &&)true
-
-localuninstall: localuninstall-files
-
-localuninstall-files:
- $(foreach i, $(INSTALLATION_FILES),\
- rm -f $(INSTALLATION_DIR)/$(i) && ) true
- -rmdir $(INSTALLATION_DIR)