]> git.donarmstrong.com Git - lilypond.git/blobdiff - tstream.cc
release: 0.0.3
[lilypond.git] / tstream.cc
index 78c9a72852021c372456eab527ac6ca79c7c7e81..c47fca6da6da3b2f52be6da849d012cf7c01fb8d 100644 (file)
@@ -1,5 +1,7 @@
 #include <fstream.h>
+#include <time.h>
 #include "tex.hh"
+#include "misc.hh"
 #include "tstream.hh"
 #include "debug.hh"
 
@@ -11,8 +13,17 @@ Tex_stream::Tex_stream(String filename)
        error("can't open " + filename);
     nest_level = 0;
     outputting_comment=false;
+    header();
+}
+void
+Tex_stream::header()
+{
+    *os << "% Creator: " << get_version() << "\n";
+    *os << "% Automatically generated, at ";
+    time_t t(time(0));
+    *os << ctime(&t)<<"\n";
+//*os << "% from input file ..\n";    
 }
-
 Tex_stream::~Tex_stream()
 {
     assert(nest_level == 0);