CVSROOT: /cvsroot/lilypond
Module name: lilypond
Branch:
Changes by: Han-Wen Nienhuys <[EMAIL PROTECTED]> 05/06/09 18:26:01
Modified files:
lily : source-file.cc
lily/include : source-file.hh
scm : lily.scm
Log message:
CVSWeb URLs:
http://savannah.gnu.org/cgi-bin/viewcvs/lilypond/lilypond/lily/source-file.cc.diff?tr1=1.30&tr2=1.31&r1=text&r2=text
http://savannah.gnu.org/cgi-bin/viewcvs/lilypond/lilypond/lily/include/source-file.hh.diff?tr1=1.12&tr2=1.13&r1=text&r2=text
http://savannah.gnu.org/cgi-bin/viewcvs/lilypond/lilypond/scm/lily.scm.diff?tr1=1.359&tr2=1.360&r1=text&r2=text
Patches:
Index: lilypond/lily/include/source-file.hh
diff -u lilypond/lily/include/source-file.hh:1.12
lilypond/lily/include/source-file.hh:1.13
--- lilypond/lily/include/source-file.hh:1.12 Wed Jun 8 13:07:11 2005
+++ lilypond/lily/include/source-file.hh Thu Jun 9 18:26:01 2005
@@ -61,7 +61,7 @@
*/
char const *pos_str0_;
- SCM get_port () const { return str_port_; }
+ SCM get_port () const;
String name_;
private:
Index: lilypond/lily/source-file.cc
diff -u lilypond/lily/source-file.cc:1.30 lilypond/lily/source-file.cc:1.31
--- lilypond/lily/source-file.cc:1.30 Wed Jun 8 13:07:11 2005
+++ lilypond/lily/source-file.cc Thu Jun 9 18:26:01 2005
@@ -282,9 +282,8 @@
line_chars += thislen;
left -= thislen;
}
-
-
}
+
bool
Source_file::contains (char const* pos_str0) const
{
@@ -373,3 +372,9 @@
String str = String ((Byte const *)forward_str0 (n), n);
return str;
}
+
+SCM
+Source_file::get_port () const
+{
+ return str_port_;
+}
Index: lilypond/scm/lily.scm
diff -u lilypond/scm/lily.scm:1.359 lilypond/scm/lily.scm:1.360
--- lilypond/scm/lily.scm:1.359 Thu Jun 9 18:05:31 2005
+++ lilypond/scm/lily.scm Thu Jun 9 18:26:01 2005
@@ -268,6 +268,7 @@
(lambda (a b)
(< (object-address (car a))
(object-address (car b))))))
+
(out-file-name (string-append
"gcstat-" (number->string gc-protect-stat-count)
".scm"))
_______________________________________________
Lilypond-cvs mailing list
[email protected]
http://lists.gnu.org/mailman/listinfo/lilypond-cvs
